sys/boot/pc32/libi386/biosmem.c

   1 /*-
   2  * Copyright (c) 1998 Michael Smith <msmith@freebsd.org>
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  *
  26  * $FreeBSD: src/sys/boot/i386/libi386/biosmem.c,v 1.7 2003/08/25 23:28:31 obrien Exp $
  27  * $DragonFly: src/sys/boot/pc32/libi386/biosmem.c,v 1.4 2004/06/26 02:26:22 dillon Exp $
  28  */
  29 /*
  30  * Obtain memory configuration information from the BIOS
  31  */
  32 #include <stand.h>
  33 #include "libi386.h"
  34 #include "btxv86.h"
  35
  36 vm_offset_t     memtop;
  37 u_int32_t       bios_basemem, bios_extmem, bios_howmem;
  38
  39 #define SMAPSIG 0x534D4150
  40
  41 struct smap {
  42     u_int64_t   base;
  43     u_int64_t   length;
  44     u_int32_t   type;
  45 } __packed;
  46
  47 static struct smap smap;
  48
  49 void
  50 bios_getmem(void)
  51 {
  52
  53     /* Parse system memory map */
  54     v86.ebx = 0;
  55     do {
  56 #ifdef COMCONSOLE_DEBUG
  57         printf("GET SMAP %d: ", v86.ebx);
  58 #endif
  59         v86.ctl = V86_FLAGS;
  60         v86.addr = 0x15;                /* int 0x15 function 0xe820*/
  61         v86.eax = 0xe820;
  62         v86.ecx = sizeof(struct smap);
  63         v86.edx = SMAPSIG;
  64         v86.es = VTOPSEG(&smap);
  65         v86.edi = VTOPOFF(&smap);
  66         v86int();
  67 #ifdef COMCONSOLE_DEBUG
  68         printf("RESULT: EFL=%04x EAX=%08x SMAPTYPE %d BASE %08x%08x LEN %08x%08x\n",
  69                 v86.efl, v86.eax, smap.type,
  70                 (int)(smap.base >> 32), (int)smap.base,
  71                 (int)(smap.length >> 32), (int)smap.length);
  72 #endif
  73         if ((v86.efl & 1) || (v86.eax != SMAPSIG))
  74             break;
  75         /* look for a low-memory segment that's large enough */
  76         if ((smap.type == 1) && (smap.base == 0) && (smap.length >= (512 * 1024))) {
  77             bios_basemem = smap.length;
  78             bios_howmem = 1;
  79         }
  80         /* look for the first segment in 'extended' memory */
  81         if ((smap.type == 1) && (smap.base == 0x100000)) {
  82             bios_extmem = smap.length;
  83         }
  84     } while (v86.ebx != 0);
  85
  86     /* Fall back to the old compatibility function for base memory */
  87     if (bios_basemem == 0) {
  88         v86.ctl = 0;
  89         v86.addr = 0x12;                /* int 0x12 */
  90         v86int();
  91
  92         bios_basemem = (v86.eax & 0xffff) * 1024;
  93         bios_howmem = 2;
  94     }
  95
  96     /* Fall back through several compatibility functions for extended memory */
  97     if (bios_extmem == 0) {
  98         v86.ctl = V86_FLAGS;
  99         v86.addr = 0x15;                /* int 0x15 function 0xe801*/
 100         v86.eax = 0xe801;
 101         v86int();
 102         if (!(v86.efl & 1)) {
 103             bios_extmem = ((v86.ecx & 0xffff) + ((v86.edx & 0xffff) * 64)) * 1024;
 104         }
 105     }
 106     if (bios_extmem == 0) {
 107         v86.ctl = 0;
 108         v86.addr = 0x15;                /* int 0x15 function 0x88*/
 109         v86.eax = 0x8800;
 110         v86int();
 111         bios_extmem = (v86.eax & 0xffff) * 1024;
 112     }
 113
 114     /* Set memtop to actual top of memory */
 115     memtop = 0x100000 + bios_extmem;
 116
 117 }
 118