v86 0.3.7 → 0.5.10

package/bios/seabios/src/std/vga.h

@@ -1,63 +0,0 @@
-#ifndef __VGA_H
-#define __VGA_H
-// Standard structure definitions for vgabios video tables
-
-#include "types.h" // u8
-
-// standard BIOS Video Parameter Table
-struct video_param_s {
-    u8 twidth;
-    u8 theightm1;
-    u8 cheight;
-    u16 slength;
-    u8 sequ_regs[4];
-    u8 miscreg;
-    u8 crtc_regs[25];
-    u8 actl_regs[20];
-    u8 grdc_regs[9];
-} PACKED;
-
-// Standard Video Save Pointer Table
-struct video_save_pointer_s {
-    struct segoff_s videoparam;
-    struct segoff_s paramdynamicsave;
-    struct segoff_s textcharset;
-    struct segoff_s graphcharset;
-    struct segoff_s secsavepointer;
-    u8 reserved[8];
-} PACKED;
-
-// Data returned by int101B
-struct video_func_static {
-    u32 modes;
-    u8 reserved_0x04[3];
-    u8 scanlines;
-    u8 cblocks;
-    u8 active_cblocks;
-    u16 misc_flags;
-    u8 reserved_0x0c[2];
-    u8 save_flags;
-    u8 reserved_0x0f;
-} PACKED;
-
-struct video_func_info {
-    struct segoff_s static_functionality;
-    u8 bda_0x49[30];
-    u8 bda_0x84[3];
-    u8 dcc_index;
-    u8 dcc_alt;
-    u16 colors;
-    u8 pages;
-    u8 scan_lines;
-    u8 primary_char;
-    u8 secondar_char;
-    u8 misc;
-    u8 non_vga_mode;
-    u8 reserved_2f[2];
-    u8 video_mem;
-    u8 save_flags;
-    u8 disp_info;
-    u8 reserved_34[12];
-} PACKED;
-
-#endif // vga.h

package/bios/seabios/src/string.c

