2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6 % L IIIII SSSSS TTTTT %
10 % LLLLL IIIII SSSSS T %
13 % MagickCore Image List Methods %
20 % Copyright 1999-2011 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() inserts the second image or image list into the first
850 % image list immediately after the image pointed to. The given image list
851 % pointer is 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 AppendImageToList(&image,*images);
935 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
939 % R e m o v e I m a g e F r o m L i s t %
943 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
945 % RemoveImageFromList() removes and returns the image pointed to.
947 % The given image list pointer is set to point to the next image in list
948 % if it exists, otherwise it is set to the previous image, or NULL if list
951 % The format of the RemoveImageFromList method is:
953 % Image *RemoveImageFromList(Image **images)
955 % A description of each parameter follows:
957 % o images: the image list.
960 MagickExport Image *RemoveImageFromList(Image **images)
965 assert(images != (Image **) NULL);
966 if ((*images) == (Image *) NULL)
967 return((Image *) NULL);
968 assert((*images)->signature == MagickSignature);
969 if ((*images)->debug != MagickFalse)
970 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
971 (*images)->filename);
973 if ((p->previous == (Image *) NULL) && (p->next == (Image *) NULL))
974 *images=(Image *) NULL;
977 if (p->previous != (Image *) NULL)
979 p->previous->next=p->next;
982 if (p->next != (Image *) NULL)
984 p->next->previous=p->previous;
987 p->previous=(Image *) NULL;
988 p->next=(Image *) NULL;
994 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
998 % R e m o v e F i r s t I m a g e F r o m L i s t %
1002 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1004 % RemoveFirstImageFromList() removes and returns the first image in the list.
1006 % If the given image list pointer pointed to the removed first image, it is
1007 % set to the new first image of list, or NULL if list was emptied, otherwise
1010 % The format of the RemoveFirstImageFromList method is:
1012 % Image *RemoveFirstImageFromList(Image **images)
1014 % A description of each parameter follows:
1016 % o images: the image list.
1019 MagickExport Image *RemoveFirstImageFromList(Image **images)
1024 assert(images != (Image **) NULL);
1025 if ((*images) == (Image *) NULL)
1026 return((Image *) NULL);
1027 assert((*images)->signature == MagickSignature);
1028 if ((*images)->debug != MagickFalse)
1029 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
1030 (*images)->filename);
1032 while (image->previous != (Image *) NULL)
1033 image=image->previous;
1034 if (image == *images)
1035 *images=(*images)->next;
1036 if (image->next != (Image *) NULL)
1038 image->next->previous=(Image *) NULL;
1039 image->next=(Image *) NULL;
1045 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1049 % R e m o v e L a s t I m a g e F r o m L i s t %
1053 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1055 % RemoveLastImageFromList() removes and returns the last image from the list.
1057 % If the given image list pointer pointed to the removed last image, it is
1058 % set to the new last image of list, or NULL if list was emptied, otherwise
1061 % The format of the RemoveLastImageFromList method is:
1063 % Image *RemoveLastImageFromList(Image **images)
1065 % A description of each parameter follows:
1067 % o images: the image list.
1070 MagickExport Image *RemoveLastImageFromList(Image **images)
1075 assert(images != (Image **) NULL);
1076 if ((*images) == (Image *) NULL)
1077 return((Image *) NULL);
1078 assert((*images)->signature == MagickSignature);
1079 if ((*images)->debug != MagickFalse)
1080 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
1081 (*images)->filename);
1083 while (image->next != (Image *) NULL)
1085 if (image == *images)
1086 *images=(*images)->previous;
1087 if (image->previous != (Image *) NULL)
1089 image->previous->next=(Image *) NULL;
1090 image->previous=(Image *) NULL;
1096 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1100 % R e p l a c e I m a g e I n L i s t %
1104 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1106 % ReplaceImageInList() replaces an image in the list with the given image, or
1107 % list of images. Old image is destroyed. The image list pointer is set to
1108 % point to the first image of the inserted list of images.
1110 % The format of the ReplaceImageInList method is:
1112 % ReplaceImageInList(Image **images,Image *image)
1114 % A description of each parameter follows:
1116 % o images: the list and pointer to image to replace
1118 % o image: the image or image list replacing the original
1121 MagickExport void ReplaceImageInList(Image **images,Image *image)
1123 assert(images != (Image **) NULL);
1124 assert(image != (Image *) NULL);
1125 assert(image->signature == MagickSignature);
1126 if (image->debug != MagickFalse)
1127 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
1128 if ((*images) == (Image *) NULL)
1130 assert((*images)->signature == MagickSignature);
1132 /* link next pointer */
1133 image=GetLastImageInList(image);
1134 image->next=(*images)->next;
1135 if (image->next != (Image *) NULL)
1136 image->next->previous=image;
1138 /* link previous pointer - set image position to first replacement image */
1139 image=GetFirstImageInList(image);
1140 image->previous=(*images)->previous;
1141 if (image->previous != (Image *) NULL)
1142 image->previous->next=image;
1144 /* destroy replaced image */
1145 (void) DestroyImage(*images);
1150 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1154 % 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 %
1158 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1160 % ReplaceImageInListReturnLast() is exactly as ReplaceImageInList() except
1161 % the image pointer is set to the last image in the list.
1163 % This allows you to simply use 'next' to go to the image that follows the
1164 % just replaced image.
1166 % The format of the ReplaceImageInList method is:
1168 % ReplaceImageInListReturnLast(Image **images,Image *image)
1170 % A description of each parameter follows:
1172 % o images: the list and pointer to image to replace
1174 % o image: the image or image list replacing the original
1177 MagickExport void ReplaceImageInListReturnLast(Image **images,Image *image)
1179 assert(images != (Image **) NULL);
1180 assert(image != (Image *) NULL);
1181 assert(image->signature == MagickSignature);
1182 if (image->debug != MagickFalse)
1183 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
1184 if ((*images) == (Image *) NULL)
1186 assert((*images)->signature == MagickSignature);
1188 /* link previous pointer */
1189 image=GetFirstImageInList(image);
1190 image->previous=(*images)->previous;
1191 if (image->previous != (Image *) NULL)
1192 image->previous->next=image;
1194 /* link next pointer - set image position to last replacement image */
1195 image=GetLastImageInList(image);
1196 image->next=(*images)->next;
1197 if (image->next != (Image *) NULL)
1198 image->next->previous=image;
1200 /* destroy replaced image */
1201 (void) DestroyImage(*images);
1206 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1210 % R e v e r s e I m a g e L i s t %
1214 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1216 % ReverseImageList() reverses the order of an image list.
1217 % The list pointer is reset to that start of the re-ordered list.
1219 % The format of the ReverseImageList method is:
1221 % void ReverseImageList(Image **images)
1223 % A description of each parameter follows:
1225 % o images: the image list.
1228 MagickExport void ReverseImageList(Image **images)
1236 assert(images != (Image **) NULL);
1237 if ((*images) == (Image *) NULL)
1239 assert((*images)->signature == MagickSignature);
1240 if ((*images)->debug != MagickFalse)
1241 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
1242 (*images)->filename);
1243 for (p=(*images); p->next != (Image *) NULL; p=p->next) ;
1245 for ( ; p != (Image *) NULL; p=p->next)
1248 p->next=p->previous;
1254 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1258 % S p l i c e I m a g e I n t o L i s t %
1262 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1264 % SpliceImageIntoList() removes 'length' images from the list and replaces
1265 % them with the specified splice. Removed images are returned.
1267 % The format of the SpliceImageIntoList method is:
1269 % SpliceImageIntoList(Image **images,const size_t,
1270 % const Image *splice)
1272 % A description of each parameter follows:
1274 % o images: the image list.
1276 % o length: the length of the image list to remove.
1278 % o splice: Replace the removed image list with this list.
1281 MagickExport Image *SpliceImageIntoList(Image **images,
1282 const size_t length,const Image *splice)
1291 assert(images != (Image **) NULL);
1292 assert(splice != (Image *) NULL);
1293 assert(splice->signature == MagickSignature);
1294 if ((*images) == (Image *) NULL)
1295 return((Image *) NULL);
1296 assert((*images)->signature == MagickSignature);
1297 if ((*images)->debug != MagickFalse)
1298 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
1299 (*images)->filename);
1300 split=SplitImageList(*images);
1301 AppendImageToList(images,splice);
1302 image=(Image *) NULL;
1303 for (i=0; (i < length) && (split != (Image *) NULL); i++)
1304 AppendImageToList(&image,RemoveImageFromList(&split));
1305 AppendImageToList(images,split);
1310 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1314 % S p l i t I m a g e L i s t %
1318 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1320 % SplitImageList() splits an image into two lists, after given image
1321 % The list that was split off is returned, which may be empty.
1323 % The format of the SplitImageList method is:
1325 % Image *SplitImageList(Image *images)
1327 % A description of each parameter follows:
1329 % o images: the image list.
1332 MagickExport Image *SplitImageList(Image *images)
1334 if ((images == (Image *) NULL) || (images->next == (Image *) NULL))
1335 return((Image *) NULL);
1336 images=images->next;
1337 images->previous->next=(Image *) NULL;
1338 images->previous=(Image *) NULL;
1343 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1347 + S y n c I m a g e L i s t %
1351 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1353 % SyncImageList() synchronizes the scene numbers in an image list.
1355 % The format of the SyncImageList method is:
1357 % void SyncImageList(Image *images)
1359 % A description of each parameter follows:
1361 % o images: the image list.
1364 MagickExport void SyncImageList(Image *images)
1370 if (images == (Image *) NULL)
1372 assert(images->signature == MagickSignature);
1373 for (p=images; p != (Image *) NULL; p=p->next)
1375 for (q=p->next; q != (Image *) NULL; q=q->next)
1376 if (p->scene == q->scene)
1378 if (q != (Image *) NULL)
1381 if (p == (Image *) NULL)
1383 for (p=images->next; p != (Image *) NULL; p=p->next)
1384 p->scene=p->previous->scene+1;
1388 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1392 + S y n c N e x t I m a g e I n L i s t %
1396 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1398 % SyncNextImageInList() returns the next image in the list after the blob
1399 % referenced is synchronized with the current image.
1401 % The format of the SyncNextImageInList method is:
1403 % Image *SyncNextImageInList(const Image *images)
1405 % A description of each parameter follows:
1407 % o images: the image list.
1410 MagickExport Image *SyncNextImageInList(const Image *images)
1412 if (images == (Image *) NULL)
1413 return((Image *) NULL);
1414 assert(images->signature == MagickSignature);
1415 if (images->next == (Image *) NULL)
1416 return((Image *) NULL);
1417 if (images->blob != images->next->blob)
1419 DestroyBlob(images->next);
1420 images->next->blob=ReferenceBlob(images->blob);
1422 images->next->compression=images->compression;
1423 images->next->endian=images->endian;
1424 return(images->next);