v86/src/vga.js
2013-11-06 01:12:55 +01:00

1024 lines
25 KiB
JavaScript

"use strict";
/**
* @constructor
*/
function VGAScreen(dev, adapter)
{
var
io = dev.io,
memory = dev.memory,
/**
* TODO: Make this configurable
* @const
*/
SVGA_MEMORY_SIZE = 128 * 64 * 1024,
/** @const */
MAX_XRES = 1280,
/** @const */
MAX_YRES = 1024,
/** @const */
MAX_BPP = 32,
/** @type {number} */
cursor_address = 0,
/** @type {number} */
cursor_scanline_start = 0xE,
/** @type {number} */
cursor_scanline_end = 0xF,
/** @type {VGAScreen} */
screen = this,
/**
* Number of columns in text mode
* @type {number}
*/
max_cols,
/**
* Number of rows in text mode
* @type {number}
*/
max_rows,
/**
* Width in pixels in graphical mode
* @type {number}
*/
screen_width,
/**
* Height in pixels in graphical mode
* @type {number}
*/
screen_height,
/**
* video memory start address
* @type {number}
*/
start_address = 0,
/** @type {boolean} */
graphical_mode_is_linear = true,
/** @type {boolean} */
graphical_mode = false,
/** @type {boolean} */
do_complete_redraw = false,
/*
* VGA palette containing 256 colors for video mode 13 etc.
* Needs to be initialised by the BIOS
*/
vga256_palette = new Int32Array(256),
// 4 times 64k
// Could be shared with SVGA memory
vga_memory = new Uint8Array(4 * 64 * 1024),
plane0 = new Uint8Array(vga_memory.buffer, 0 * 64 * 1024, 64 * 1024),
plane1 = new Uint8Array(vga_memory.buffer, 1 * 64 * 1024, 64 * 1024),
plane2 = new Uint8Array(vga_memory.buffer, 2 * 64 * 1024, 64 * 1024),
plane3 = new Uint8Array(vga_memory.buffer, 3 * 64 * 1024, 64 * 1024),
// VGA latches
latch0 = 0,
latch1 = 0,
latch2 = 0,
latch3 = 0,
svga_memory = new Uint8Array(SVGA_MEMORY_SIZE),
svga_enabled = false,
/** @type {number} */
svga_width = 0,
/** @type {number} */
svga_height = 0,
/** @type {number} */
svga_bpp = 0;
function init()
{
screen.set_size_text(80, 25);
screen.update_cursor_scanline();
memory.mmap_register(0xA0000, 0x20000, false, vga_memory_read, vga_memory_write);
memory.mmap_register(0xE0000000, SVGA_MEMORY_SIZE, false, svga_memory_read, svga_memory_write);
}
function vga_memory_read(addr)
{
if(!graphical_mode || graphical_mode_is_linear)
{
return vga_memory[addr];
}
// planar mode
addr &= 0xFFFF;
latch0 = plane0[addr];
latch1 = plane1[addr];
latch2 = plane2[addr];
latch3 = plane3[addr];
return vga_memory[plane_read << 16 | addr];
}
function vga_memory_write(addr, value)
{
if(graphical_mode)
{
if(graphical_mode_is_linear)
{
vga_memory_write_graphical_linear(addr, value);
}
else
{
vga_memory_write_graphical_planar(addr, value);
}
}
else
{
vga_memory_write_text_mode(addr, value);
}
}
function vga_memory_write_graphical_linear(addr, value)
{
var offset = addr << 2,
color = vga256_palette[value];
adapter.put_pixel_linear(offset | 2, color >> 16 & 0xFF);
adapter.put_pixel_linear(offset | 1, color >> 8 & 0xFF);
adapter.put_pixel_linear(offset, color & 0xFF);
vga_memory[addr] = value;
}
function vga_memory_write_graphical_planar(addr, value)
{
if(addr > 0xFFFF)
{
return;
}
// TODO:
// Replace 4 byte operations with single double word operations
var write,
plane0_byte,
plane1_byte,
plane2_byte,
plane3_byte;
// not implemented
dbg_assert((planar_rotate_reg & 7) === 0);
dbg_assert(planar_mode < 3);
if(planar_mode === 0)
{
plane0_byte = plane1_byte = plane2_byte = plane3_byte = value;
}
else if(planar_mode === 2)
{
if(plane_write_bm & 1)
{
write = value & 1 ? 0xFF : 0;
plane0_byte = latch0 & ~planar_bitmap | write & planar_bitmap;
}
if(plane_write_bm & 2)
{
write = value & 2 ? 0xFF : 0;
plane1_byte = latch1 & ~planar_bitmap | write & planar_bitmap;
}
if(plane_write_bm & 4)
{
write = value & 4 ? 0xFF : 0;
plane2_byte = latch2 & ~planar_bitmap | write & planar_bitmap;
}
if(plane_write_bm & 8)
{
write = value & 8 ? 0xFF : 0;
plane3_byte = latch3 & ~planar_bitmap | write & planar_bitmap;
}
}
if(planar_mode === 0 || planar_mode === 2)
{
switch(planar_rotate_reg & 0x18)
{
case 0x08:
plane0_byte &= latch0;
plane1_byte &= latch1;
plane2_byte &= latch2;
plane3_byte &= latch3;
break;
case 0x10:
plane0_byte |= latch0;
plane1_byte |= latch1;
plane2_byte |= latch2;
plane3_byte |= latch3;
break;
case 0x18:
plane0_byte ^= latch0;
plane1_byte ^= latch1;
plane2_byte ^= latch2;
plane3_byte ^= latch3;
break;
}
if(plane_write_bm & 1)
{
plane0_byte = latch0 & ~planar_bitmap | plane0_byte & planar_bitmap;
}
if(plane_write_bm & 2)
{
plane1_byte = latch1 & ~planar_bitmap | plane1_byte & planar_bitmap;
}
if(plane_write_bm & 4)
{
plane2_byte = latch2 & ~planar_bitmap | plane2_byte & planar_bitmap;
}
if(plane_write_bm & 8)
{
plane3_byte = latch3 & ~planar_bitmap | plane3_byte & planar_bitmap;
}
}
else if(planar_mode === 1)
{
plane0_byte = latch0;
plane1_byte = latch1;
plane2_byte = latch2;
plane3_byte = latch3;
}
if(plane_write_bm & 1)
{
plane0[addr] = plane0_byte;
}
else
{
plane0_byte = plane0[addr];
}
if(plane_write_bm & 2)
{
plane1[addr] = plane1_byte;
}
else
{
plane1_byte = plane1[addr];
}
if(plane_write_bm & 4)
{
plane2[addr] = plane2_byte;
}
else
{
plane2_byte = plane2[addr];
}
if(plane_write_bm & 8)
{
plane3[addr] = plane3_byte;
}
else
{
plane3_byte = plane3[addr];
}
if(addr >= (screen_width * screen_height << 3))
{
return;
}
// Shift these, so that the bits for the color are in
// the correct position in the while loop
plane1_byte <<= 1;
plane2_byte <<= 2;
plane3_byte <<= 3;
// 8 pixels per byte, we start at high (addr << 3 | 7)
// << 2 because we're using put_pixel_linear
var offset = (addr << 3 | 7) << 2;
for(var i = 0; i < 8; i++)
{
var color_index =
plane0_byte >> i & 1 |
plane1_byte >> i & 2 |
plane2_byte >> i & 4 |
plane3_byte >> i & 8,
color = vga256_palette[dac_map[color_index]];
adapter.put_pixel_linear(offset | 2, color >> 16);
adapter.put_pixel_linear(offset | 1, color >> 8 & 0xFF);
adapter.put_pixel_linear(offset, color & 0xFF);
offset -= 4;
}
}
function text_mode_redraw()
{
var addr = 0x18000 | start_address << 1,
chr,
color;
for(var row = 0; row < max_rows; row++)
{
for(var col = 0; col < max_cols; col++)
{
chr = vga_memory[addr];
color = vga_memory[addr | 1];
adapter.put_char(row, col, chr,
vga256_palette[color >> 4 & 0xF], vga256_palette[color & 0xF]);
addr += 2;
}
}
}
function graphical_linear_redraw()
{
// TODO
}
function graphical_planar_redraw()
{
var addr = 0,
color;
for(var y = 0; y < screen_height; y++)
{
for(var x = 0; x < screen_width; x += 8)
{
for(var i = 0; i < 8; i++)
{
color =
plane0[addr] >> i & 1 |
plane1[addr] >> i << 1 & 2 |
plane2[addr] >> i << 2 & 4 |
plane3[addr] >> i << 3 & 8;
adapter.put_pixel(x + 7 - i, y, vga256_palette[dac_map[color]]);
}
addr++;
}
}
}
function vga_memory_write_text_mode(addr, value)
{
if(addr < 0x18000)
{
return;
}
var memory_start = (addr - 0x18000 >> 1) - start_address,
row = memory_start / max_cols | 0,
col = memory_start % max_cols,
chr,
color;
if(addr & 1)
{
color = value;
chr = vga_memory[addr & ~1];
}
else
{
chr = value;
color = vga_memory[addr | 1];
}
adapter.put_char(row, col, chr,
vga256_palette[color >> 4 & 0xF], vga256_palette[color & 0xF]);
vga_memory[addr] = value;
}
function update_cursor()
{
var row = (cursor_address - start_address) / max_cols | 0,
col = (cursor_address - start_address) % max_cols;
row = Math.min(max_rows - 1, row);
adapter.update_cursor(row, col);
}
function svga_memory_read(addr)
{
return svga_memory[addr];
}
function svga_memory_write(addr, value)
{
svga_memory[addr] = value;
switch(svga_bpp)
{
case 32:
if((addr & 3) === 3)
{
// 4th byte is meaningless
return;
}
adapter.put_pixel_linear(addr, value);
break;
case 24:
addr = addr * (4/3) | 0;
adapter.put_pixel_linear(addr, value);
break;
case 16:
if(addr & 1)
{
var prev = svga_memory[addr ^ 1],
green = prev >> 5 & 0x07 | value << 3 & 0x38,
blue = value >> 3 & 0x1F;
blue = blue * 0xFF / 0x1F | 0;
green = green * 0xFF / 0x3F | 0;
addr <<= 1;
adapter.put_pixel_linear(addr - 1, green);
adapter.put_pixel_linear(addr - 2, blue);
}
else
{
var red = value & 0x1F;
red = red * 0xFF / 0x1F | 0;
adapter.put_pixel_linear((addr << 1) + 2, red);
}
break;
default:
if(DEBUG)
{
throw "SVGA: Unsupported BPP: " + svga_bpp;
}
}
}
this.timer = function(time)
{
if(do_complete_redraw)
{
do_complete_redraw = false;
if(graphical_mode)
{
if(graphical_mode_is_linear)
{
graphical_linear_redraw();
}
else
{
graphical_planar_redraw();
}
}
else
{
text_mode_redraw();
}
}
if(graphical_mode || svga_enabled)
{
adapter.timer_graphical();
}
else
{
adapter.timer_text();
}
};
/**
* @param {number} cols_count
* @param {number} rows_count
*/
this.set_size_text = function(cols_count, rows_count)
{
max_cols = cols_count;
max_rows = rows_count;
adapter.set_size_text(cols_count, rows_count);
};
this.set_size_graphical = function(width, height)
{
adapter.set_size_graphical(width, height);
}
this.update_cursor_scanline = function()
{
adapter.update_cursor_scanline(cursor_scanline_start, cursor_scanline_end);
};
this.clear_screen = function()
{
adapter.clear_screen();
};
this.set_video_mode = function(mode)
{
var is_graphical = false;
switch(mode)
{
case 0x03:
this.set_size_text(80, 25);
break;
case 0x10:
this.set_size_graphical(640, 350);
screen_width = 640;
screen_height = 350;
is_graphical = true;
graphical_mode_is_linear = false;
break;
case 0x12:
this.set_size_graphical(640, 480);
screen_width = 640;
screen_height = 480;
is_graphical = true;
graphical_mode_is_linear = false;
break;
case 0x13:
this.set_size_graphical(320, 200);
screen_width = 320;
screen_height = 200;
is_graphical = true;
graphical_mode_is_linear = true;
break;
default:
}
adapter.set_mode(is_graphical);
graphical_mode = is_graphical;
dbg_log("Current video mode: " + h(mode), LOG_VGA);
};
this.destroy = function()
{
};
var index_crtc = 0,
index_dac = 0,
index_attribute = 0;
// index for setting colors through port 3C9h
var dac_color_index = 0;
function port3C7_write(index)
{
// index for reading the DAC
dbg_log("3C7 write: " + h(index), LOG_VGA);
};
io.register_write(0x3C7, port3C7_write);
function port3C8_write(index)
{
dac_color_index = index * 3;
};
io.register_write(0x3C8, port3C8_write);
function port3C9_write(color_byte)
{
var index = dac_color_index / 3 | 0,
offset = dac_color_index % 3,
color = vga256_palette[index];
color_byte = color_byte << 2 & 0xFF | 3;
if(offset === 0)
{
color = color & ~0xFF0000 | color_byte << 16;
}
else if(offset === 1)
{
color = color & ~0xFF00 | color_byte << 8;
}
else
{
color = color & ~0xFF | color_byte;
dbg_log("dac set color, index=" + h(index) + " value=" + h(color), LOG_VGA);
}
vga256_palette[index] = color;
dac_color_index++;
do_complete_redraw = true;
}
io.register_write(0x3C9, port3C9_write);
function port3D4_write(register)
{
index_crtc = register;
};
io.register_write(0x3D4, port3D4_write);
function port3D5_write(value)
{
switch(index_crtc)
{
case 0x2:
screen.set_size_text(value, 25);
break;
case 0xA:
cursor_scanline_start = value;
screen.update_cursor_scanline();
break;
case 0xB:
cursor_scanline_end = value;
screen.update_cursor_scanline();
break;
case 0xC:
start_address = start_address & 0xff | value << 8;
do_complete_redraw = true;
break;
case 0xD:
start_address = start_address & 0xff00 | value;
do_complete_redraw = true;
//dbg_log("start addr: " + h(start_address, 4), LOG_VGA);
break;
case 0xE:
cursor_address = cursor_address & 0xFF | value << 8;
update_cursor();
break;
case 0xF:
cursor_address = cursor_address & 0xFF00 | value;
update_cursor();
break;
default:
dbg_log("3D5 / CRTC write " + h(index_crtc) + ": " + h(value), LOG_VGA);
}
};
io.register_write(0x3D5, port3D5_write);
function port3D5_read()
{
if(index_crtc === 0xA)
{
return cursor_scanline_start;
}
else if(index_crtc === 0xB)
{
return cursor_scanline_end;
}
else if(index_crtc === 0xE)
{
return cursor_address >> 8;
}
else if(index_crtc === 0xF)
{
return cursor_address & 0xFF;
}
dbg_log("3D5 read " + h(index_crtc), LOG_VGA);
return 0;
};
io.register_read(0x3D5, port3D5_read);
var miscellaneous_output_register = 0xff;
function port3CC_read()
{
return miscellaneous_output_register;
}
io.register_read(0x3CC, port3CC_read);
function port3C2_write(value)
{
dbg_log("3C2 / miscellaneous output register = " + h(value), LOG_VGA);
miscellaneous_output_register = value;
// cheat way to figure out which video mode is indended to be used
switch_video_mode(value);
}
io.register_write(0x3C2, port3C2_write);
function port3DA_read()
{
// status register
attribute_controller_index = -1;
return 0xff;
}
io.register_read(0x3DA, port3DA_read);
var attribute_controller_index = -1;
function port3C1_read()
{
attribute_controller_index = -1;
dbg_log("3C1 / attribute controller read " + h(attribute_controller_index), LOG_VGA);
return -1;
}
io.register_read(0x3C1, port3C1_read);
var dac_map = new Uint8Array(0x10);
function port3C0_write(value)
{
if(attribute_controller_index === -1)
{
attribute_controller_index = value;
}
else
{
if(attribute_controller_index < 0x10)
{
dac_map[attribute_controller_index] = value;
}
else
switch(attribute_controller_index)
{
default:
dbg_log("3C0 / attribute controller write " + h(attribute_controller_index) + ": " + h(value), LOG_VGA);
}
attribute_controller_index = -1;
}
}
io.register_write(0x3C0, port3C0_write);
function port3C0_read()
{
dbg_log("3C0 read", LOG_VGA);
var result = attribute_controller_index;
attribute_controller_index = -1;
return result;
}
io.register_read(0x3C0, port3C0_read);
var sequencer_index = -1;
function port3C4_write(value)
{
sequencer_index = value;
}
io.register_write(0x3C4, port3C4_write);
var
// bitmap of planes 0-3
plane_write_bm = 0xF,
sequencer_memory_mode = 0
;
function port3C5_write(value)
{
switch(sequencer_index)
{
case 0x02:
//dbg_log("plane write mask: " + h(value), LOG_VGA);
plane_write_bm = value;
break;
case 0x04:
dbg_log("sequencer memory mode: " + h(value), LOG_VGA);
sequencer_memory_mode = value;
break;
default:
dbg_log("3C5 / sequencer write " + h(sequencer_index) + ": " + h(value), LOG_VGA);
}
}
io.register_write(0x3C5, port3C5_write);
function port3C5_read()
{
switch(sequencer_index)
{
case 0x06:
return 0x12;
break;
default:
dbg_log("3C5 / sequencer read " + h(sequencer_index), LOG_VGA);
}
}
io.register_read(0x3C5, port3C5_read);
var graphics_index = -1;
function port3CE_write(value)
{
graphics_index = value;
}
io.register_write(0x3CE, port3CE_write);
var plane_read = 0, // value 0-3, which plane to read
planar_mode = 0,
planar_rotate_reg = 0,
planar_bitmap = 0xFF;
function port3CF_write(value)
{
switch(graphics_index)
{
// TODO: Set/Reset bit
//case 0:
//case 1:
//break;
case 3:
planar_rotate_reg = value;
dbg_log("plane rotate: " + h(value), LOG_VGA);
break;
case 4:
plane_read = value;
dbg_assert(value < 4);
dbg_log("plane read: " + h(value), LOG_VGA);
break;
case 5:
planar_mode = value;
dbg_log("planar mode: " + h(value), LOG_VGA);
break;
case 8:
planar_bitmap = value;
//dbg_log("planar bitmap: " + h(value), LOG_VGA);
break;
default:
dbg_log("3CF / graphics write " + h(graphics_index) + ": " + h(value), LOG_VGA);
}
}
io.register_write(0x3CF, port3CF_write);
function switch_video_mode(mar)
{
// Cheap way to figure this out, using the Miscellaneous Output Register
// See: http://wiki.osdev.org/VGA_Hardware#List_of_register_settings
if(mar === 0x67)
{
screen.set_video_mode(0x3);
}
else if(mar === 0xE3)
{
// also mode X
screen.set_video_mode(0x12);
}
else if(mar === 0x63)
{
screen.set_video_mode(0x13);
}
else if(mar === 0xA3)
{
screen.set_video_mode(0x10);
}
else
{
dbg_log("Unkown MAR value: " + h(mar, 2) + ", going back to text mode", LOG_VGA);
screen.set_video_mode(0x3);
}
}
// Bochs VBE Extensions
// http://wiki.osdev.org/Bochs_VBE_Extensions
var dispi_index = -1,
dispi_value = -1,
read_index = true;
function port1CE_write(value)
{
dispi_index = value;
read_index = true;
}
io.register_write(0x1CE, port1CE_write);
function port1CF_write(value)
{
if(read_index)
{
dispi_index |= value << 8;
read_index = false
return;
}
read_index = true;
dispi_value = value;
switch(dispi_index)
{
default:
dbg_log("1CF / dispi write low " + h(dispi_index) + ": " + h(value), LOG_VGA);
}
}
io.register_write(0x1CF, port1CF_write);
function port1D0_write(value)
{
dbg_log("1D0 / dispi write high " + h(dispi_index) + ": " + h(value), LOG_VGA);
dispi_value |= value << 8;
switch(dispi_index)
{
case 1:
svga_width = dispi_value;
break;
case 2:
svga_height = dispi_value;
break;
case 3:
svga_bpp = dispi_value;
break;
case 4:
// enable, options
svga_enabled = (dispi_value & 1) === 1;
break;
default:
}
dbg_log("SVGA: enabled=" + svga_enabled + ", " + svga_width + "x" + svga_height + "x" + svga_bpp, LOG_VGA);
if(svga_enabled)
{
screen.set_size_graphical(svga_width, svga_height);
adapter.set_mode(true);
}
}
io.register_write(0x1D0, port1D0_write);
function port1CF_read()
{
switch(dispi_index)
{
case 0:
// id
return 0xC0;
case 1:
return MAX_XRES;
case 2:
return MAX_YRES;
case 3:
return MAX_BPP;
case 0x0A:
// memory size in 64 kilobyte banks
return SVGA_MEMORY_SIZE / 64 / 1024;
default:
}
dbg_log("1CF / dispi read low " + h(dispi_index), LOG_VGA);
}
io.register_read(0x1CF, port1CF_read);
function port1D0_read()
{
switch(dispi_index)
{
case 0:
// id
return 0xB0;
case 1:
return MAX_XRES >> 8;
case 2:
return MAX_YRES >> 8;
case 3:
return MAX_BPP >> 8;
case 0x0A:
return SVGA_MEMORY_SIZE / 64 / 1024 >> 8;
default:
}
dbg_log("1D0 / dispi read high " + h(dispi_index), LOG_VGA);
}
io.register_read(0x1D0, port1D0_read);
init();
}