workbench/tools/ShowConfig.c

   1 #include <aros/bootloader.h>
   2 #include <exec/execbase.h>
   3 #include <exec/memory.h>
   4 #include <proto/aros.h>
   5 #include <proto/bootloader.h>
   6 #include <proto/exec.h>
   7 #include <proto/utility.h>
   8
   9 #include <stdio.h>
  10
  11 ULONG ExtUDivMod32(ULONG a, ULONG b, ULONG *mod)
  12 {
  13     *mod = a % b;
  14
  15     return a/b;
  16 }
  17
  18 void PrintNum(ULONG num)
  19 {
  20     /* MBytes ? */
  21     if(num > 1023)
  22     {
  23         ULONG  x, xx;
  24         char* fmt = "meg";
  25
  26         /* GBytes ? */
  27         if(num > 0xfffff)
  28         {
  29             num >>= 10;
  30             fmt = "gig";
  31         }
  32
  33         num = ExtUDivMod32(UMult32(num, 100) >> 10, 100, &x);
  34
  35         /* round */
  36         x = ExtUDivMod32(x, 10, &xx);
  37
  38         if(xx > 4)
  39         {
  40             if(++x > 9)
  41             {
  42                 x = 0;
  43                 num++;
  44             }
  45         }
  46
  47         printf("%d.%d %s", num, x, fmt);
  48     }
  49     else
  50     {
  51         printf("%d K", num);
  52     }
  53 }
  54
  55 ULONG ComputeKBytes(APTR a, APTR b)
  56 {
  57     IPTR result = b - a;
  58
  59     return (ULONG)(result >> 10);
  60 }
  61
  62 int __nocommandline;
  63 char __stdiowin[]="CON://700//ShowConfig/AUTO/CLOSE/WAIT";
  64
  65 int main()
  66 {
  67     struct MemHeader *mh;
  68     APTR BootLoaderBase;
  69     STRPTR bootldr;
  70     struct List *args;
  71     struct Node *n;
  72
  73     printf("VERS:\tAROS version %d.%d, Exec version %d.%d\n", ArosBase->lib_Version, ArosBase->lib_Revision,
  74            SysBase->LibNode.lib_Version, SysBase->LibNode.lib_Revision);
  75
  76     printf("RAM:");
  77     for (mh = (struct MemHeader *)SysBase->MemList.lh_Head; mh->mh_Node.ln_Succ; mh = (struct MemHeader *)mh->mh_Node.ln_Succ) {
  78         char *memtype = "ROM";
  79
  80         if (mh->mh_Attributes & MEMF_CHIP)
  81             memtype = "CHIP";
  82         if (mh->mh_Attributes & MEMF_FAST)
  83             memtype = "FAST";
  84         printf("\tNode Type 0x%X, Attributes 0x%X (%s), at %p-%p (", mh->mh_Node.ln_Type, mh->mh_Attributes, memtype, mh->mh_Lower, mh->mh_Upper);
  85         PrintNum(ComputeKBytes(mh->mh_Lower, mh->mh_Upper));
  86         printf(")\n");
  87     }
  88
  89     BootLoaderBase = OpenResource("bootloader.resource");
  90     if (BootLoaderBase) {
  91         bootldr = GetBootInfo(BL_LoaderName);
  92
  93         if (bootldr)
  94             printf("BOOTLDR:\t%s\n", bootldr);
  95
  96         args = GetBootInfo(BL_Args);
  97         if (args) {
  98             printf("ARGS:\t");
  99             for (n = args->lh_Head; n->ln_Succ; n = n->ln_Succ) {
 100                 printf("%s ", n->ln_Name);
 101                 printf("\n");
 102             }
 103         }
 104     }
 105     return 0;
 106 }