// license:BSD-3-Clause // copyright-holders:Ryan Holtz, Tyson Smith /* Silicon Graphics LG1 "Light" graphics board used as entry level graphics in the Indigo and IRIS Crimson. */ #include "emu.h" #include "video/light.h" #include "screen.h" #define LOG_REX (1 << 0) #define LOG_ALL (LOG_REX) #define VERBOSE (0) #include "logmacro.h" enum { REX15_PAGE0_SET = 0x00000000, REX15_PAGE0_GO = 0x00000800, REX15_PAGE1_SET = 0x00004790, REX15_PAGE1_GO = 0x00004f90, REX15_P0REG_COMMAND = 0x00000000, REX15_P0REG_XSTARTI = 0x0000000c, REX15_P0REG_YSTARTI = 0x0000001c, REX15_P0REG_XYMOVE = 0x00000034, REX15_P0REG_COLORREDI = 0x00000038, REX15_P0REG_COLORGREENI = 0x00000040, REX15_P0REG_COLORBLUEI = 0x00000048, REX15_P0REG_COLORBACK = 0x0000005c, REX15_P0REG_ZPATTERN = 0x00000060, REX15_P0REG_XENDI = 0x00000084, REX15_P0REG_YENDI = 0x00000088, REX15_P1REG_WCLOCKREV = 0x00000054, REX15_P1REG_CFGDATA = 0x00000058, REX15_P1REG_CFGSEL = 0x0000005c, REX15_P1REG_VC1_ADDRDATA = 0x00000060, REX15_P1REG_CFGMODE = 0x00000068, REX15_P1REG_XYOFFSET = 0x0000006c, REX15_OP_NOP = 0x00000000, REX15_OP_DRAW = 0x00000001, REX15_OP_FLAG_BLOCK = 0x00000008, REX15_OP_FLAG_LENGTH32 = 0x00000010, REX15_OP_FLAG_QUADMODE = 0x00000020, REX15_OP_FLAG_XYCONTINUE = 0x00000080, REX15_OP_FLAG_STOPONX = 0x00000100, REX15_OP_FLAG_STOPONY = 0x00000200, REX15_OP_FLAG_ENZPATTERN = 0x00000400, REX15_OP_FLAG_LOGICSRC = 0x00080000, REX15_OP_FLAG_ZOPAQUE = 0x00800000, REX15_OP_FLAG_ZCONTINUE = 0x01000000, REX15_WRITE_ADDR = 0x00, REX15_PALETTE_RAM = 0x01, REX15_PIXEL_READ_MASK = 0x02, REX15_CONTROL = 0x06 }; DEFINE_DEVICE_TYPE(LIGHT_VIDEO, light_video_device, "light_video", "SGI Light graphics board") light_video_device::light_video_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) : device_t(mconfig, LIGHT_VIDEO, tag, owner, clock) , m_palette(*this, "palette") { } //------------------------------------------------- // device_add_mconfig - device-specific machine configuration //------------------------------------------------- void light_video_device::device_add_mconfig(machine_config &config) { screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER)); screen.set_refresh_hz(60); screen.set_vblank_time(ATTOSECONDS_IN_USEC(2500)); /* not accurate */ screen.set_size(x_res, y_res); screen.set_visarea(0, x_res-1, 0, y_res-1); screen.set_screen_update(FUNC(light_video_device::screen_update)); PALETTE(config, m_palette).set_entries(256); } //------------------------------------------------- // device_start - device-specific startup //------------------------------------------------- void light_video_device::device_start() { m_framebuffer = std::make_unique(x_res*y_res); save_item(NAME(m_lg1.m_config_sel)); save_item(NAME(m_lg1.m_write_addr)); save_item(NAME(m_lg1.m_control)); save_item(NAME(m_lg1.m_command)); save_item(NAME(m_lg1.m_x_start_i)); save_item(NAME(m_lg1.m_y_start_i)); save_item(NAME(m_lg1.m_xy_move)); save_item(NAME(m_lg1.m_color_red_i)); save_item(NAME(m_lg1.m_color_green_i)); save_item(NAME(m_lg1.m_color_blue_i)); save_item(NAME(m_lg1.m_color_back)); save_item(NAME(m_lg1.m_z_pattern)); save_item(NAME(m_lg1.m_x_end_i)); save_item(NAME(m_lg1.m_y_end_i)); save_item(NAME(m_lg1.m_x_curr_i)); save_item(NAME(m_lg1.m_y_curr_i)); save_item(NAME(m_lg1.m_palette_idx)); save_item(NAME(m_lg1.m_palette_channel)); save_item(NAME(m_lg1.m_palette_entry)); save_item(NAME(m_lg1.m_pix_read_mask)); save_pointer(NAME(&m_framebuffer[0]), x_res*y_res); } //------------------------------------------------- // device_reset - device-specific reset //------------------------------------------------- void light_video_device::device_reset() { memset(&m_lg1, 0, sizeof(lg1_t)); memset(&m_framebuffer[0], 0, x_res*y_res); } uint32_t light_video_device::screen_update(screen_device &device, bitmap_rgb32 &bitmap, const rectangle &cliprect) { rgb_t const *const pens = m_palette->palette()->entry_list_raw(); uint8_t const *src = &m_framebuffer[0]; for (uint32_t y = 0; y < y_res; y++) { uint32_t *dst = &bitmap.pix(y); for (uint32_t x = 0; x < x_res; x++) { *dst++ = pens[*src++]; } } return 0; } uint32_t light_video_device::entry_r(offs_t offset, uint32_t mem_mask) { uint32_t ret = 0; switch (offset) { case REX15_PAGE0_GO/4: LOGMASKED(LOG_REX, "%s: LG1 Read: Status(?) (Go) %08x = %08x & %08x\n", machine().describe_context(), 0x1f3f0000 + offset*4, ret, mem_mask); do_rex_command(); break; case 0x0014/4: ret = 0x033c0000; LOGMASKED(LOG_REX, "%s: LG1 Read: Presence Detect(?) %08x = %08x & %08x\n", machine().describe_context(), 0x1f3f0000 + offset*4, ret, mem_mask); break; default: LOGMASKED(LOG_REX, "%s: Unknown LG1 Read: %08x = %08x & %08x\n", machine().describe_context(), 0x1f3f0000 + offset*4, ret, mem_mask); break; } return ret; } void light_video_device::entry_w(offs_t offset, uint32_t data, uint32_t mem_mask) { bool go = (offset >= REX15_PAGE1_GO/4) || (offset >= REX15_PAGE0_GO/4 && offset < REX15_PAGE1_SET/4); switch (offset) { case (REX15_PAGE0_SET+REX15_P0REG_COMMAND)/4: case (REX15_PAGE0_GO+REX15_P0REG_COMMAND)/4: m_lg1.m_command = data; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 Command Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); if (go) do_rex_command(); break; case (REX15_PAGE0_SET+REX15_P0REG_XSTARTI)/4: case (REX15_PAGE0_GO+REX15_P0REG_XSTARTI)/4: m_lg1.m_x_start_i = data; m_lg1.m_x_curr_i = m_lg1.m_x_start_i; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 XStartI Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); break; case (REX15_PAGE0_SET+REX15_P0REG_YSTARTI)/4: case (REX15_PAGE0_GO+REX15_P0REG_YSTARTI)/4: m_lg1.m_y_start_i = data; m_lg1.m_y_curr_i = m_lg1.m_y_start_i; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 YStartI Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); break; case (REX15_PAGE0_SET+REX15_P0REG_XYMOVE)/4: case (REX15_PAGE0_GO+REX15_P0REG_XYMOVE)/4: m_lg1.m_xy_move = data; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 XYMove Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); if (go) do_rex_command(); break; case (REX15_PAGE0_SET+REX15_P0REG_COLORREDI)/4: case (REX15_PAGE0_GO+REX15_P0REG_COLORREDI)/4: m_lg1.m_color_red_i = data; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 ColorRedI Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); break; case (REX15_PAGE0_SET+REX15_P0REG_COLORGREENI)/4: case (REX15_PAGE0_GO+REX15_P0REG_COLORGREENI)/4: m_lg1.m_color_green_i = data; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 ColorGreenI Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); break; case (REX15_PAGE0_SET+REX15_P0REG_COLORBLUEI)/4: case (REX15_PAGE0_GO+REX15_P0REG_COLORBLUEI)/4: m_lg1.m_color_blue_i = data; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 ColorBlueI Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); break; case (REX15_PAGE0_SET+REX15_P0REG_COLORBACK)/4: case (REX15_PAGE0_GO+REX15_P0REG_COLORBACK)/4: m_lg1.m_color_back = data; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 ColorBackI Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); break; case (REX15_PAGE0_SET+REX15_P0REG_ZPATTERN)/4: case (REX15_PAGE0_GO+REX15_P0REG_ZPATTERN)/4: m_lg1.m_z_pattern = data; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 ZPattern Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); if (go) do_rex_command(); break; case (REX15_PAGE0_SET+REX15_P0REG_XENDI)/4: case (REX15_PAGE0_GO+REX15_P0REG_XENDI)/4: m_lg1.m_x_end_i = data; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 XEndI Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); break; case (REX15_PAGE0_SET+REX15_P0REG_YENDI)/4: case (REX15_PAGE0_GO+REX15_P0REG_YENDI)/4: m_lg1.m_y_end_i = data; LOGMASKED(LOG_REX, "%s: LG1 REX1.5 YEndI Write (%s) = %08x\n", machine().describe_context(), (offset & 0x200) ? "Go" : "Set", data); break; case (REX15_PAGE1_SET+REX15_P1REG_CFGSEL)/4: case (REX15_PAGE1_GO+REX15_P1REG_CFGSEL)/4: m_lg1.m_config_sel = data; switch (data) { case REX15_WRITE_ADDR: LOGMASKED(LOG_REX, "%s: LG1 ConfigSel Write = %08x (Write Addr)\n", machine().describe_context(), data); break; case REX15_PALETTE_RAM: LOGMASKED(LOG_REX, "%s: LG1 ConfigSel Write = %08x (Palette RAM)\n", machine().describe_context(), data); break; case REX15_CONTROL: LOGMASKED(LOG_REX, "%s: LG1 ConfigSel Write = %08x (Control)\n", machine().describe_context(), data); break; case REX15_PIXEL_READ_MASK: LOGMASKED(LOG_REX, "%s: LG1 ConfigSel Write = %08x (Pixel Read Mask)\n", machine().describe_context(), data); break; default: LOGMASKED(LOG_REX, "%s: LG1 ConfigSel Write = %08x (Unknown)\n", machine().describe_context(), data); break; } break; case (REX15_PAGE1_SET+REX15_P1REG_CFGDATA)/4: case (REX15_PAGE1_GO+REX15_P1REG_CFGDATA)/4: if (go) // Ignore 'Go' writes for now, unsure what they do break; switch (m_lg1.m_config_sel) { case REX15_WRITE_ADDR: LOGMASKED(LOG_REX, "%s: LG1 ConfigSel Write: Setting WriteAddr to %08x\n", machine().describe_context(), data); m_lg1.m_write_addr = data; if (m_lg1.m_control == 0xf) { LOGMASKED(LOG_REX, "%s: LG1 about to set palette entry %02x\n", machine().describe_context(), (uint8_t)data); m_lg1.m_palette_idx = (uint8_t)data; m_lg1.m_palette_channel = 0; } break; case REX15_PALETTE_RAM: LOGMASKED(LOG_REX, "%s: LG1 ConfigSel Write: Setting Palette RAM %02x entry %d to %02x\n", machine().describe_context(), m_lg1.m_palette_idx, m_lg1.m_palette_channel, (uint8_t)data); m_lg1.m_palette_entry[m_lg1.m_palette_channel++] = (uint8_t)data; if (m_lg1.m_palette_channel == 3) { m_palette->set_pen_color(m_lg1.m_palette_idx, m_lg1.m_palette_entry[0], m_lg1.m_palette_entry[1], m_lg1.m_palette_entry[2]); } break; case REX15_CONTROL: LOGMASKED(LOG_REX, "%s: LG1 ConfigSel Write: Setting Control to %08x\n", machine().describe_context(), data); m_lg1.m_control = data; break; case REX15_PIXEL_READ_MASK: LOGMASKED(LOG_REX, "%s: LG1 ConfigSel Write = %08x (Pixel Read Mask, entry %02x)\n", machine().describe_context(), data, m_lg1.m_palette_idx); m_lg1.m_pix_read_mask[m_lg1.m_palette_idx] = (uint8_t)data; break; default: LOGMASKED(LOG_REX, "%s: LG1 Unknown ConfigData Write = %08x\n", machine().describe_context(), data); break; } break; default: LOGMASKED(LOG_REX, "%s: Unknown LG1 Write: %08x = %08x & %08x\n", machine().describe_context(), 0x1f3f0000 + offset*4, data, mem_mask); break; } } void light_video_device::do_rex_command() { if (m_lg1.m_command == 0) { return; } if (m_lg1.m_command == 0x30080329) { bool xycontinue = (m_lg1.m_command & REX15_OP_FLAG_XYCONTINUE); bool copy = (m_lg1.m_command & REX15_OP_FLAG_LOGICSRC); const uint32_t start_x = xycontinue ? m_lg1.m_x_curr_i : m_lg1.m_x_start_i; const uint32_t start_y = xycontinue ? m_lg1.m_y_curr_i : m_lg1.m_y_start_i; const uint32_t end_x = m_lg1.m_x_end_i; const uint32_t end_y = m_lg1.m_y_end_i; const uint32_t src_start_x = start_x + (m_lg1.m_xy_move >> 16); const uint32_t src_start_y = start_y + (uint16_t)m_lg1.m_xy_move; LOGMASKED(LOG_REX, "LG1: Command %08x: Block copy from %d,%d-%d,%d inclusive.\n", m_lg1.m_command, start_x, start_y, end_x, end_y); if (copy) { for (uint32_t y = start_y, src_y = src_start_y; y <= end_y; y++, src_y++) for (uint32_t x = start_x, src_x = src_start_x; x <= end_x; x++, src_x++) m_framebuffer[y*x_res + x] = m_framebuffer[src_y*x_res + src_x]; } else { for (uint32_t y = start_y; y <= end_y; y++) for (uint32_t x = start_x; x <= end_x; x++) m_framebuffer[y*x_res + x] = m_lg1.m_color_red_i; } } else if (m_lg1.m_command == 0x30000329) { bool xycontinue = (m_lg1.m_command & REX15_OP_FLAG_XYCONTINUE); uint32_t start_x = xycontinue ? m_lg1.m_x_curr_i : m_lg1.m_x_start_i; uint32_t start_y = xycontinue ? m_lg1.m_y_curr_i : m_lg1.m_y_start_i; uint32_t end_x = m_lg1.m_x_end_i; uint32_t end_y = m_lg1.m_y_end_i; LOGMASKED(LOG_REX, "LG1: Command %08x: Block draw from %d,%d-%d,%d inclusive.\n", m_lg1.m_command, start_x, start_y, end_x, end_y); for (uint32_t y = start_y; y <= end_y; y++) { for (uint32_t x = start_x; x <= end_x; x++) { m_framebuffer[y*x_res + x] = m_lg1.m_color_red_i; } } } else if (m_lg1.m_command == 0x300005a1 || m_lg1.m_command == 0x300005a9 || m_lg1.m_command == 0x300005b9) { bool xycontinue = (m_lg1.m_command & REX15_OP_FLAG_XYCONTINUE); uint32_t start_x = xycontinue ? m_lg1.m_x_curr_i : m_lg1.m_x_start_i; uint32_t start_y = xycontinue ? m_lg1.m_y_curr_i : m_lg1.m_y_start_i; uint32_t end_x = m_lg1.m_x_end_i; LOGMASKED(LOG_REX, "LG1: Command %08x: Pattern draw from %d-%d at %d\n", m_lg1.m_command, start_x, end_x, start_y); for (uint32_t x = start_x; x <= end_x && x < (start_x + 32); x++) { if (BIT(m_lg1.m_z_pattern, 31 - (x - start_x))) { m_framebuffer[start_y*x_res + x] = m_lg1.m_color_red_i; } m_lg1.m_x_curr_i++; } if (m_lg1.m_command & REX15_OP_FLAG_BLOCK) { if (m_lg1.m_x_curr_i > m_lg1.m_x_end_i) { m_lg1.m_y_curr_i--; m_lg1.m_x_curr_i = m_lg1.m_x_start_i; } } } else { LOGMASKED(LOG_REX, "%s: Unknown LG1 command: %08x\n", machine().describe_context(), m_lg1.m_command); } }