@@ -1,251 +0,0 @@
-// String manipulation functions.
-//
-// Copyright (C) 2008-2013  Kevin O'Connor <kevin@koconnor.net>
-//
-// This file may be distributed under the terms of the GNU LGPLv3 license.
-
-#include "stacks.h" // yield
-#include "string.h" // memcpy
-#include "farptr.h" // SET_SEG
-
-
-/****************************************************************
- * String ops
- ****************************************************************/
-
-// Sum the bytes in the specified area.
-u8
-checksum_far(u16 buf_seg, void *buf_far, u32 len)
-{
-    SET_SEG(ES, buf_seg);
-    u32 i;
-    u8 sum = 0;
-    for (i=0; i<len; i++)
-        sum += GET_VAR(ES, ((u8*)buf_far)[i]);
-    return sum;
-}
-
-u8
-checksum(void *buf, u32 len)
-{
-    return checksum_far(GET_SEG(SS), buf, len);
-}
-
-size_t
-strlen(const char *s)
-{
-    if (__builtin_constant_p(s))
-        return __builtin_strlen(s);
-    const char *p = s;
-    while (*p)
-        p++;
-    return p-s;
-}
-
-int
-memcmp_far(u16 s1seg, const void *s1, u16 s2seg, const void *s2, size_t n)
-{
-    while (n--) {
-        int d = GET_FARVAR(s1seg, *(u8*)s1) - GET_FARVAR(s2seg, *(u8*)s2);
-        if (d)
-            return d < 0 ? -1 : 1;
-        s1++;
-        s2++;
-    }
-    return 0;
-}
-
-// Compare two areas of memory.
-int
-memcmp(const void *s1, const void *s2, size_t n)
-{
-    while (n) {
-        if (*(u8*)s1 != *(u8*)s2)
-            return *(u8*)s1 < *(u8*)s2 ? -1 : 1;
-        s1++;
-        s2++;
-        n--;
-    }
-    return 0;
-}
-
-// Compare two strings.
-int
-strcmp(const char *s1, const char *s2)
-{
-    for (;;) {
-        if (*s1 != *s2)
-            return *s1 < *s2 ? -1 : 1;
-        if (! *s1)
-            return 0;
-        s1++;
-        s2++;
-    }
-}
-
-inline void
-memset_far(u16 d_seg, void *d_far, u8 c, size_t len)
-{
-    SET_SEG(ES, d_seg);
-    asm volatile(
-        "rep stosb %%es:(%%di)"
-        : "+c"(len), "+D"(d_far)
-        : "a"(c), "m" (__segment_ES)
-        : "cc", "memory");
-}
-
-inline void
-memset16_far(u16 d_seg, void *d_far, u16 c, size_t len)
-{
-    len /= 2;
-    SET_SEG(ES, d_seg);
-    asm volatile(
-        "rep stosw %%es:(%%di)"
-        : "+c"(len), "+D"(d_far)
-        : "a"(c), "m" (__segment_ES)
-        : "cc", "memory");
-}
-
-void *
-memset(void *s, int c, size_t n)
-{
-    while (n)
-        ((char *)s)[--n] = c;
-    return s;
-}
-
-void memset_fl(void *ptr, u8 val, size_t size)
-{
-    if (MODESEGMENT)
-        memset_far(FLATPTR_TO_SEG(ptr), (void*)(FLATPTR_TO_OFFSET(ptr)),
-                   val, size);
-    else
-        memset(ptr, val, size);
-}
-
-inline void
-memcpy_far(u16 d_seg, void *d_far, u16 s_seg, const void *s_far, size_t len)
-{
-    SET_SEG(ES, d_seg);
-    u16 bkup_ds;
-    asm volatile(
-        "movw %%ds, %w0\n"
-        "movw %w4, %%ds\n"
-        "rep movsb (%%si),%%es:(%%di)\n"
-        "movw %w0, %%ds"
-        : "=&r"(bkup_ds), "+c"(len), "+S"(s_far), "+D"(d_far)
-        : "r"(s_seg), "m" (__segment_ES)
-        : "cc", "memory");
-}
-
-inline void
-memcpy_fl(void *d_fl, const void *s_fl, size_t len)
-{
-    if (MODESEGMENT)
-        memcpy_far(FLATPTR_TO_SEG(d_fl), (void*)FLATPTR_TO_OFFSET(d_fl)
-                   , FLATPTR_TO_SEG(s_fl), (void*)FLATPTR_TO_OFFSET(s_fl)
-                   , len);
-    else
-        memcpy(d_fl, s_fl, len);
-}
-
-void *
-#undef memcpy
-memcpy(void *d1, const void *s1, size_t len)
-#if MODESEGMENT == 0
-#define memcpy __builtin_memcpy
-#endif
-{
-    SET_SEG(ES, GET_SEG(SS));
-    void *d = d1;
-    if (((u32)d1 | (u32)s1 | len) & 3) {
-        // non-aligned memcpy
-        asm volatile(
-            "rep movsb (%%esi),%%es:(%%edi)"
-            : "+c"(len), "+S"(s1), "+D"(d)
-            : "m" (__segment_ES) : "cc", "memory");
-        return d1;
-    }
-    // Common case - use 4-byte copy
-    len /= 4;
-    asm volatile(
-        "rep movsl (%%esi),%%es:(%%edi)"
-        : "+c"(len), "+S"(s1), "+D"(d)
-        : "m" (__segment_ES) : "cc", "memory");
-    return d1;
-}
-
-// Copy to/from memory mapped IO.  IO mem is very slow, so yield
-// periodically.
-void
-iomemcpy(void *d, const void *s, u32 len)
-{
-    ASSERT32FLAT();
-    yield();
-    while (len > 3) {
-        u32 copylen = len;
-        if (copylen > 2048)
-            copylen = 2048;
-        copylen /= 4;
-        len -= copylen * 4;
-        asm volatile(
-            "rep movsl (%%esi),%%es:(%%edi)"
-            : "+c"(copylen), "+S"(s), "+D"(d)
-            : : "cc", "memory");
-        yield();
-    }
-    if (len)
-        // Copy any remaining bytes.
-        memcpy(d, s, len);
-}
-
-void *
-memmove(void *d, const void *s, size_t len)
-{
-    if (s >= d)
-        return memcpy(d, s, len);
-
-    d += len-1;
-    s += len-1;
-    while (len--) {
-        *(char*)d = *(char*)s;
-        d--;
-        s--;
-    }
-
-    return d;
-}
-
-// Copy a string - truncating it if necessary.
-char *
-strtcpy(char *dest, const char *src, size_t len)
-{
-    char *d = dest;
-    while (--len && *src != '\0')
-        *d++ = *src++;
-    *d = '\0';
-    return dest;
-}
-
-// locate first occurrence of character c in the string s
-char *
-strchr(const char *s, int c)
-{
-    for (; *s; s++)
-        if (*s == c)
-            return (char*)s;
-    return NULL;
-}
-
-// Remove any trailing blank characters (spaces, new lines, carriage returns)
-char *
-nullTrailingSpace(char *buf)
-{
-    int len = strlen(buf);
-    char *end = &buf[len-1];
-    while (end >= buf && *end <= ' ')
-        *(end--) = '\0';
-    while (*buf && *buf <= ' ')
-        buf++;
-    return buf;
-}

