rom/exec/sumkickdata.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Build checksum for Kickstart.
   6     Lang: english
   7 */
   8
   9 #include <aros/debug.h>
  10 #include "exec_intern.h"
  11 #include <proto/exec.h>
  12
  13 /*****************************************************************************
  14
  15     NAME */
  16
  17         AROS_LH0(ULONG, SumKickData,
  18
  19 /*  SYNOPSIS */
  20         /* void */
  21
  22 /*  LOCATION */
  23         struct ExecBase *, SysBase, 102, Exec)
  24
  25 /*  FUNCTION
  26
  27     INPUTS
  28
  29     RESULT
  30
  31     NOTES
  32
  33     EXAMPLE
  34
  35     BUGS
  36
  37     SEE ALSO
  38
  39     INTERNALS
  40
  41 *****************************************************************************/
  42 {
  43     AROS_LIBFUNC_INIT
  44
  45     ULONG chksum = 0;
  46     BOOL isdata = FALSE;
  47
  48     D(bug("[SumKickData] KickTagPtr 0x%p KickMemPtr 0x%p\n", SysBase->KickTagPtr, SysBase->KickMemPtr));
  49
  50     if (SysBase->KickTagPtr)
  51     {
  52         IPTR *list = SysBase->KickTagPtr;
  53
  54         while(*list)
  55         {
  56             chksum += (ULONG)*list;
  57             D(bug("KickTag: %p: %08x\n", list, *list));
  58
  59             /*
  60              * on amiga, if bit 31 is set then this points to another list of
  61              * modules rather than pointing to a single module. bit 31 is
  62              * inconvenient on architectures where code may be loaded above
  63              * 2GB. on these platforms we assume aligned pointers and use bit
  64              * 0 instead
  65              */
  66             if (*list & RESLIST_NEXT)
  67             {
  68                 list = (IPTR *)(*list & ~RESLIST_NEXT);
  69                 continue;
  70             }
  71             list++;
  72             isdata = TRUE;
  73         }
  74     }
  75
  76     if (SysBase->KickMemPtr)
  77     {
  78         struct MemList *ml = (struct MemList*)SysBase->KickMemPtr;
  79
  80         while (ml)
  81         {
  82             UBYTE i;
  83             ULONG *p = (ULONG*)ml;
  84
  85             for (i = 0; i < sizeof(struct MemList) / sizeof(ULONG); i++)
  86                 chksum += p[i];
  87             D(bug("MemList: %p: %08x %08x %d %08x %08x %08x%08x%08x%08x\n", ml, ml->ml_Node.ln_Succ, ml->ml_Node.ln_Pred, ml->ml_NumEntries,
  88                 ml->ml_ME[0].me_Un.meu_Addr, ml->ml_ME[0].me_Length,
  89                 p[sizeof(struct MemList) / sizeof(ULONG)],
  90                 p[sizeof(struct MemList) / sizeof(ULONG) + 1],
  91                 p[sizeof(struct MemList) / sizeof(ULONG) + 2],
  92                 p[sizeof(struct MemList) / sizeof(ULONG) + 3]));
  93             ml = (struct MemList*)ml->ml_Node.ln_Succ;
  94             isdata = TRUE;
  95         }
  96     }
  97     if (isdata && !chksum)
  98         chksum--;
  99     return chksum;
 100
 101     AROS_LIBFUNC_EXIT
 102 } /* SumKickData */