arch/.unmaintained/amiga/boot/showvecs.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: prints Kick Vector pointers
   6     Lang: english
   7 */
   8
   9 #include <exec/types.h>
  10 #include <exec/execbase.h>
  11 #include <exec/resident.h>
  12 #include <exec/memory.h>
  13 #include <proto/dos.h>
  14 #include <proto/exec.h>
  15 #include <stdio.h>
  16
  17 extern struct ExecBase *SysBase;
  18
  19 const UBYTE ver[] = "$VER: showvecs 41.2 (14.3.1997)\n\r";
  20
  21 int main(void)
  22 {
  23     Printf("KickTagPtr = 0x%08lx\nKickMemPtr = 0x%08lx\nKickChkSum = 0x%08lx\n",
  24                 (ULONG)SysBase->KickTagPtr, (ULONG)SysBase->KickMemPtr, (ULONG)SysBase->KickCheckSum);
  25
  26     if(SumKickData() == (ULONG)SysBase->KickCheckSum)
  27     {
  28         if(SysBase->KickTagPtr)
  29         {
  30             ULONG *list;
  31
  32             Printf("Modules in use:\n");
  33
  34             list = SysBase->KickTagPtr;
  35
  36             while(*list)
  37             {
  38                 if(*list & 0x80000000) list = (ULONG *)(*list & 0x7fffffff);
  39                 Printf("\t0x%08lx\t%s\n", *list, (ULONG)((struct Resident *)*list)->rt_IdString);
  40                 list++;
  41             }
  42         }
  43
  44         if(SysBase->KickMemPtr)
  45         {
  46             struct MemList *memlist;
  47
  48             Printf("MemLists in use:\n");
  49
  50             memlist = (struct MemList *)SysBase->KickMemPtr;
  51
  52             while(memlist)
  53             {
  54                 struct MemEntry *me = &memlist->ml_ME[0];
  55                 UWORD i;
  56
  57                 Printf("ml_NumEntries = %ld\n", memlist->ml_NumEntries);
  58
  59                 for(i = 0; i < memlist->ml_NumEntries; i++)
  60                 {
  61                     Printf("ml_ME[%2ld] = 0x%08lx size 0x%08lx (%8ld)\n",
  62                      i, (ULONG)me->me_Addr, me->me_Length, me->me_Length);
  63                     me = (struct MemEntry *)((ULONG)me + (ULONG)sizeof(struct MemEntry));
  64                 }
  65
  66                 memlist = (struct MemList *)memlist->ml_Node.ln_Succ;
  67             }
  68         }
  69     }
  70     else
  71     {
  72         /* Don't print message if all vectors are NULL */
  73         if(SysBase->KickMemPtr || SysBase->KickTagPtr || SysBase->KickCheckSum)
  74             Printf("Vectors have incorrect checksum.\n");
  75     }
  76
  77     return(0);
  78 }