package/bios/seabios/src/string.h

@@ -1,31 +0,0 @@
-// String manipulation function defs.
-#ifndef __STRING_H
-#define __STRING_H
-
-#include "types.h" // u32
-
-// string.c
-u8 checksum_far(u16 buf_seg, void *buf_far, u32 len);
-u8 checksum(void *buf, u32 len);
-size_t strlen(const char *s);
-int memcmp_far(u16 s1seg, const void *s1, u16 s2seg, const void *s2, size_t n);
-int memcmp(const void *s1, const void *s2, size_t n);
-int strcmp(const char *s1, const char *s2);
-void memset_far(u16 d_seg, void *d_far, u8 c, size_t len);
-void memset16_far(u16 d_seg, void *d_far, u16 c, size_t len);
-void *memset(void *s, int c, size_t n);
-void memset_fl(void *ptr, u8 val, size_t size);
-void memcpy_far(u16 d_seg, void *d_far
-                , u16 s_seg, const void *s_far, size_t len);
-void memcpy_fl(void *d_fl, const void *s_fl, size_t len);
-void *memcpy(void *d1, const void *s1, size_t len);
-#if MODESEGMENT == 0
-#define memcpy __builtin_memcpy
-#endif
-void iomemcpy(void *d, const void *s, u32 len);
-void *memmove(void *d, const void *s, size_t len);
-char *strtcpy(char *dest, const char *src, size_t len);
-char *strchr(const char *s, int c);
-char *nullTrailingSpace(char *buf);
-
-#endif // string.h

package/bios/seabios/src/system.c

