rom/utility/applytagchanges.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include <exec/types.h>
   9 #include <utility/tagitem.h>
  10 #include <utility/utility.h>
  11 #include <aros/libcall.h>
  12
  13 /*****************************************************************************
  14
  15     NAME */
  16 #include <proto/utility.h>
  17
  18         AROS_LH2(void, ApplyTagChanges,
  19
  20 /*  SYNOPSIS */
  21         AROS_LHA(struct TagItem *, list,       A0),
  22         AROS_LHA(struct TagItem *, changelist, A1),
  23
  24 /*  LOCATION */
  25         struct UtilityBase *, UtilityBase, 31, Utility)
  26
  27 /*  FUNCTION
  28
  29     INPUTS
  30
  31     RESULT
  32
  33     NOTES
  34
  35     EXAMPLE
  36
  37     BUGS
  38
  39     SEE ALSO
  40
  41     INTERNALS
  42
  43     HISTORY
  44
  45 *****************************************************************************/
  46 {
  47     AROS_LIBFUNC_INIT
  48
  49     /* Loop over the whole list */
  50     for(;;)
  51     {
  52         switch(list->ti_Tag)
  53         {
  54             /* End of list */
  55             case TAG_END:
  56                 return;
  57             /* Ignore this tag */
  58             case TAG_IGNORE:
  59                 break;
  60             /* Jump to new tag list */
  61             case TAG_MORE:
  62                 list=(struct TagItem *)list->ti_Data;
  63                 continue;
  64             /* Ignore this and skip the next ti_Data tags */
  65             case TAG_SKIP:
  66                 list+=list->ti_Data;
  67                 break;
  68             /* Normal tag */
  69             default:
  70             {
  71                 struct TagItem *tagitem;
  72                 /* Try to find it in the changelist */
  73                 tagitem=FindTagItem(list->ti_Tag,changelist);
  74
  75                 if(tagitem!=NULL)
  76                     /* Found it. Replace it. */
  77                     list->ti_Data=tagitem->ti_Data;
  78                 break;
  79             }
  80         }
  81         /* Got to next tag */
  82         list++;
  83     }
  84     AROS_LIBFUNC_EXIT
  85 } /* ApplyTagChanges */