]> granicus.if.org Git - imagemagick/blob - MagickCore/paint.c
...
[imagemagick] / MagickCore / paint.c
1 /*
2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3 %                                                                             %
4 %                                                                             %
5 %                                                                             %
6 %                      PPPP    AAA   IIIII  N   N  TTTTT                      %
7 %                      P   P  A   A    I    NN  N    T                        %
8 %                      PPPP   AAAAA    I    N N N    T                        %
9 %                      P      A   A    I    N  NN    T                        %
10 %                      P      A   A  IIIII  N   N    T                        %
11 %                                                                             %
12 %                                                                             %
13 %                        Methods to Paint on an Image                         %
14 %                                                                             %
15 %                              Software Design                                %
16 %                                   Cristy                                    %
17 %                                 July 1998                                   %
18 %                                                                             %
19 %                                                                             %
20 %  Copyright 1999-2017 ImageMagick Studio LLC, a non-profit organization      %
21 %  dedicated to making software imaging solutions freely available.           %
22 %                                                                             %
23 %  You may not use this file except in compliance with the License.  You may  %
24 %  obtain a copy of the License at                                            %
25 %                                                                             %
26 %    https://www.imagemagick.org/script/license.php                           %
27 %                                                                             %
28 %  Unless required by applicable law or agreed to in writing, software        %
29 %  distributed under the License is distributed on an "AS IS" BASIS,          %
30 %  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.   %
31 %  See the License for the specific language governing permissions and        %
32 %  limitations under the License.                                             %
33 %                                                                             %
34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
35 %
36 %
37 */
38 \f
39 /*
40  Include declarations.
41 */
42 #include "MagickCore/studio.h"
43 #include "MagickCore/artifact.h"
44 #include "MagickCore/channel.h"
45 #include "MagickCore/color.h"
46 #include "MagickCore/color-private.h"
47 #include "MagickCore/colorspace-private.h"
48 #include "MagickCore/composite.h"
49 #include "MagickCore/composite-private.h"
50 #include "MagickCore/draw.h"
51 #include "MagickCore/draw-private.h"
52 #include "MagickCore/exception.h"
53 #include "MagickCore/exception-private.h"
54 #include "MagickCore/gem.h"
55 #include "MagickCore/gem-private.h"
56 #include "MagickCore/monitor.h"
57 #include "MagickCore/monitor-private.h"
58 #include "MagickCore/option.h"
59 #include "MagickCore/paint.h"
60 #include "MagickCore/pixel-accessor.h"
61 #include "MagickCore/resource_.h"
62 #include "MagickCore/statistic.h"
63 #include "MagickCore/string_.h"
64 #include "MagickCore/string-private.h"
65 #include "MagickCore/thread-private.h"
66 \f
67 /*
68 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
69 %                                                                             %
70 %                                                                             %
71 %                                                                             %
72 %   F l o o d f i l l P a i n t I m a g e                                     %
73 %                                                                             %
74 %                                                                             %
75 %                                                                             %
76 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
77 %
78 %  FloodfillPaintImage() changes the color value of any pixel that matches
79 %  target and is an immediate neighbor.  If the method FillToBorderMethod is
80 %  specified, the color value is changed for any neighbor pixel that does not
81 %  match the bordercolor member of image.
82 %
83 %  By default target must match a particular pixel color exactly.  However,
84 %  in many cases two colors may differ by a small amount.  The fuzz member of
85 %  image defines how much tolerance is acceptable to consider two colors as
86 %  the same.  For example, set fuzz to 10 and the color red at intensities of
87 %  100 and 102 respectively are now interpreted as the same color for the
88 %  purposes of the floodfill.
89 %
90 %  The format of the FloodfillPaintImage method is:
91 %
92 %      MagickBooleanType FloodfillPaintImage(Image *image,
93 %        const DrawInfo *draw_info,const PixelInfo target,
94 %        const ssize_t x_offset,const ssize_t y_offset,
95 %        const MagickBooleanType invert,ExceptionInfo *exception)
96 %
97 %  A description of each parameter follows:
98 %
99 %    o image: the image.
100 %
101 %    o draw_info: the draw info.
102 %
103 %    o target: the RGB value of the target color.
104 %
105 %    o x_offset,y_offset: the starting location of the operation.
106 %
107 %    o invert: paint any pixel that does not match the target color.
108 %
109 %    o exception: return any errors or warnings in this structure.
110 %
111 */
112 MagickExport MagickBooleanType FloodfillPaintImage(Image *image,
113   const DrawInfo *draw_info,const PixelInfo *target,const ssize_t x_offset,
114   const ssize_t y_offset,const MagickBooleanType invert,
115   ExceptionInfo *exception)
116 {
117 #define MaxStacksize  524288UL
118 #define PushSegmentStack(up,left,right,delta) \
119 { \
120   if (s >= (segment_stack+MaxStacksize)) \
121     ThrowBinaryException(DrawError,"SegmentStackOverflow",image->filename) \
122   else \
123     { \
124       if ((((up)+(delta)) >= 0) && (((up)+(delta)) < (ssize_t) image->rows)) \
125         { \
126           s->x1=(double) (left); \
127           s->y1=(double) (up); \
128           s->x2=(double) (right); \
129           s->y2=(double) (delta); \
130           s++; \
131         } \
132     } \
133 }
134
135   CacheView
136     *floodplane_view,
137     *image_view;
138
139   Image
140     *floodplane_image;
141
142   MagickBooleanType
143     skip,
144     status;
145
146   MemoryInfo
147     *segment_info;
148
149   PixelInfo
150     fill_color,
151     pixel;
152
153   register SegmentInfo
154     *s;
155
156   SegmentInfo
157     *segment_stack;
158
159   ssize_t
160     offset,
161     start,
162     x1,
163     x2,
164     y;
165
166   /*
167     Check boundary conditions.
168   */
169   assert(image != (Image *) NULL);
170   assert(image->signature == MagickCoreSignature);
171   if (image->debug != MagickFalse)
172     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
173   assert(draw_info != (DrawInfo *) NULL);
174   assert(draw_info->signature == MagickCoreSignature);
175   if ((x_offset < 0) || (x_offset >= (ssize_t) image->columns))
176     return(MagickFalse);
177   if ((y_offset < 0) || (y_offset >= (ssize_t) image->rows))
178     return(MagickFalse);
179   if (SetImageStorageClass(image,DirectClass,exception) == MagickFalse)
180     return(MagickFalse);
181   if (IsGrayColorspace(image->colorspace) != MagickFalse)
182     (void) SetImageColorspace(image,sRGBColorspace,exception);
183   if ((image->alpha_trait == UndefinedPixelTrait) &&
184       (draw_info->fill.alpha_trait != UndefinedPixelTrait))
185     (void) SetImageAlpha(image,OpaqueAlpha,exception);
186   /*
187     Set floodfill state.
188   */
189   floodplane_image=CloneImage(image,image->columns,image->rows,MagickTrue,
190     exception);
191   if (floodplane_image == (Image *) NULL)
192     return(MagickFalse);
193   floodplane_image->alpha_trait=UndefinedPixelTrait;
194   floodplane_image->colorspace=GRAYColorspace;
195   (void) QueryColorCompliance("#000",AllCompliance,
196     &floodplane_image->background_color,exception);
197   (void) SetImageBackgroundColor(floodplane_image,exception);
198   segment_info=AcquireVirtualMemory(MaxStacksize,sizeof(*segment_stack));
199   if (segment_info == (MemoryInfo *) NULL)
200     {
201       floodplane_image=DestroyImage(floodplane_image);
202       ThrowBinaryException(ResourceLimitError,"MemoryAllocationFailed",
203         image->filename);
204     }
205   segment_stack=(SegmentInfo *) GetVirtualMemoryBlob(segment_info);
206   /*
207     Push initial segment on stack.
208   */
209   status=MagickTrue;
210   start=0;
211   s=segment_stack;
212   PushSegmentStack(y_offset,x_offset,x_offset,1);
213   PushSegmentStack(y_offset+1,x_offset,x_offset,-1);
214   GetPixelInfo(image,&pixel);
215   image_view=AcquireVirtualCacheView(image,exception);
216   floodplane_view=AcquireAuthenticCacheView(floodplane_image,exception);
217   while (s > segment_stack)
218   {
219     register const Quantum
220       *magick_restrict p;
221
222     register Quantum
223       *magick_restrict q;
224
225     register ssize_t
226       x;
227
228     /*
229       Pop segment off stack.
230     */
231     s--;
232     x1=(ssize_t) s->x1;
233     x2=(ssize_t) s->x2;
234     offset=(ssize_t) s->y2;
235     y=(ssize_t) s->y1+offset;
236     /*
237       Recolor neighboring pixels.
238     */
239     p=GetCacheViewVirtualPixels(image_view,0,y,(size_t) (x1+1),1,exception);
240     q=GetCacheViewAuthenticPixels(floodplane_view,0,y,(size_t) (x1+1),1,
241       exception);
242     if ((p == (const Quantum *) NULL) || (q == (Quantum *) NULL))
243       break;
244     p+=x1*GetPixelChannels(image);
245     q+=x1*GetPixelChannels(floodplane_image);
246     for (x=x1; x >= 0; x--)
247     {
248       if (GetPixelGray(floodplane_image,q) != 0)
249         break;
250       GetPixelInfoPixel(image,p,&pixel);
251       if (IsFuzzyEquivalencePixelInfo(&pixel,target) == invert)
252         break;
253       SetPixelGray(floodplane_image,QuantumRange,q);
254       p-=GetPixelChannels(image);
255       q-=GetPixelChannels(floodplane_image);
256     }
257     if (SyncCacheViewAuthenticPixels(floodplane_view,exception) == MagickFalse)
258       break;
259     skip=x >= x1 ? MagickTrue : MagickFalse;
260     if (skip == MagickFalse)
261       {
262         start=x+1;
263         if (start < x1)
264           PushSegmentStack(y,start,x1-1,-offset);
265         x=x1+1;
266       }
267     do
268     {
269       if (skip == MagickFalse)
270         {
271           if (x < (ssize_t) image->columns)
272             {
273               p=GetCacheViewVirtualPixels(image_view,x,y,image->columns-x,1,
274                 exception);
275               q=GetCacheViewAuthenticPixels(floodplane_view,x,y,image->columns-
276                 x,1,exception);
277               if ((p == (const Quantum *) NULL) || (q == (Quantum *) NULL))
278                 break;
279               for ( ; x < (ssize_t) image->columns; x++)
280               {
281                 if (GetPixelGray(floodplane_image,q) != 0)
282                   break;
283                 GetPixelInfoPixel(image,p,&pixel);
284                 if (IsFuzzyEquivalencePixelInfo(&pixel,target) == invert)
285                   break;
286                 SetPixelGray(floodplane_image,QuantumRange,q);
287                 p+=GetPixelChannels(image);
288                 q+=GetPixelChannels(floodplane_image);
289               }
290               status=SyncCacheViewAuthenticPixels(floodplane_view,exception);
291               if (status == MagickFalse)
292                 break;
293             }
294           PushSegmentStack(y,start,x-1,offset);
295           if (x > (x2+1))
296             PushSegmentStack(y,x2+1,x-1,-offset);
297         }
298       skip=MagickFalse;
299       x++;
300       if (x <= x2)
301         {
302           p=GetCacheViewVirtualPixels(image_view,x,y,(size_t) (x2-x+1),1,
303             exception);
304           q=GetCacheViewAuthenticPixels(floodplane_view,x,y,(size_t) (x2-x+1),1,
305             exception);
306           if ((p == (const Quantum *) NULL) || (q == (Quantum *) NULL))
307             break;
308           for ( ; x <= x2; x++)
309           {
310             if (GetPixelGray(floodplane_image,q) != 0)
311               break;
312             GetPixelInfoPixel(image,p,&pixel);
313             if (IsFuzzyEquivalencePixelInfo(&pixel,target) != invert)
314               break;
315             p+=GetPixelChannels(image);
316             q+=GetPixelChannels(floodplane_image);
317           }
318         }
319       start=x;
320     } while (x <= x2);
321   }
322   status=MagickTrue;
323   for (y=0; y < (ssize_t) image->rows; y++)
324   {
325     register const Quantum
326       *magick_restrict p;
327
328     register Quantum
329       *magick_restrict q;
330
331     register ssize_t
332       x;
333
334     /*
335       Tile fill color onto floodplane.
336     */
337     if (status == MagickFalse)
338       continue;
339     p=GetCacheViewVirtualPixels(floodplane_view,0,y,image->columns,1,exception);
340     q=GetCacheViewAuthenticPixels(image_view,0,y,image->columns,1,exception);
341     if ((p == (const Quantum *) NULL) || (q == (Quantum *) NULL))
342       {
343         status=MagickFalse;
344         continue;
345       }
346     for (x=0; x < (ssize_t) image->columns; x++)
347     {
348       if (GetPixelGray(floodplane_image,p) != 0)
349         {
350           GetFillColor(draw_info,x,y,&fill_color,exception);
351           SetPixelViaPixelInfo(image,&fill_color,q);
352         }
353       p+=GetPixelChannels(floodplane_image);
354       q+=GetPixelChannels(image);
355     }
356     if (SyncCacheViewAuthenticPixels(image_view,exception) == MagickFalse)
357       status=MagickFalse;
358   }
359   floodplane_view=DestroyCacheView(floodplane_view);
360   image_view=DestroyCacheView(image_view);
361   segment_info=RelinquishVirtualMemory(segment_info);
362   floodplane_image=DestroyImage(floodplane_image);
363   return(status);
364 }
365 \f
366 /*
367 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
368 %                                                                             %
369 %                                                                             %
370 %                                                                             %
371 +     G r a d i e n t I m a g e                                               %
372 %                                                                             %
373 %                                                                             %
374 %                                                                             %
375 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
376 %
377 %  GradientImage() applies a continuously smooth color transitions along a
378 %  vector from one color to another.
379 %
380 %  Note, the interface of this method will change in the future to support
381 %  more than one transistion.
382 %
383 %  The format of the GradientImage method is:
384 %
385 %      MagickBooleanType GradientImage(Image *image,const GradientType type,
386 %        const SpreadMethod method,const PixelInfo *start_color,
387 %        const PixelInfo *stop_color,ExceptionInfo *exception)
388 %
389 %  A description of each parameter follows:
390 %
391 %    o image: the image.
392 %
393 %    o type: the gradient type: linear or radial.
394 %
395 %    o spread: the gradient spread meathod: pad, reflect, or repeat.
396 %
397 %    o start_color: the start color.
398 %
399 %    o stop_color: the stop color.
400 %
401 %    o exception: return any errors or warnings in this structure.
402 %
403 */
404 MagickExport MagickBooleanType GradientImage(Image *image,
405   const GradientType type,const SpreadMethod method,const StopInfo *stops,
406   const size_t number_stops,ExceptionInfo *exception)
407 {
408   const char
409     *artifact;
410
411   DrawInfo
412     *draw_info;
413
414   GradientInfo
415     *gradient;
416
417   MagickBooleanType
418     status;
419
420   /*
421     Set gradient start-stop end points.
422   */
423   assert(image != (const Image *) NULL);
424   assert(image->signature == MagickCoreSignature);
425   if (image->debug != MagickFalse)
426     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
427   assert(stops != (const StopInfo *) NULL);
428   assert(number_stops > 0);
429   draw_info=AcquireDrawInfo();
430   gradient=(&draw_info->gradient);
431   gradient->type=type;
432   gradient->bounding_box.width=image->columns;
433   gradient->bounding_box.height=image->rows;
434   artifact=GetImageArtifact(image,"gradient:bounding-box");
435   if (artifact != (const char *) NULL)
436     (void) ParseAbsoluteGeometry(artifact,&gradient->bounding_box);
437   gradient->gradient_vector.x2=(double) image->columns-1;
438   gradient->gradient_vector.y2=(double) image->rows-1;
439   artifact=GetImageArtifact(image,"gradient:direction");
440   if (artifact != (const char *) NULL)
441     {
442       GravityType
443         direction;
444
445       direction=(GravityType) ParseCommandOption(MagickGravityOptions,
446         MagickFalse,artifact);
447       switch (direction)
448       {
449         case NorthWestGravity:
450         {
451           gradient->gradient_vector.x1=(double) image->columns-1;
452           gradient->gradient_vector.y1=(double) image->rows-1;
453           gradient->gradient_vector.x2=0.0;
454           gradient->gradient_vector.y2=0.0;
455           break;
456         }
457         case NorthGravity:
458         {
459           gradient->gradient_vector.x1=0.0;
460           gradient->gradient_vector.y1=(double) image->rows-1;
461           gradient->gradient_vector.x2=0.0;
462           gradient->gradient_vector.y2=0.0;
463           break;
464         }
465         case NorthEastGravity:
466         {
467           gradient->gradient_vector.x1=0.0;
468           gradient->gradient_vector.y1=(double) image->rows-1;
469           gradient->gradient_vector.x2=(double) image->columns-1;
470           gradient->gradient_vector.y2=0.0;
471           break;
472         }
473         case WestGravity:
474         {
475           gradient->gradient_vector.x1=(double) image->columns-1;
476           gradient->gradient_vector.y1=0.0;
477           gradient->gradient_vector.x2=0.0;
478           gradient->gradient_vector.y2=0.0;
479           break;
480         }
481         case EastGravity:
482         {
483           gradient->gradient_vector.x1=0.0;
484           gradient->gradient_vector.y1=0.0;
485           gradient->gradient_vector.x2=(double) image->columns-1;
486           gradient->gradient_vector.y2=0.0;
487           break;
488         }
489         case SouthWestGravity:
490         {
491           gradient->gradient_vector.x1=(double) image->columns-1;
492           gradient->gradient_vector.y1=0.0;
493           gradient->gradient_vector.x2=0.0;
494           gradient->gradient_vector.y2=(double) image->rows-1;
495           break;
496         }
497         case SouthGravity:
498         {
499           gradient->gradient_vector.x1=0.0;
500           gradient->gradient_vector.y1=0.0;
501           gradient->gradient_vector.x2=0.0;
502           gradient->gradient_vector.y2=(double) image->columns-1;
503           break;
504         }
505         case SouthEastGravity:
506         {
507           gradient->gradient_vector.x1=0.0;
508           gradient->gradient_vector.y1=0.0;
509           gradient->gradient_vector.x2=(double) image->columns-1;
510           gradient->gradient_vector.y2=(double) image->rows-1;
511           break;
512         }
513         default:
514           break;
515       }
516     }
517   artifact=GetImageArtifact(image,"gradient:angle");
518   if (artifact != (const char *) NULL)
519     gradient->angle=StringToDouble(artifact,(char **) NULL);
520   artifact=GetImageArtifact(image,"gradient:vector");
521   if (artifact != (const char *) NULL)
522     (void) sscanf(artifact,"%lf%*[ ,]%lf%*[ ,]%lf%*[ ,]%lf",
523       &gradient->gradient_vector.x1,&gradient->gradient_vector.y1,
524       &gradient->gradient_vector.x2,&gradient->gradient_vector.y2);
525   if ((GetImageArtifact(image,"gradient:angle") == (const char *) NULL) &&
526       (GetImageArtifact(image,"gradient:direction") == (const char *) NULL) &&
527       (GetImageArtifact(image,"gradient:extent") == (const char *) NULL) &&
528       (GetImageArtifact(image,"gradient:vector") == (const char *) NULL))
529     if ((type == LinearGradient) && (gradient->gradient_vector.y2 != 0.0))
530       gradient->gradient_vector.x2=0.0;
531   gradient->center.x=(double) gradient->gradient_vector.x2/2.0;
532   gradient->center.y=(double) gradient->gradient_vector.y2/2.0;
533   artifact=GetImageArtifact(image,"gradient:center");
534   if (artifact != (const char *) NULL)
535     (void) sscanf(artifact,"%lf%*[ ,]%lf",&gradient->center.x,
536       &gradient->center.y);
537   artifact=GetImageArtifact(image,"gradient:angle");
538   if ((type == LinearGradient) && (artifact != (const char *) NULL))
539     {
540       double
541         sine,
542         cosine,
543         distance;
544
545       /*
546         Reference https://drafts.csswg.org/css-images-3/#linear-gradients.
547       */
548       sine=sin((double) DegreesToRadians(gradient->angle-90.0));
549       cosine=cos((double) DegreesToRadians(gradient->angle-90.0));
550       distance=fabs((double) image->columns*cosine)+
551         fabs((double) image->rows*sine);
552       gradient->gradient_vector.x1=0.5*(image->columns-distance*cosine);
553       gradient->gradient_vector.y1=0.5*(image->rows-distance*sine);
554       gradient->gradient_vector.x2=0.5*(image->columns+distance*cosine);
555       gradient->gradient_vector.y2=0.5*(image->rows+distance*sine);
556     }
557   gradient->radii.x=(double) MagickMax(image->columns,image->rows)/2.0;
558   gradient->radii.y=gradient->radii.x;
559   artifact=GetImageArtifact(image,"gradient:extent");
560   if (artifact != (const char *) NULL)
561     {
562       if (LocaleCompare(artifact,"Circle") == 0)
563         {
564           gradient->radii.x=(double) MagickMax(image->columns,image->rows)/2.0;
565           gradient->radii.y=gradient->radii.x;
566         }
567       if (LocaleCompare(artifact,"Diagonal") == 0)
568         {
569           gradient->radii.x=(double) (sqrt(image->columns*image->columns+
570             image->rows*image->rows))/2.0;
571           gradient->radii.y=gradient->radii.x;
572         }
573       if (LocaleCompare(artifact,"Ellipse") == 0)
574         {
575           gradient->radii.x=(double) image->columns/2.0;
576           gradient->radii.y=(double) image->rows/2.0;
577         }
578       if (LocaleCompare(artifact,"Maximum") == 0)
579         {
580           gradient->radii.x=(double) MagickMax(image->columns,image->rows)/2.0;
581           gradient->radii.y=gradient->radii.x;
582         }
583       if (LocaleCompare(artifact,"Minimum") == 0)
584         {
585           gradient->radii.x=(double) (MagickMin(image->columns,image->rows))/
586             2.0;
587           gradient->radii.y=gradient->radii.x;
588         }
589     }
590   artifact=GetImageArtifact(image,"gradient:radii");
591   if (artifact != (const char *) NULL)
592     (void) sscanf(artifact,"%lf%*[ ,]%lf",&gradient->radii.x,
593       &gradient->radii.y);
594   gradient->radius=MagickMax(gradient->radii.x,gradient->radii.y);
595   gradient->spread=method;
596   /*
597     Define the gradient to fill between the stops.
598   */
599   gradient->number_stops=number_stops;
600   gradient->stops=(StopInfo *) AcquireQuantumMemory(gradient->number_stops,
601     sizeof(*gradient->stops));
602   if (gradient->stops == (StopInfo *) NULL)
603     ThrowBinaryException(ResourceLimitError,"MemoryAllocationFailed",
604       image->filename);
605   (void) CopyMagickMemory(gradient->stops,stops,(size_t) number_stops*
606     sizeof(*stops));
607   /*
608     Draw a gradient on the image.
609   */
610   status=DrawGradientImage(image,draw_info,exception);
611   draw_info=DestroyDrawInfo(draw_info);
612   return(status);
613 }
614 \f
615 /*
616 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
617 %                                                                             %
618 %                                                                             %
619 %                                                                             %
620 %     O i l P a i n t I m a g e                                               %
621 %                                                                             %
622 %                                                                             %
623 %                                                                             %
624 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
625 %
626 %  OilPaintImage() applies a special effect filter that simulates an oil
627 %  painting.  Each pixel is replaced by the most frequent color occurring
628 %  in a circular region defined by radius.
629 %
630 %  The format of the OilPaintImage method is:
631 %
632 %      Image *OilPaintImage(const Image *image,const double radius,
633 %        const double sigma,ExceptionInfo *exception)
634 %
635 %  A description of each parameter follows:
636 %
637 %    o image: the image.
638 %
639 %    o radius: the radius of the circular neighborhood.
640 %
641 %    o sigma: the standard deviation of the Gaussian, in pixels.
642 %
643 %    o exception: return any errors or warnings in this structure.
644 %
645 */
646
647 static size_t **DestroyHistogramThreadSet(size_t **histogram)
648 {
649   register ssize_t
650     i;
651
652   assert(histogram != (size_t **) NULL);
653   for (i=0; i < (ssize_t) GetMagickResourceLimit(ThreadResource); i++)
654     if (histogram[i] != (size_t *) NULL)
655       histogram[i]=(size_t *) RelinquishMagickMemory(histogram[i]);
656   histogram=(size_t **) RelinquishMagickMemory(histogram);
657   return(histogram);
658 }
659
660 static size_t **AcquireHistogramThreadSet(const size_t count)
661 {
662   register ssize_t
663     i;
664
665   size_t
666     **histogram,
667     number_threads;
668
669   number_threads=(size_t) GetMagickResourceLimit(ThreadResource);
670   histogram=(size_t **) AcquireQuantumMemory(number_threads,sizeof(*histogram));
671   if (histogram == (size_t **) NULL)
672     return((size_t **) NULL);
673   (void) ResetMagickMemory(histogram,0,number_threads*sizeof(*histogram));
674   for (i=0; i < (ssize_t) number_threads; i++)
675   {
676     histogram[i]=(size_t *) AcquireQuantumMemory(count,sizeof(**histogram));
677     if (histogram[i] == (size_t *) NULL)
678       return(DestroyHistogramThreadSet(histogram));
679   }
680   return(histogram);
681 }
682
683 MagickExport Image *OilPaintImage(const Image *image,const double radius,
684   const double sigma,ExceptionInfo *exception)
685 {
686 #define NumberPaintBins  256
687 #define OilPaintImageTag  "OilPaint/Image"
688
689   CacheView
690     *image_view,
691     *paint_view;
692
693   Image
694     *linear_image,
695     *paint_image;
696
697   MagickBooleanType
698     status;
699
700   MagickOffsetType
701     progress;
702
703   size_t
704     **histograms,
705     width;
706
707   ssize_t
708     center,
709     y;
710
711   /*
712     Initialize painted image attributes.
713   */
714   assert(image != (const Image *) NULL);
715   assert(image->signature == MagickCoreSignature);
716   if (image->debug != MagickFalse)
717     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
718   assert(exception != (ExceptionInfo *) NULL);
719   assert(exception->signature == MagickCoreSignature);
720   width=GetOptimalKernelWidth2D(radius,sigma);
721   linear_image=CloneImage(image,0,0,MagickTrue,exception);
722   paint_image=CloneImage(image,image->columns,image->rows,MagickTrue,exception);
723   if ((linear_image == (Image *) NULL) || (paint_image == (Image *) NULL))
724     {
725       if (linear_image != (Image *) NULL)
726         linear_image=DestroyImage(linear_image);
727       if (paint_image != (Image *) NULL)
728         linear_image=DestroyImage(paint_image);
729       return((Image *) NULL);
730     }
731   if (SetImageStorageClass(paint_image,DirectClass,exception) == MagickFalse)
732     {
733       linear_image=DestroyImage(linear_image);
734       paint_image=DestroyImage(paint_image);
735       return((Image *) NULL);
736     }
737   histograms=AcquireHistogramThreadSet(NumberPaintBins);
738   if (histograms == (size_t **) NULL)
739     {
740       linear_image=DestroyImage(linear_image);
741       paint_image=DestroyImage(paint_image);
742       ThrowImageException(ResourceLimitError,"MemoryAllocationFailed");
743     }
744   /*
745     Oil paint image.
746   */
747   status=MagickTrue;
748   progress=0;
749   center=(ssize_t) GetPixelChannels(linear_image)*(linear_image->columns+width)*
750     (width/2L)+GetPixelChannels(linear_image)*(width/2L);
751   image_view=AcquireVirtualCacheView(linear_image,exception);
752   paint_view=AcquireAuthenticCacheView(paint_image,exception);
753 #if defined(MAGICKCORE_OPENMP_SUPPORT)
754   #pragma omp parallel for schedule(static,4) shared(progress,status) \
755     magick_threads(linear_image,paint_image,linear_image->rows,1)
756 #endif
757   for (y=0; y < (ssize_t) linear_image->rows; y++)
758   {
759     register const Quantum
760       *magick_restrict p;
761
762     register Quantum
763       *magick_restrict q;
764
765     register size_t
766       *histogram;
767
768     register ssize_t
769       x;
770
771     if (status == MagickFalse)
772       continue;
773     p=GetCacheViewVirtualPixels(image_view,-((ssize_t) width/2L),y-(ssize_t)
774       (width/2L),linear_image->columns+width,width,exception);
775     q=QueueCacheViewAuthenticPixels(paint_view,0,y,paint_image->columns,1,
776       exception);
777     if ((p == (const Quantum *) NULL) || (q == (Quantum *) NULL))
778       {
779         status=MagickFalse;
780         continue;
781       }
782     histogram=histograms[GetOpenMPThreadId()];
783     for (x=0; x < (ssize_t) linear_image->columns; x++)
784     {
785       register ssize_t
786         i,
787         u;
788
789       size_t
790         count;
791
792       ssize_t
793         j,
794         k,
795         n,
796         v;
797
798       /*
799         Assign most frequent color.
800       */
801       k=0;
802       j=0;
803       count=0;
804       (void) ResetMagickMemory(histogram,0,NumberPaintBins* sizeof(*histogram));
805       for (v=0; v < (ssize_t) width; v++)
806       {
807         for (u=0; u < (ssize_t) width; u++)
808         {
809           n=(ssize_t) ScaleQuantumToChar(ClampToQuantum(GetPixelIntensity(
810             linear_image,p+GetPixelChannels(linear_image)*(u+k))));
811           histogram[n]++;
812           if (histogram[n] > count)
813             {
814               j=k+u;
815               count=histogram[n];
816             }
817         }
818         k+=(ssize_t) (linear_image->columns+width);
819       }
820       for (i=0; i < (ssize_t) GetPixelChannels(linear_image); i++)
821       {
822         PixelChannel channel=GetPixelChannelChannel(linear_image,i);
823         PixelTrait traits=GetPixelChannelTraits(linear_image,channel);
824         PixelTrait paint_traits=GetPixelChannelTraits(paint_image,channel);
825         if ((traits == UndefinedPixelTrait) ||
826             (paint_traits == UndefinedPixelTrait))
827           continue;
828         if (((paint_traits & CopyPixelTrait) != 0) ||
829             (GetPixelWriteMask(linear_image,p) == 0))
830           {
831             SetPixelChannel(paint_image,channel,p[center+i],q);
832             continue;
833           }
834         SetPixelChannel(paint_image,channel,p[j*GetPixelChannels(linear_image)+
835           i],q);
836       }
837       p+=GetPixelChannels(linear_image);
838       q+=GetPixelChannels(paint_image);
839     }
840     if (SyncCacheViewAuthenticPixels(paint_view,exception) == MagickFalse)
841       status=MagickFalse;
842     if (linear_image->progress_monitor != (MagickProgressMonitor) NULL)
843       {
844         MagickBooleanType
845           proceed;
846
847 #if defined(MAGICKCORE_OPENMP_SUPPORT)
848         #pragma omp critical (MagickCore_OilPaintImage)
849 #endif
850         proceed=SetImageProgress(linear_image,OilPaintImageTag,progress++,
851           linear_image->rows);
852         if (proceed == MagickFalse)
853           status=MagickFalse;
854       }
855   }
856   paint_view=DestroyCacheView(paint_view);
857   image_view=DestroyCacheView(image_view);
858   histograms=DestroyHistogramThreadSet(histograms);
859   linear_image=DestroyImage(linear_image);
860   if (status == MagickFalse)
861     paint_image=DestroyImage(paint_image);
862   return(paint_image);
863 }
864 \f
865 /*
866 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
867 %                                                                             %
868 %                                                                             %
869 %                                                                             %
870 %     O p a q u e P a i n t I m a g e                                         %
871 %                                                                             %
872 %                                                                             %
873 %                                                                             %
874 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
875 %
876 %  OpaquePaintImage() changes any pixel that matches color with the color
877 %  defined by fill argument.
878 %
879 %  By default color must match a particular pixel color exactly.  However, in
880 %  many cases two colors may differ by a small amount.  Fuzz defines how much
881 %  tolerance is acceptable to consider two colors as the same.  For example,
882 %  set fuzz to 10 and the color red at intensities of 100 and 102 respectively
883 %  are now interpreted as the same color.
884 %
885 %  The format of the OpaquePaintImage method is:
886 %
887 %      MagickBooleanType OpaquePaintImage(Image *image,const PixelInfo *target,
888 %        const PixelInfo *fill,const MagickBooleanType invert,
889 %        ExceptionInfo *exception)
890 %
891 %  A description of each parameter follows:
892 %
893 %    o image: the image.
894 %
895 %    o target: the RGB value of the target color.
896 %
897 %    o fill: the replacement color.
898 %
899 %    o invert: paint any pixel that does not match the target color.
900 %
901 %    o exception: return any errors or warnings in this structure.
902 %
903 */
904 MagickExport MagickBooleanType OpaquePaintImage(Image *image,
905   const PixelInfo *target,const PixelInfo *fill,const MagickBooleanType invert,
906   ExceptionInfo *exception)
907 {
908 #define OpaquePaintImageTag  "Opaque/Image"
909
910   CacheView
911     *image_view;
912
913   MagickBooleanType
914     status;
915
916   MagickOffsetType
917     progress;
918
919   PixelChannelMap
920     *channel_map;
921
922   PixelInfo
923     conform_fill,
924     conform_target,
925     zero;
926
927   ssize_t
928     y;
929
930   assert(image != (Image *) NULL);
931   assert(image->signature == MagickCoreSignature);
932   assert(target != (PixelInfo *) NULL);
933   assert(fill != (PixelInfo *) NULL);
934   if (image->debug != MagickFalse)
935     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
936   if (SetImageStorageClass(image,DirectClass,exception) == MagickFalse)
937     return(MagickFalse);
938   ConformPixelInfo(image,fill,&conform_fill,exception);
939   ConformPixelInfo(image,target,&conform_target,exception);
940   /*
941     Make image color opaque.
942   */
943   status=MagickTrue;
944   progress=0;
945   GetPixelInfo(image,&zero);
946   image_view=AcquireAuthenticCacheView(image,exception);
947 #if defined(MAGICKCORE_OPENMP_SUPPORT)
948   #pragma omp parallel for schedule(static,4) shared(progress,status) \
949     magick_threads(image,image,image->rows,1)
950 #endif
951   for (y=0; y < (ssize_t) image->rows; y++)
952   {
953     PixelInfo
954       pixel;
955
956     register Quantum
957       *magick_restrict q;
958
959     register ssize_t
960       x;
961
962     if (status == MagickFalse)
963       continue;
964     q=GetCacheViewAuthenticPixels(image_view,0,y,image->columns,1,exception);
965     if (q == (Quantum *) NULL)
966       {
967         status=MagickFalse;
968         continue;
969       }
970     pixel=zero;
971     for (x=0; x < (ssize_t) image->columns; x++)
972     {
973       if (GetPixelWriteMask(image,q) == 0)
974         {
975           q+=GetPixelChannels(image);
976           continue;
977         }
978       GetPixelInfoPixel(image,q,&pixel);
979       if (IsFuzzyEquivalencePixelInfo(&pixel,&conform_target) != invert)
980         {
981           channel_map=image->channel_map;
982           if ((channel_map[RedPixelChannel].traits & UpdatePixelTrait) != 0)
983             SetPixelRed(image,conform_fill.red,q);
984           if ((channel_map[GreenPixelChannel].traits & UpdatePixelTrait) != 0)
985             SetPixelGreen(image,conform_fill.green,q);
986           if ((channel_map[BluePixelChannel].traits & UpdatePixelTrait) != 0)
987             SetPixelBlue(image,conform_fill.blue,q);
988           if ((channel_map[BlackPixelChannel].traits & UpdatePixelTrait) != 0)
989             SetPixelBlack(image,conform_fill.black,q);
990           if ((channel_map[AlphaPixelChannel].traits & UpdatePixelTrait) != 0)
991             SetPixelAlpha(image,conform_fill.alpha,q);
992         }
993       q+=GetPixelChannels(image);
994     }
995     if (SyncCacheViewAuthenticPixels(image_view,exception) == MagickFalse)
996       status=MagickFalse;
997     if (image->progress_monitor != (MagickProgressMonitor) NULL)
998       {
999         MagickBooleanType
1000           proceed;
1001
1002 #if defined(MAGICKCORE_OPENMP_SUPPORT)
1003         #pragma omp critical (MagickCore_OpaquePaintImage)
1004 #endif
1005         proceed=SetImageProgress(image,OpaquePaintImageTag,progress++,
1006           image->rows);
1007         if (proceed == MagickFalse)
1008           status=MagickFalse;
1009       }
1010   }
1011   image_view=DestroyCacheView(image_view);
1012   return(status);
1013 }
1014 \f
1015 /*
1016 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1017 %                                                                             %
1018 %                                                                             %
1019 %                                                                             %
1020 %     T r a n s p a r e n t P a i n t I m a g e                               %
1021 %                                                                             %
1022 %                                                                             %
1023 %                                                                             %
1024 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1025 %
1026 %  TransparentPaintImage() changes the opacity value associated with any pixel
1027 %  that matches color to the value defined by opacity.
1028 %
1029 %  By default color must match a particular pixel color exactly.  However, in
1030 %  many cases two colors may differ by a small amount.  Fuzz defines how much
1031 %  tolerance is acceptable to consider two colors as the same.  For example,
1032 %  set fuzz to 10 and the color red at intensities of 100 and 102 respectively
1033 %  are now interpreted as the same color.
1034 %
1035 %  The format of the TransparentPaintImage method is:
1036 %
1037 %      MagickBooleanType TransparentPaintImage(Image *image,
1038 %        const PixelInfo *target,const Quantum opacity,
1039 %        const MagickBooleanType invert,ExceptionInfo *exception)
1040 %
1041 %  A description of each parameter follows:
1042 %
1043 %    o image: the image.
1044 %
1045 %    o target: the target color.
1046 %
1047 %    o opacity: the replacement opacity value.
1048 %
1049 %    o invert: paint any pixel that does not match the target color.
1050 %
1051 %    o exception: return any errors or warnings in this structure.
1052 %
1053 */
1054 MagickExport MagickBooleanType TransparentPaintImage(Image *image,
1055   const PixelInfo *target,const Quantum opacity,const MagickBooleanType invert,
1056   ExceptionInfo *exception)
1057 {
1058 #define TransparentPaintImageTag  "Transparent/Image"
1059
1060   CacheView
1061     *image_view;
1062
1063   MagickBooleanType
1064     status;
1065
1066   MagickOffsetType
1067     progress;
1068
1069   PixelInfo
1070     zero;
1071
1072   ssize_t
1073     y;
1074
1075   assert(image != (Image *) NULL);
1076   assert(image->signature == MagickCoreSignature);
1077   assert(target != (PixelInfo *) NULL);
1078   if (image->debug != MagickFalse)
1079     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
1080   if (SetImageStorageClass(image,DirectClass,exception) == MagickFalse)
1081     return(MagickFalse);
1082   if (image->alpha_trait == UndefinedPixelTrait)
1083     (void) SetImageAlphaChannel(image,OpaqueAlphaChannel,exception);
1084   /*
1085     Make image color transparent.
1086   */
1087   status=MagickTrue;
1088   progress=0;
1089   GetPixelInfo(image,&zero);
1090   image_view=AcquireAuthenticCacheView(image,exception);
1091 #if defined(MAGICKCORE_OPENMP_SUPPORT)
1092   #pragma omp parallel for schedule(static,4) shared(progress,status) \
1093     magick_threads(image,image,image->rows,1)
1094 #endif
1095   for (y=0; y < (ssize_t) image->rows; y++)
1096   {
1097     PixelInfo
1098       pixel;
1099
1100     register ssize_t
1101       x;
1102
1103     register Quantum
1104       *magick_restrict q;
1105
1106     if (status == MagickFalse)
1107       continue;
1108     q=GetCacheViewAuthenticPixels(image_view,0,y,image->columns,1,exception);
1109     if (q == (Quantum *) NULL)
1110       {
1111         status=MagickFalse;
1112         continue;
1113       }
1114     pixel=zero;
1115     for (x=0; x < (ssize_t) image->columns; x++)
1116     {
1117       if (GetPixelWriteMask(image,q) == 0)
1118         {
1119           q+=GetPixelChannels(image);
1120           continue;
1121         }
1122       GetPixelInfoPixel(image,q,&pixel);
1123       if (IsFuzzyEquivalencePixelInfo(&pixel,target) != invert)
1124         SetPixelAlpha(image,opacity,q);
1125       q+=GetPixelChannels(image);
1126     }
1127     if (SyncCacheViewAuthenticPixels(image_view,exception) == MagickFalse)
1128       status=MagickFalse;
1129     if (image->progress_monitor != (MagickProgressMonitor) NULL)
1130       {
1131         MagickBooleanType
1132           proceed;
1133
1134 #if defined(MAGICKCORE_OPENMP_SUPPORT)
1135         #pragma omp critical (MagickCore_TransparentPaintImage)
1136 #endif
1137         proceed=SetImageProgress(image,TransparentPaintImageTag,progress++,
1138           image->rows);
1139         if (proceed == MagickFalse)
1140           status=MagickFalse;
1141       }
1142   }
1143   image_view=DestroyCacheView(image_view);
1144   return(status);
1145 }
1146 \f
1147 /*
1148 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1149 %                                                                             %
1150 %                                                                             %
1151 %                                                                             %
1152 %     T r a n s p a r e n t P a i n t I m a g e C h r o m a                   %
1153 %                                                                             %
1154 %                                                                             %
1155 %                                                                             %
1156 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1157 %
1158 %  TransparentPaintImageChroma() changes the opacity value associated with any
1159 %  pixel that matches color to the value defined by opacity.
1160 %
1161 %  As there is one fuzz value for the all the channels, TransparentPaintImage()
1162 %  is not suitable for the operations like chroma, where the tolerance for
1163 %  similarity of two color component (RGB) can be different. Thus we define
1164 %  this method to take two target pixels (one low and one high) and all the
1165 %  pixels of an image which are lying between these two pixels are made
1166 %  transparent.
1167 %
1168 %  The format of the TransparentPaintImageChroma method is:
1169 %
1170 %      MagickBooleanType TransparentPaintImageChroma(Image *image,
1171 %        const PixelInfo *low,const PixelInfo *high,const Quantum opacity,
1172 %        const MagickBooleanType invert,ExceptionInfo *exception)
1173 %
1174 %  A description of each parameter follows:
1175 %
1176 %    o image: the image.
1177 %
1178 %    o low: the low target color.
1179 %
1180 %    o high: the high target color.
1181 %
1182 %    o opacity: the replacement opacity value.
1183 %
1184 %    o invert: paint any pixel that does not match the target color.
1185 %
1186 %    o exception: return any errors or warnings in this structure.
1187 %
1188 */
1189 MagickExport MagickBooleanType TransparentPaintImageChroma(Image *image,
1190   const PixelInfo *low,const PixelInfo *high,const Quantum opacity,
1191   const MagickBooleanType invert,ExceptionInfo *exception)
1192 {
1193 #define TransparentPaintImageTag  "Transparent/Image"
1194
1195   CacheView
1196     *image_view;
1197
1198   MagickBooleanType
1199     status;
1200
1201   MagickOffsetType
1202     progress;
1203
1204   ssize_t
1205     y;
1206
1207   assert(image != (Image *) NULL);
1208   assert(image->signature == MagickCoreSignature);
1209   assert(high != (PixelInfo *) NULL);
1210   assert(low != (PixelInfo *) NULL);
1211   if (image->debug != MagickFalse)
1212     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
1213   if (SetImageStorageClass(image,DirectClass,exception) == MagickFalse)
1214     return(MagickFalse);
1215   if (image->alpha_trait == UndefinedPixelTrait)
1216     (void) SetImageAlphaChannel(image,OpaqueAlphaChannel,exception);
1217   /*
1218     Make image color transparent.
1219   */
1220   status=MagickTrue;
1221   progress=0;
1222   image_view=AcquireAuthenticCacheView(image,exception);
1223 #if defined(MAGICKCORE_OPENMP_SUPPORT)
1224   #pragma omp parallel for schedule(static,4) shared(progress,status) \
1225     magick_threads(image,image,image->rows,1)
1226 #endif
1227   for (y=0; y < (ssize_t) image->rows; y++)
1228   {
1229     MagickBooleanType
1230       match;
1231
1232     PixelInfo
1233       pixel;
1234
1235     register Quantum
1236       *magick_restrict q;
1237
1238     register ssize_t
1239       x;
1240
1241     if (status == MagickFalse)
1242       continue;
1243     q=GetCacheViewAuthenticPixels(image_view,0,y,image->columns,1,exception);
1244     if (q == (Quantum *) NULL)
1245       {
1246         status=MagickFalse;
1247         continue;
1248       }
1249     GetPixelInfo(image,&pixel);
1250     for (x=0; x < (ssize_t) image->columns; x++)
1251     {
1252       if (GetPixelWriteMask(image,q) == 0)
1253         {
1254           q+=GetPixelChannels(image);
1255           continue;
1256         }
1257       GetPixelInfoPixel(image,q,&pixel);
1258       match=((pixel.red >= low->red) && (pixel.red <= high->red) &&
1259         (pixel.green >= low->green) && (pixel.green <= high->green) &&
1260         (pixel.blue  >= low->blue) && (pixel.blue <= high->blue)) ? MagickTrue :
1261         MagickFalse;
1262       if (match != invert)
1263         SetPixelAlpha(image,opacity,q);
1264       q+=GetPixelChannels(image);
1265     }
1266     if (SyncCacheViewAuthenticPixels(image_view,exception) == MagickFalse)
1267       status=MagickFalse;
1268     if (image->progress_monitor != (MagickProgressMonitor) NULL)
1269       {
1270         MagickBooleanType
1271           proceed;
1272
1273 #if defined(MAGICKCORE_OPENMP_SUPPORT)
1274         #pragma omp critical (MagickCore_TransparentPaintImageChroma)
1275 #endif
1276         proceed=SetImageProgress(image,TransparentPaintImageTag,progress++,
1277           image->rows);
1278         if (proceed == MagickFalse)
1279           status=MagickFalse;
1280       }
1281   }
1282   image_view=DestroyCacheView(image_view);
1283   return(status);
1284 }