@@ -1,357 +0,0 @@
-// Handler for int 0x15 "system" calls
-//
-// Copyright (C) 2008  Kevin O'Connor <kevin@koconnor.net>
-// Copyright (C) 2002  MandrakeSoft S.A.
-//
-// This file may be distributed under the terms of the GNU LGPLv3 license.
-
-#include "biosvar.h" // GET_GLOBAL
-#include "bregs.h" // struct bregs
-#include "e820map.h" // E820_RAM
-#include "hw/pic.h" // pic_reset
-#include "malloc.h" // LegacyRamSize
-#include "output.h" // debug_enter
-#include "string.h" // memcpy_far
-#include "util.h" // handle_1553
-#include "x86.h" // set_a20
-
-static void
-handle_152400(struct bregs *regs)
-{
-    set_a20(0);
-    set_code_success(regs);
-}
-
-static void
-handle_152401(struct bregs *regs)
-{
-    set_a20(1);
-    set_code_success(regs);
-}
-
-static void
-handle_152402(struct bregs *regs)
-{
-    regs->al = get_a20();
-    set_code_success(regs);
-}
-
-static void
-handle_152403(struct bregs *regs)
-{
-    regs->bx = 3;
-    set_code_success(regs);
-}
-
-static void
-handle_1524XX(struct bregs *regs)
-{
-    set_code_unimplemented(regs, RET_EUNSUPPORTED);
-}
-
-static void
-handle_1524(struct bregs *regs)
-{
-    switch (regs->al) {
-    case 0x00: handle_152400(regs); break;
-    case 0x01: handle_152401(regs); break;
-    case 0x02: handle_152402(regs); break;
-    case 0x03: handle_152403(regs); break;
-    default:   handle_1524XX(regs); break;
-    }
-}
-
-// removable media eject
-static void
-handle_1552(struct bregs *regs)
-{
-    set_code_success(regs);
-}
-
-static void
-handle_1587(struct bregs *regs)
-{
-    // +++ should probably have descriptor checks
-    // +++ should have exception handlers
-
-    u8 prev_a20_enable = set_a20(1); // enable A20 line
-
-    // 128K max of transfer on 386+ ???
-    // source == destination ???
-
-    // ES:SI points to descriptor table
-    // offset   use     initially  comments
-    // ==============================================
-    // 00..07   Unused  zeros      Null descriptor
-    // 08..0f   GDT     zeros      filled in by BIOS
-    // 10..17   source  ssssssss   source of data
-    // 18..1f   dest    dddddddd   destination of data
-    // 20..27   CS      zeros      filled in by BIOS
-    // 28..2f   SS      zeros      filled in by BIOS
-
-// check for access rights of source & dest here
-
-    // Initialize GDT descriptor
-    u64 *gdt_far = (void*)(regs->si + 0);
-    u16 gdt_seg = regs->es;
-    u32 loc = (u32)MAKE_FLATPTR(gdt_seg, gdt_far);
-    SET_FARVAR(gdt_seg, gdt_far[1], GDT_DATA | GDT_LIMIT((6*sizeof(u64))-1)
-               | GDT_BASE(loc));
-    // Initialize CS descriptor
-    u64 lim = GDT_LIMIT(0x0ffff);
-    if (in_post())
-        lim = GDT_GRANLIMIT(0xffffffff);
-    SET_FARVAR(gdt_seg, gdt_far[4], GDT_CODE | lim | GDT_BASE(BUILD_BIOS_ADDR));
-    // Initialize SS descriptor
-    loc = (u32)MAKE_FLATPTR(GET_SEG(SS), 0);
-    SET_FARVAR(gdt_seg, gdt_far[5], GDT_DATA | lim | GDT_BASE(loc));
-
-    SET_SEG(ES, gdt_seg);
-    u16 count = regs->cx, si = 0, di = 0;
-    asm volatile(
-        // Load new descriptor tables
-        "  lgdtw %%es:(1<<3)(%%eax)\n"
-        "  lidtw %%cs:pmode_IDT_info\n"
-
-        // Enable protected mode
-        "  movl %%cr0, %%eax\n"
-        "  orl $" __stringify(CR0_PE) ", %%eax\n"
-        "  movl %%eax, %%cr0\n"
-
-        // far jump to flush CPU queue after transition to protected mode
-        "  ljmpw $(4<<3), $1f\n"
-
-        // GDT points to valid descriptor table, now load DS, ES
-        "1:movw $(2<<3), %%ax\n" // 2nd descriptor in table, TI=GDT, RPL=00
-        "  movw %%ax, %%ds\n"
-        "  movw $(3<<3), %%ax\n" // 3rd descriptor in table, TI=GDT, RPL=00
-        "  movw %%ax, %%es\n"
-
-        // memcpy CX words using 32bit memcpy if applicable
-        "  testw $1, %%cx\n"
-        "  jnz 3f\n"
-        "  shrw $1, %%cx\n"
-        "  rep movsl %%ds:(%%si), %%es:(%%di)\n"
-
-        // Restore DS and ES segment limits to 0xffff
-        "2:movw $(5<<3), %%ax\n" // 5th descriptor in table (SS)
-        "  movw %%ax, %%ds\n"
-        "  movw %%ax, %%es\n"
-
-        // Disable protected mode
-        "  movl %%cr0, %%eax\n"
-        "  andl $~" __stringify(CR0_PE) ", %%eax\n"
-        "  movl %%eax, %%cr0\n"
-
-        // far jump to flush CPU queue after transition to real mode
-        "  ljmpw $" __stringify(SEG_BIOS) ", $4f\n"
-
-        // Slower 16bit copy method
-        "3:rep movsw %%ds:(%%si), %%es:(%%di)\n"
-        "  jmp 2b\n"
-
-        // restore IDT to normal real-mode defaults
-        "4:lidtw %%cs:rmode_IDT_info\n"
-
-        // Restore %ds (from %ss)
-        "  movw %%ss, %%ax\n"
-        "  movw %%ax, %%ds\n"
-        : "+a" (gdt_far), "+c"(count), "+m" (__segment_ES)
-        : "S" (si), "D" (di)
-        : "cc");
-
-    set_a20(prev_a20_enable);
-
-    set_code_success(regs);
-}
-
-// Get the amount of extended memory (above 1M)
-static void
-handle_1588(struct bregs *regs)
-{
-    u32 rs = GET_GLOBAL(LegacyRamSize);
-
-    // According to Ralf Brown's interrupt the limit should be 15M,
-    // but real machines mostly return max. 63M.
-    if (rs > 64*1024*1024)
-        regs->ax = 63 * 1024;
-    else
-        regs->ax = (rs - 1*1024*1024) / 1024;
-    set_success(regs);
-}
-
-// Switch to protected mode
-void VISIBLE16
-handle_1589(struct bregs *regs)
-{
-    debug_enter(regs, DEBUG_HDL_15);
-    set_a20(1);
-
-    pic_reset(regs->bl, regs->bh);
-
-    u64 *gdt_far = (void*)(regs->si + 0);
-    u16 gdt_seg = regs->es;
-    SET_FARVAR(gdt_seg, gdt_far[7], GDT_CODE | GDT_LIMIT(BUILD_BIOS_SIZE-1)
-               | GDT_BASE(BUILD_BIOS_ADDR));
-
-    regs->ds = 3<<3; // 3rd gdt descriptor is %ds
-    regs->es = 4<<3; // 4th gdt descriptor is %es
-    regs->code.seg = 6<<3; // 6th gdt descriptor is %cs
-
-    set_code_success(regs);
-
-    asm volatile(
-        // Load new descriptor tables
-        "  lgdtw %%es:(1<<3)(%%si)\n"
-        "  lidtw %%es:(2<<3)(%%si)\n"
-
-        // Enable protected mode
-        "  movl %%cr0, %%eax\n"
-        "  orl $" __stringify(CR0_PE) ", %%eax\n"
-        "  movl %%eax, %%cr0\n"
-
-        // far jump to flush CPU queue after transition to protected mode
-        "  ljmpw $(7<<3), $1f\n"
-
-        // GDT points to valid descriptor table, now load SS
-        "1:movw $(5<<3), %%ax\n"
-        "  movw %%ax, %%ds\n"
-        "  movw %%ax, %%ss\n"
-        :
-        : "S"(gdt_far), "m" (__segment_ES)
-        : "eax", "cc");
-}
-
-// Device busy interrupt.  Called by Int 16h when no key available
-static void
-handle_1590(struct bregs *regs)
-{
-}
-
-// Interrupt complete.  Called by Int 16h when key becomes available
-static void
-handle_1591(struct bregs *regs)
-{
-}
-
-// keyboard intercept
-static void
-handle_154f(struct bregs *regs)
-{
-    set_invalid_silent(regs);
-}
-
-static void
-handle_15c0(struct bregs *regs)
-{
-    regs->es = SEG_BIOS;
-    regs->bx = (u32)&BIOS_CONFIG_TABLE;
-    set_code_success(regs);
-}
-
-static void
-handle_15c1(struct bregs *regs)
-{
-    regs->es = get_ebda_seg();
-    set_success(regs);
-}
-
-static void
-handle_15e801(struct bregs *regs)
-{
-    // my real system sets ax and bx to 0
-    // this is confirmed by Ralph Brown list
-    // but syslinux v1.48 is known to behave
-    // strangely if ax is set to 0
-    // regs.u.r16.ax = 0;
-    // regs.u.r16.bx = 0;
-
-    u32 rs = GET_GLOBAL(LegacyRamSize);
-
-    // Get the amount of extended memory (above 1M)
-    if (rs > 16*1024*1024) {
-        // limit to 15M
-        regs->cx = 15*1024;
-        // Get the amount of extended memory above 16M in 64k blocks
-        regs->dx = (rs - 16*1024*1024) / (64*1024);
-    } else {
-        regs->cx = (rs - 1*1024*1024) / 1024;
-        regs->dx = 0;
-    }
-
-    // Set configured memory equal to extended memory
-    regs->ax = regs->cx;
-    regs->bx = regs->dx;
-
-    set_success(regs);
-}
-
-static void
-handle_15e820(struct bregs *regs)
-{
-    int count = GET_GLOBAL(e820_count);
-    if (regs->edx != 0x534D4150 || regs->bx >= count
-        || regs->ecx < sizeof(e820_list[0])) {
-        set_code_invalid(regs, RET_EUNSUPPORTED);
-        return;
-    }
-
-    memcpy_far(regs->es, (void*)(regs->di+0)
-               , get_global_seg(), &e820_list[regs->bx]
-               , sizeof(e820_list[0]));
-    if (regs->bx == count-1)
-        regs->ebx = 0;
-    else
-        regs->ebx++;
-    regs->eax = 0x534D4150;
-    regs->ecx = sizeof(e820_list[0]);
-    set_success(regs);
-}
-
-static void
-handle_15e8XX(struct bregs *regs)
-{
-    set_code_unimplemented(regs, RET_EUNSUPPORTED);
-}
-
-static void
-handle_15e8(struct bregs *regs)
-{
-    switch (regs->al) {
-    case 0x01: handle_15e801(regs); break;
-    case 0x20: handle_15e820(regs); break;
-    default:   handle_15e8XX(regs); break;
-    }
-}
-
-static void
-handle_15XX(struct bregs *regs)
-{
-    set_code_unimplemented(regs, RET_EUNSUPPORTED);
-}
-
-// INT 15h System Services Entry Point
-void VISIBLE16
-handle_15(struct bregs *regs)
-{
-    debug_enter(regs, DEBUG_HDL_15);
-    switch (regs->ah) {
-    case 0x24: handle_1524(regs); break;
-    case 0x4f: handle_154f(regs); break;
-    case 0x52: handle_1552(regs); break;
-    case 0x53: handle_1553(regs); break;
-    case 0x5f: handle_155f(regs); break;
-    case 0x7f: handle_157f(regs); break;
-    case 0x83: handle_1583(regs); break;
-    case 0x86: handle_1586(regs); break;
-    case 0x87: handle_1587(regs); break;
-    case 0x88: handle_1588(regs); break;
-    case 0x90: handle_1590(regs); break;
-    case 0x91: handle_1591(regs); break;
-    case 0xc0: handle_15c0(regs); break;
-    case 0xc1: handle_15c1(regs); break;
-    case 0xc2: handle_15c2(regs); break;
-    case 0xe8: handle_15e8(regs); break;
-    default:   handle_15XX(regs); break;
-    }
-}