2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6 % L IIIII SSSSS TTTTT %
10 % LLLLL IIIII SSSSS T %
13 % MagickCore Image List Methods %
20 % Copyright 1999-2012 ImageMagick Studio LLC, a non-profit organization %
21 % dedicated to making software imaging solutions freely available. %
23 % You may not use this file except in compliance with the License. You may %
24 % obtain a copy of the License at %
26 % http://www.imagemagick.org/script/license.php %
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. %
34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
43 #include "MagickCore/studio.h"
44 #include "MagickCore/blob.h"
45 #include "MagickCore/blob-private.h"
46 #include "MagickCore/exception.h"
47 #include "MagickCore/exception-private.h"
48 #include "MagickCore/list.h"
49 #include "MagickCore/memory_.h"
50 #include "MagickCore/string_.h"
53 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
57 % A p p e n d I m a g e T o L i s t %
61 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
63 % AppendImageToList() appends the second image list to the end of the first
64 % list. The given image list pointer is left unchanged, unless it was empty.
66 % The format of the AppendImageToList method is:
68 % AppendImageToList(Image *images,const Image *image)
70 % A description of each parameter follows:
72 % o images: the image list to be appended to.
74 % o image: the appended image or image list.
77 MagickExport void AppendImageToList(Image **images,const Image *image)
83 assert(images != (Image **) NULL);
84 if (image == (Image *) NULL)
86 assert(image->signature == MagickSignature);
87 if (image->debug != MagickFalse)
88 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
89 if ((*images) == (Image *) NULL)
91 *images=(Image *) image;
94 assert((*images)->signature == MagickSignature);
95 p=GetLastImageInList(*images);
96 q=GetFirstImageInList(image);
102 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
106 % C l o n e I m a g e L i s t %
110 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
112 % CloneImageList() returns a duplicate of the image list.
114 % The format of the CloneImageList method is:
116 % Image *CloneImageList(const Image *images,ExceptionInfo *exception)
118 % A description of each parameter follows:
120 % o images: the image list.
122 % o exception: return any errors or warnings in this structure.
125 MagickExport Image *CloneImageList(const Image *images,ExceptionInfo *exception)
134 if (images == (Image *) NULL)
135 return((Image *) NULL);
136 assert(images->signature == MagickSignature);
137 while (images->previous != (Image *) NULL)
138 images=images->previous;
139 image=(Image *) NULL;
140 for (p=(Image *) NULL; images != (Image *) NULL; images=images->next)
142 clone=CloneImage(images,0,0,MagickTrue,exception);
143 if (clone == (Image *) NULL)
145 if (image != (Image *) NULL)
146 image=DestroyImageList(image);
147 return((Image *) NULL);
149 if (image == (Image *) NULL)
163 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
167 % C l o n e I m a g e s %
171 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
173 % CloneImages() clones one or more images from an image sequence, using a
174 % comma separated list of image numbers or ranges.
176 % The numbers start at 0 for the first image in the list, while negative
177 % numbers refer to images starting counting from the end of the range. Images
178 % may be refered to multiple times to clone them multiple times. Images
179 % refered beyond the available number of images in list are ignored.
181 % Images referenced may be reversed, and results in a clone of those images
182 % also being made with a reversed order.
184 % The format of the CloneImages method is:
186 % Image *CloneImages(const Image *images,const char *scenes,
187 % ExceptionInfo *exception)
189 % A description of each parameter follows:
191 % o images: the image sequence.
193 % o scenes: This character string specifies which scenes to clone
194 % (e.g. 1,3-5,7-3,2).
196 % o exception: return any errors or warnings in this structure.
199 MagickExport Image *CloneImages(const Image *images,const char *scenes,
200 ExceptionInfo *exception)
223 assert(images != (const Image *) NULL);
224 assert(images->signature == MagickSignature);
225 assert(scenes != (char *) NULL);
226 if (images->debug != MagickFalse)
227 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",images->filename);
228 assert(exception != (ExceptionInfo *) NULL);
229 assert(exception->signature == MagickSignature);
230 clone_images=NewImageList();
231 images=GetFirstImageInList(images);
232 length=GetImageListLength(images);
233 for (p=(char *) scenes; *p != '\0';)
235 while ((isspace((int) ((unsigned char) *p)) != 0) || (*p == ','))
237 first=strtol(p,&p,10);
239 first+=(long) length;
241 while (isspace((int) ((unsigned char) *p)) != 0)
245 last=strtol(p+1,&p,10);
249 for (step=first > last ? -1 : 1; first != (last+step); first+=step)
252 for (next=images; next != (Image *) NULL; next=GetNextImageInList(next))
254 if (i == (ssize_t) first)
256 image=CloneImage(next,0,0,MagickTrue,exception);
257 if (image == (Image *) NULL)
259 AppendImageToList(&clone_images,image);
265 return(GetFirstImageInList(clone_images));
269 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
273 % D e l e t e I m a g e F r o m L i s t %
277 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
279 % DeleteImageFromList() deletes an image from the list. List pointer
280 % is moved to the next image, if one is present. See RemoveImageFromList().
282 % The format of the DeleteImageFromList method is:
284 % DeleteImageFromList(Image **images)
286 % A description of each parameter follows:
288 % o images: the image list.
291 MagickExport void DeleteImageFromList(Image **images)
296 image=RemoveImageFromList(images);
297 if (image != (Image *) NULL)
298 (void) DestroyImage(image);
302 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
306 % D e l e t e I m a g e s %
310 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
312 % DeleteImages() deletes one or more images from an image sequence, using a
313 % comma separated list of image numbers or ranges.
315 % The numbers start at 0 for the first image, while negative numbers refer to
316 % images starting counting from the end of the range. Images may be refered to
317 % multiple times without problems. Image refered beyond the available number
318 % of images in list are ignored.
320 % If the referenced images are in the reverse order, that range will be
321 % completely ignored, unlike CloneImages().
323 % The format of the DeleteImages method is:
325 % DeleteImages(Image **images,const char *scenes,ExceptionInfo *exception)
327 % A description of each parameter follows:
329 % o images: the image sequence.
331 % o scenes: This character string specifies which scenes to delete
332 % (e.g. 1,3-5,-2-6,2).
334 % o exception: return any errors or warnings in this structure.
337 MagickExport void DeleteImages(Image **images,const char *scenes,
338 ExceptionInfo *exception)
359 assert(images != (Image **) NULL);
360 assert((*images)->signature == MagickSignature);
361 assert(scenes != (char *) NULL);
362 if ((*images)->debug != MagickFalse)
363 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
364 (*images)->filename);
365 assert(exception != (ExceptionInfo *) NULL);
366 assert(exception->signature == MagickSignature);
367 *images=GetFirstImageInList(*images);
368 length=GetImageListLength(*images);
369 delete_list=(MagickBooleanType *) AcquireQuantumMemory(length,
370 sizeof(*delete_list));
371 if (delete_list == (MagickBooleanType *) NULL)
373 (void) ThrowMagickException(exception,GetMagickModule(),
374 ResourceLimitError,"MemoryAllocationFailed","`%s'",(*images)->filename);
378 for (i=0; i < (ssize_t) length; i++)
379 delete_list[i]=MagickFalse;
381 Note which images will be deleted, avoid duplicate deleted
383 for (p=(char *) scenes; *p != '\0';)
385 while ((isspace((int) *p) != 0) || (*p == ','))
387 first=strtol(p,&p,10);
389 first+=(long) length;
391 while (isspace((int) ((unsigned char) *p)) != 0)
395 last=strtol(p+1,&p,10);
401 for (i=(ssize_t) first; i <= (ssize_t) last; i++)
402 if ((i >= 0) && (i < (ssize_t) length))
403 delete_list[i]=MagickTrue;
406 Delete images marked for deletion, once only
409 for (i=0; i < (ssize_t) length; i++)
412 image=GetNextImageInList(image);
413 if (delete_list[i] != MagickFalse)
414 DeleteImageFromList(images);
417 (void) RelinquishMagickMemory(delete_list);
418 *images=GetFirstImageInList(*images);
422 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
426 % D e s t r o y I m a g e L i s t %
430 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
432 % DestroyImageList() destroys an image list.
434 % The format of the DestroyImageList method is:
436 % Image *DestroyImageList(Image *image)
438 % A description of each parameter follows:
440 % o image: the image sequence.
443 MagickExport Image *DestroyImageList(Image *images)
445 if (images == (Image *) NULL)
446 return((Image *) NULL);
447 assert(images->signature == MagickSignature);
448 if (images->debug != MagickFalse)
449 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",images->filename);
450 while (images != (Image *) NULL)
451 DeleteImageFromList(&images);
452 return((Image *) NULL);
456 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
460 % D u p l i c a t e I m a g e s %
464 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
466 % DuplicateImages() duplicates one or more images from an image sequence,
467 % using a count and a comma separated list of image numbers or ranges.
469 % The numbers start at 0 for the first image, while negative numbers refer to
470 % images starting counting from the end of the range. Images may be refered to
471 % multiple times without problems. Image refered beyond the available number
472 % of images in list are ignored.
474 % The format of the DuplicateImages method is:
476 % Image *DuplicateImages(Image *images,const size_t number_duplicates,
477 % const char *scenes,ExceptionInfo *exception)
479 % A description of each parameter follows:
481 % o images: the image sequence.
483 % o number_duplicates: duplicate the image sequence this number of times.
485 % o scenes: This character string specifies which scenes to duplicate (e.g.
488 % o exception: return any errors or warnings in this structure.
491 MagickExport Image *DuplicateImages(Image *images,
492 const size_t number_duplicates,const char *scenes,ExceptionInfo *exception)
504 assert(images != (Image *) NULL);
505 assert(images->signature == MagickSignature);
506 assert(scenes != (char *) NULL);
507 if (images->debug != MagickFalse)
508 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",images->filename);
509 assert(exception != (ExceptionInfo *) NULL);
510 assert(exception->signature == MagickSignature);
511 duplicate_images=NewImageList();
512 for (i=0; i < (ssize_t) number_duplicates; i++)
514 clone_images=CloneImages(images,scenes,exception);
515 AppendImageToList(&duplicate_images,clone_images);
517 return(duplicate_images);
521 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
525 % G e t F i r s t I m a g e I n L i s t %
529 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
531 % GetFirstImageInList() returns a pointer to the first image in the list.
533 % The format of the GetFirstImageInList method is:
535 % Image *GetFirstImageInList(const Image *images)
537 % A description of each parameter follows:
539 % o images: the image list.
542 MagickExport Image *GetFirstImageInList(const Image *images)
547 if (images == (Image *) NULL)
548 return((Image *) NULL);
549 assert(images->signature == MagickSignature);
550 for (p=images; p->previous != (Image *) NULL; p=p->previous) ;
555 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
559 % G e t I m a g e F r o m L i s t %
563 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
565 % GetImageFromList() returns an image at the specified offset from the list.
567 % The format of the GetImageFromList method is:
569 % Image *GetImageFromList(const Image *images,const ssize_t index)
571 % A description of each parameter follows:
573 % o images: the image list.
575 % o index: the position within the list.
578 MagickExport Image *GetImageFromList(const Image *images,const ssize_t index)
592 if (images == (Image *) NULL)
593 return((Image *) NULL);
594 assert(images->signature == MagickSignature);
595 if (images->debug != MagickFalse)
596 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",images->filename);
597 for (p=images; p->previous != (Image *) NULL; p=p->previous) ;
598 length=GetImageListLength(images);
599 for (offset=index; offset < 0; offset+=(ssize_t) length) ;
600 for (i=0; p != (Image *) NULL; p=p->next)
601 if (i++ == (ssize_t) (offset % length))
603 if (p == (Image *) NULL)
604 return((Image *) NULL);
609 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
613 % G e t I m a g e I n d e x I n L i s t %
617 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
619 % GetImageIndexInList() returns the offset in the list of the specified image.
621 % The format of the GetImageIndexInList method is:
623 % ssize_t GetImageIndexInList(const Image *images)
625 % A description of each parameter follows:
627 % o images: the image list.
630 MagickExport ssize_t GetImageIndexInList(const Image *images)
635 if (images == (const Image *) NULL)
637 assert(images->signature == MagickSignature);
638 for (i=0; images->previous != (Image *) NULL; i++)
639 images=images->previous;
644 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
648 % G e t I m a g e L i s t L e n g t h %
652 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
654 % GetImageListLength() returns the length of the list (the number of images in
657 % The format of the GetImageListLength method is:
659 % size_t GetImageListLength(const Image *images)
661 % A description of each parameter follows:
663 % o images: the image list.
666 MagickExport size_t GetImageListLength(const Image *images)
671 if (images == (Image *) NULL)
673 assert(images->signature == MagickSignature);
674 if (images->debug != MagickFalse)
675 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",images->filename);
676 while (images->previous != (Image *) NULL)
677 images=images->previous;
678 for (i=0; images != (Image *) NULL; images=images->next)
684 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
688 % G e t L a s t I m a g e I n L i s t %
692 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
694 % GetLastImageInList() returns a pointer to the last image in the list.
696 % The format of the GetLastImageInList method is:
698 % Image *GetLastImageInList(const Image *images)
700 % A description of each parameter follows:
702 % o images: the image list.
705 MagickExport Image *GetLastImageInList(const Image *images)
710 if (images == (Image *) NULL)
711 return((Image *) NULL);
712 assert(images->signature == MagickSignature);
713 for (p=images; p->next != (Image *) NULL; p=p->next) ;
718 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
722 % G e t N e x t I m a g e I n L i s t %
726 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
728 % GetNextImageInList() returns the next image in the list.
730 % The format of the GetNextImageInList method is:
732 % Image *GetNextImageInList(const Image *images)
734 % A description of each parameter follows:
736 % o images: the image list.
739 MagickExport Image *GetNextImageInList(const Image *images)
741 if (images == (Image *) NULL)
742 return((Image *) NULL);
743 assert(images->signature == MagickSignature);
744 if (images->debug != MagickFalse)
745 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",images->filename);
746 return(images->next);
750 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
754 % G e t P r e v i o u s I m a g e I n L i s t %
758 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
760 % GetPreviousImageInList() returns the previous image in the list.
762 % The format of the GetPreviousImageInList method is:
764 % Image *GetPreviousImageInList(const Image *images)
766 % A description of each parameter follows:
768 % o images: the image list.
771 MagickExport Image *GetPreviousImageInList(const Image *images)
773 if (images == (Image *) NULL)
774 return((Image *) NULL);
775 assert(images->signature == MagickSignature);
776 return(images->previous);
780 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
783 % I m a g e L i s t T o A r r a y %
787 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
789 % ImageListToArray() is a convenience method that converts an image list to
790 % a sequential array. For example,
792 % group = ImageListToArray(images, exception);
793 % while (i = 0; group[i] != (Image *) NULL; i++)
794 % printf("%s\n", group[i]->filename);
795 % printf("%d images\n", i);
796 % group = RelinquishMagickMemory(group);
798 % The format of the ImageListToArray method is:
800 % Image **ImageListToArray(const Image *images,ExceptionInfo *exception)
802 % A description of each parameter follows:
804 % o image: the image list.
806 % o exception: return any errors or warnings in this structure.
809 MagickExport Image **ImageListToArray(const Image *images,
810 ExceptionInfo *exception)
818 if (images == (Image *) NULL)
819 return((Image **) NULL);
820 assert(images->signature == MagickSignature);
821 if (images->debug != MagickFalse)
822 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",images->filename);
823 group=(Image **) AcquireQuantumMemory((size_t) GetImageListLength(images)+1UL,
825 if (group == (Image **) NULL)
827 (void) ThrowMagickException(exception,GetMagickModule(),
828 ResourceLimitError,"MemoryAllocationFailed","`%s'",images->filename);
829 return((Image **) NULL);
831 images=GetFirstImageInList(images);
832 for (i=0; images != (Image *) NULL; images=images->next)
833 group[i++]=(Image *) images;
834 group[i]=(Image *) NULL;
839 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
843 % I n s e r t I m a g e I n L i s t %
847 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
849 % InsertImageInList() insert second given image or image list, into the first
850 % image list, immediately AFTER the image pointed to. The given image list
851 % pointer is left unchanged unless previously empty.
853 % The format of the InsertImageInList method is:
855 % InsertImageInList(Image **images,Image *image)
857 % A description of each parameter follows:
859 % o images: the image list to insert into.
861 % o image: the image list to insert.
864 MagickExport void InsertImageInList(Image **images,Image *image)
869 assert(images != (Image **) NULL);
870 assert(image != (Image *) NULL);
871 assert(image->signature == MagickSignature);
872 if (image->debug != MagickFalse)
873 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
874 if ((*images) == (Image *) NULL)
876 assert((*images)->signature == MagickSignature);
877 split=SplitImageList(*images);
878 AppendImageToList(images,image);
879 AppendImageToList(images,split);
883 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
887 % N e w I m a g e L i s t %
891 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
893 % NewImageList() creates an empty image list.
895 % The format of the NewImageList method is:
897 % Image *NewImageList(void)
900 MagickExport Image *NewImageList(void)
902 return((Image *) NULL);
906 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
910 % P r e p e n d I m a g e T o L i s t %
914 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
916 % PrependImageToList() prepends the image to the beginning of the list.
918 % The format of the PrependImageToList method is:
920 % PrependImageToList(Image *images,Image *image)
922 % A description of each parameter follows:
924 % o images: the image list.
926 % o image: the image.
929 MagickExport void PrependImageToList(Image **images,Image *image)
931 /* prepend, append the two lists with order swapped! */
932 AppendImageToList(&image,*images);
936 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
940 % R e m o v e I m a g e F r o m L i s t %
944 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
946 % RemoveImageFromList() removes and returns the image pointed to.
948 % The given image list pointer is set to point to the next image in list
949 % if it exists, otherwise it is set to the previous image, or NULL if list
952 % The format of the RemoveImageFromList method is:
954 % Image *RemoveImageFromList(Image **images)
956 % A description of each parameter follows:
958 % o images: the image list.
961 MagickExport Image *RemoveImageFromList(Image **images)
966 assert(images != (Image **) NULL);
967 if ((*images) == (Image *) NULL)
968 return((Image *) NULL);
969 assert((*images)->signature == MagickSignature);
970 if ((*images)->debug != MagickFalse)
971 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
972 (*images)->filename);
974 if ((p->previous == (Image *) NULL) && (p->next == (Image *) NULL))
975 *images=(Image *) NULL;
978 if (p->previous != (Image *) NULL)
980 p->previous->next=p->next;
983 if (p->next != (Image *) NULL)
985 p->next->previous=p->previous;
988 p->previous=(Image *) NULL;
989 p->next=(Image *) NULL;
995 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
999 % R e m o v e F i r s t I m a g e F r o m L i s t %
1003 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1005 % RemoveFirstImageFromList() removes and returns the first image in the list.
1007 % If the given image list pointer pointed to the removed first image, it is
1008 % set to the new first image of list, or NULL if list was emptied, otherwise
1011 % The format of the RemoveFirstImageFromList method is:
1013 % Image *RemoveFirstImageFromList(Image **images)
1015 % A description of each parameter follows:
1017 % o images: the image list.
1020 MagickExport Image *RemoveFirstImageFromList(Image **images)
1025 assert(images != (Image **) NULL);
1026 if ((*images) == (Image *) NULL)
1027 return((Image *) NULL);
1028 assert((*images)->signature == MagickSignature);
1029 if ((*images)->debug != MagickFalse)
1030 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
1031 (*images)->filename);
1033 while (image->previous != (Image *) NULL)
1034 image=image->previous;
1035 if (image == *images)
1036 *images=(*images)->next;
1037 if (image->next != (Image *) NULL)
1039 image->next->previous=(Image *) NULL;
1040 image->next=(Image *) NULL;
1046 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1050 % R e m o v e L a s t I m a g e F r o m L i s t %
1054 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1056 % RemoveLastImageFromList() removes and returns the last image from the list.
1058 % If the given image list pointer pointed to the removed last image, it is
1059 % set to the new last image of list, or NULL if list was emptied, otherwise
1062 % The format of the RemoveLastImageFromList method is:
1064 % Image *RemoveLastImageFromList(Image **images)
1066 % A description of each parameter follows:
1068 % o images: the image list.
1071 MagickExport Image *RemoveLastImageFromList(Image **images)
1076 assert(images != (Image **) NULL);
1077 if ((*images) == (Image *) NULL)
1078 return((Image *) NULL);
1079 assert((*images)->signature == MagickSignature);
1080 if ((*images)->debug != MagickFalse)
1081 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
1082 (*images)->filename);
1084 while (image->next != (Image *) NULL)
1086 if (image == *images)
1087 *images=(*images)->previous;
1088 if (image->previous != (Image *) NULL)
1090 image->previous->next=(Image *) NULL;
1091 image->previous=(Image *) NULL;
1097 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1101 % R e p l a c e I m a g e I n L i s t %
1105 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1107 % ReplaceImageInList() replaces an image in the list with the given image, or
1108 % list of images. Old image is destroyed. The image list pointer is set to
1109 % point to the first image of the inserted list of images.
1111 % The format of the ReplaceImageInList method is:
1113 % ReplaceImageInList(Image **images,Image *image)
1115 % A description of each parameter follows:
1117 % o images: the list and pointer to image to replace
1119 % o image: the image or image list replacing the original
1122 MagickExport void ReplaceImageInList(Image **images,Image *image)
1124 assert(images != (Image **) NULL);
1125 assert(image != (Image *) NULL);
1126 assert(image->signature == MagickSignature);
1127 if (image->debug != MagickFalse)
1128 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
1129 if ((*images) == (Image *) NULL)
1131 assert((*images)->signature == MagickSignature);
1133 /* link next pointer */
1134 image=GetLastImageInList(image);
1135 image->next=(*images)->next;
1136 if (image->next != (Image *) NULL)
1137 image->next->previous=image;
1139 /* link previous pointer - set image position to first replacement image */
1140 image=GetFirstImageInList(image);
1141 image->previous=(*images)->previous;
1142 if (image->previous != (Image *) NULL)
1143 image->previous->next=image;
1145 /* destroy replaced image */
1146 (void) DestroyImage(*images);
1151 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1155 % R e p l a c e I m a g e I n L i s t R e t u r n L a s t %
1159 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1161 % ReplaceImageInListReturnLast() is exactly as ReplaceImageInList() except
1162 % the image pointer is set to the last image in the list.
1164 % This allows you to simply use 'next' to go to the image that follows the
1165 % just replaced image.
1167 % The format of the ReplaceImageInList method is:
1169 % ReplaceImageInListReturnLast(Image **images,Image *image)
1171 % A description of each parameter follows:
1173 % o images: the list and pointer to image to replace
1175 % o image: the image or image list replacing the original
1178 MagickExport void ReplaceImageInListReturnLast(Image **images,Image *image)
1180 assert(images != (Image **) NULL);
1181 assert(image != (Image *) NULL);
1182 assert(image->signature == MagickSignature);
1183 if (image->debug != MagickFalse)
1184 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
1185 if ((*images) == (Image *) NULL)
1187 assert((*images)->signature == MagickSignature);
1189 /* link previous pointer */
1190 image=GetFirstImageInList(image);
1191 image->previous=(*images)->previous;
1192 if (image->previous != (Image *) NULL)
1193 image->previous->next=image;
1195 /* link next pointer - set image position to last replacement image */
1196 image=GetLastImageInList(image);
1197 image->next=(*images)->next;
1198 if (image->next != (Image *) NULL)
1199 image->next->previous=image;
1201 /* destroy replaced image */
1202 (void) DestroyImage(*images);
1207 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1211 % R e v e r s e I m a g e L i s t %
1215 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1217 % ReverseImageList() reverses the order of an image list.
1218 % The list pointer is reset to that start of the re-ordered list.
1220 % The format of the ReverseImageList method is:
1222 % void ReverseImageList(Image **images)
1224 % A description of each parameter follows:
1226 % o images: the image list.
1229 MagickExport void ReverseImageList(Image **images)
1237 assert(images != (Image **) NULL);
1238 if ((*images) == (Image *) NULL)
1240 assert((*images)->signature == MagickSignature);
1241 if ((*images)->debug != MagickFalse)
1242 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
1243 (*images)->filename);
1244 for (p=(*images); p->next != (Image *) NULL; p=p->next) ;
1246 for ( ; p != (Image *) NULL; p=p->next)
1249 p->next=p->previous;
1255 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1259 % S p l i c e I m a g e I n t o L i s t %
1263 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1265 % SpliceImageIntoList() removes 'length' images from the list and replaces
1266 % them with the specified splice. Removed images are returned.
1268 % The format of the SpliceImageIntoList method is:
1270 % SpliceImageIntoList(Image **images,const size_t,
1271 % const Image *splice)
1273 % A description of each parameter follows:
1275 % o images: the image list.
1277 % o length: the length of the image list to remove.
1279 % o splice: Replace the removed image list with this list.
1282 MagickExport Image *SpliceImageIntoList(Image **images,
1283 const size_t length,const Image *splice)
1292 assert(images != (Image **) NULL);
1293 assert(splice != (Image *) NULL);
1294 assert(splice->signature == MagickSignature);
1295 if ((*images) == (Image *) NULL)
1296 return((Image *) NULL);
1297 assert((*images)->signature == MagickSignature);
1298 if ((*images)->debug != MagickFalse)
1299 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
1300 (*images)->filename);
1301 split=SplitImageList(*images);
1302 AppendImageToList(images,splice);
1303 image=(Image *) NULL;
1304 for (i=0; (i < length) && (split != (Image *) NULL); i++)
1305 AppendImageToList(&image,RemoveImageFromList(&split));
1306 AppendImageToList(images,split);
1311 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1315 % S p l i t I m a g e L i s t %
1319 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1321 % SplitImageList() splits an image into two lists, after given image
1322 % The list that was split off is returned, which may be empty.
1324 % The format of the SplitImageList method is:
1326 % Image *SplitImageList(Image *images)
1328 % A description of each parameter follows:
1330 % o images: the image list.
1333 MagickExport Image *SplitImageList(Image *images)
1335 if ((images == (Image *) NULL) || (images->next == (Image *) NULL))
1336 return((Image *) NULL);
1337 images=images->next;
1338 images->previous->next=(Image *) NULL;
1339 images->previous=(Image *) NULL;
1344 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1348 + S y n c I m a g e L i s t %
1352 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1354 % SyncImageList() synchronizes the scene numbers in an image list.
1356 % The format of the SyncImageList method is:
1358 % void SyncImageList(Image *images)
1360 % A description of each parameter follows:
1362 % o images: the image list.
1365 MagickExport void SyncImageList(Image *images)
1371 if (images == (Image *) NULL)
1373 assert(images->signature == MagickSignature);
1374 for (p=images; p != (Image *) NULL; p=p->next)
1376 for (q=p->next; q != (Image *) NULL; q=q->next)
1377 if (p->scene == q->scene)
1379 if (q != (Image *) NULL)
1382 if (p == (Image *) NULL)
1384 for (p=images->next; p != (Image *) NULL; p=p->next)
1385 p->scene=p->previous->scene+1;
1389 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1393 + S y n c N e x t I m a g e I n L i s t %
1397 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1399 % SyncNextImageInList() returns the next image in the list after the blob
1400 % referenced is synchronized with the current image.
1402 % The format of the SyncNextImageInList method is:
1404 % Image *SyncNextImageInList(const Image *images)
1406 % A description of each parameter follows:
1408 % o images: the image list.
1411 MagickExport Image *SyncNextImageInList(const Image *images)
1413 if (images == (Image *) NULL)
1414 return((Image *) NULL);
1415 assert(images->signature == MagickSignature);
1416 if (images->next == (Image *) NULL)
1417 return((Image *) NULL);
1418 if (images->blob != images->next->blob)
1420 DestroyBlob(images->next);
1421 images->next->blob=ReferenceBlob(images->blob);
1423 images->next->compression=images->compression;
1424 images->next->endian=images->endian;
1425 return(images->next);