com32/modules/meminfo.c

   1 /* ----------------------------------------------------------------------- *
   2  *
   3  *   Copyright 2008 H. Peter Anvin - All Rights Reserved
   4  *
   5  *   This program is free software; you can redistribute it and/or modify
   6  *   it under the terms of the GNU General Public License as published by
   7  *   the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
   8  *   Boston MA 02110-1301, USA; either version 2 of the License, or
   9  *   (at your option) any later version; incorporated herein by reference.
  10  *
  11  * ----------------------------------------------------------------------- */
  12
  13 /*
  14  * meminfo.c
  15  *
  16  * Dump the memory map of the system
  17  */
  18 #include <inttypes.h>
  19 #include <stdio.h>
  20 #include <string.h>
  21 #include <console.h>
  22 #include <com32.h>
  23
  24 struct e820_data {
  25   uint64_t base;
  26   uint64_t len;
  27   uint32_t type;
  28 } __attribute__((packed));
  29
  30 static const char * const e820_types[] = {
  31   "usable",
  32   "reserved",
  33   "ACPI reclaim",
  34   "ACPI NVS",
  35 };
  36
  37 static void dump_e820(void)
  38 {
  39   com32sys_t ireg, oreg;
  40   struct e820_data ed;
  41   uint32_t type;
  42
  43   memset(&ireg, 0, sizeof ireg);
  44
  45   ireg.eax.w[0] = 0xe820;
  46   ireg.edx.l    = 0x534d4150;
  47   ireg.ecx.l    = sizeof(struct e820_data);
  48   ireg.edi.w[0] = OFFS(__com32.cs_bounce);
  49   ireg.es       = SEG(__com32.cs_bounce);
  50
  51   do {
  52     __intcall(0x15, &ireg, &oreg);
  53     if (oreg.eflags.l & EFLAGS_CF ||
  54         oreg.eax.l != 0x534d4150)
  55       break;
  56
  57     memcpy(&ed, __com32.cs_bounce, sizeof ed);
  58
  59     /* ebx base length end type */
  60     printf("%8x %016llx %016llx %016llx %x",
  61            ireg.ebx.l, ed.base, ed.len, ed.base+ed.len, ed.type);
  62
  63     type = ed.type - 1;
  64     if (type < sizeof(e820_types)/sizeof(e820_types[0]))
  65       printf(" %s", e820_types[type]);
  66
  67     putchar('\n');
  68
  69     ireg.ebx.l = oreg.ebx.l;
  70   } while (ireg.ebx.l);
  71 }
  72
  73 static void dump_legacy(void)
  74 {
  75   com32sys_t ireg, oreg;
  76   uint16_t dosram = *(uint16_t *)0x413;
  77   struct { uint16_t offs, seg; } * const ivt = (void *)0;
  78
  79   memset(&ireg, 0, sizeof ireg);
  80
  81   __intcall(0x12, &ireg, &oreg);
  82
  83   printf("INT 15h = %04x:%04x  DOS RAM: %dK (0x%05x)  INT 12h: %dK (0x%05x)\n",
  84          ivt[0x15].seg, ivt[0x15].offs,
  85          dosram, dosram << 10,
  86          oreg.eax.w[0], oreg.eax.w[0] << 10);
  87
  88   ireg.eax.b[1] = 0x88;
  89   __intcall(0x15, &ireg, &oreg);
  90
  91   printf("INT 15 88: 0x%04x (%uK)  ",
  92          oreg.eax.w[0], oreg.eax.w[0]);
  93
  94   ireg.eax.w[0] = 0xe801;
  95   __intcall(0x15, &ireg, &oreg);
  96
  97   printf("INT 15 E801: 0x%04x (%uK) 0x%04x (%uK)\n",
  98          oreg.ecx.w[0], oreg.ecx.w[0], oreg.edx.w[0], oreg.edx.w[0] << 6);
  99 }
 100
 101 int main(void)
 102 {
 103   openconsole(&dev_null_r, &dev_stdcon_w);
 104
 105   dump_legacy();
 106   dump_e820();
 107
 108   return 0;
 109 }