qemu/hw/display/ati.c
<<
>>
Prefs
   1/*
   2 * QEMU ATI SVGA emulation
   3 *
   4 * Copyright (c) 2019 BALATON Zoltan
   5 *
   6 * This work is licensed under the GNU GPL license version 2 or later.
   7 */
   8
   9/*
  10 * WARNING:
  11 * This is very incomplete and only enough for Linux console and some
  12 * unaccelerated X output at the moment.
  13 * Currently it's little more than a frame buffer with minimal functions,
  14 * other more advanced features of the hardware are yet to be implemented.
  15 * We only aim for Rage 128 Pro (and some RV100) and 2D only at first,
  16 * No 3D at all yet (maybe after 2D works, but feel free to improve it)
  17 */
  18
  19#include "qemu/osdep.h"
  20#include "ati_int.h"
  21#include "ati_regs.h"
  22#include "vga-access.h"
  23#include "hw/qdev-properties.h"
  24#include "vga_regs.h"
  25#include "qemu/log.h"
  26#include "qemu/module.h"
  27#include "qemu/error-report.h"
  28#include "qapi/error.h"
  29#include "ui/console.h"
  30#include "hw/display/i2c-ddc.h"
  31#include "trace.h"
  32
  33#define ATI_DEBUG_HW_CURSOR 0
  34
  35static const struct {
  36    const char *name;
  37    uint16_t dev_id;
  38} ati_model_aliases[] = {
  39    { "rage128p", PCI_DEVICE_ID_ATI_RAGE128_PF },
  40    { "rv100", PCI_DEVICE_ID_ATI_RADEON_QY },
  41};
  42
  43enum { VGA_MODE, EXT_MODE };
  44
  45static void ati_vga_switch_mode(ATIVGAState *s)
  46{
  47    DPRINTF("%d -> %d\n",
  48            s->mode, !!(s->regs.crtc_gen_cntl & CRTC2_EXT_DISP_EN));
  49    if (s->regs.crtc_gen_cntl & CRTC2_EXT_DISP_EN) {
  50        /* Extended mode enabled */
  51        s->mode = EXT_MODE;
  52        if (s->regs.crtc_gen_cntl & CRTC2_EN) {
  53            /* CRT controller enabled, use CRTC values */
  54            /* FIXME Should these be the same as VGA CRTC regs? */
  55            uint32_t offs = s->regs.crtc_offset & 0x07ffffff;
  56            int stride = (s->regs.crtc_pitch & 0x7ff) * 8;
  57            int bpp = 0;
  58            int h, v;
  59
  60            if (s->regs.crtc_h_total_disp == 0) {
  61                s->regs.crtc_h_total_disp = ((640 / 8) - 1) << 16;
  62            }
  63            if (s->regs.crtc_v_total_disp == 0) {
  64                s->regs.crtc_v_total_disp = (480 - 1) << 16;
  65            }
  66            h = ((s->regs.crtc_h_total_disp >> 16) + 1) * 8;
  67            v = (s->regs.crtc_v_total_disp >> 16) + 1;
  68            switch (s->regs.crtc_gen_cntl & CRTC_PIX_WIDTH_MASK) {
  69            case CRTC_PIX_WIDTH_4BPP:
  70                bpp = 4;
  71                break;
  72            case CRTC_PIX_WIDTH_8BPP:
  73                bpp = 8;
  74                break;
  75            case CRTC_PIX_WIDTH_15BPP:
  76                bpp = 15;
  77                break;
  78            case CRTC_PIX_WIDTH_16BPP:
  79                bpp = 16;
  80                break;
  81            case CRTC_PIX_WIDTH_24BPP:
  82                bpp = 24;
  83                break;
  84            case CRTC_PIX_WIDTH_32BPP:
  85                bpp = 32;
  86                break;
  87            default:
  88                qemu_log_mask(LOG_UNIMP, "Unsupported bpp value\n");
  89            }
  90            assert(bpp != 0);
  91            DPRINTF("Switching to %dx%d %d %d @ %x\n", h, v, stride, bpp, offs);
  92            vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_ENABLE);
  93            vbe_ioport_write_data(&s->vga, 0, VBE_DISPI_DISABLED);
  94            s->vga.big_endian_fb = (s->regs.config_cntl & APER_0_ENDIAN ||
  95                                    s->regs.config_cntl & APER_1_ENDIAN ?
  96                                    true : false);
  97            /* reset VBE regs then set up mode */
  98            s->vga.vbe_regs[VBE_DISPI_INDEX_XRES] = h;
  99            s->vga.vbe_regs[VBE_DISPI_INDEX_YRES] = v;
 100            s->vga.vbe_regs[VBE_DISPI_INDEX_BPP] = bpp;
 101            /* enable mode via ioport so it updates vga regs */
 102            vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_ENABLE);
 103            vbe_ioport_write_data(&s->vga, 0, VBE_DISPI_ENABLED |
 104                VBE_DISPI_LFB_ENABLED | VBE_DISPI_NOCLEARMEM |
 105                (s->regs.dac_cntl & DAC_8BIT_EN ? VBE_DISPI_8BIT_DAC : 0));
 106            /* now set offset and stride after enable as that resets these */
 107            if (stride) {
 108                int bypp = DIV_ROUND_UP(bpp, BITS_PER_BYTE);
 109
 110                vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_VIRT_WIDTH);
 111                vbe_ioport_write_data(&s->vga, 0, stride);
 112                stride *= bypp;
 113                if (offs % stride) {
 114                    DPRINTF("CRTC offset is not multiple of pitch\n");
 115                    vbe_ioport_write_index(&s->vga, 0,
 116                                           VBE_DISPI_INDEX_X_OFFSET);
 117                    vbe_ioport_write_data(&s->vga, 0, offs % stride / bypp);
 118                }
 119                vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_Y_OFFSET);
 120                vbe_ioport_write_data(&s->vga, 0, offs / stride);
 121                DPRINTF("VBE offset (%d,%d), vbe_start_addr=%x\n",
 122                        s->vga.vbe_regs[VBE_DISPI_INDEX_X_OFFSET],
 123                        s->vga.vbe_regs[VBE_DISPI_INDEX_Y_OFFSET],
 124                        s->vga.vbe_start_addr);
 125            }
 126        }
 127    } else {
 128        /* VGA mode enabled */
 129        s->mode = VGA_MODE;
 130        vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_ENABLE);
 131        vbe_ioport_write_data(&s->vga, 0, VBE_DISPI_DISABLED);
 132    }
 133}
 134
 135/* Used by host side hardware cursor */
 136static void ati_cursor_define(ATIVGAState *s)
 137{
 138    uint8_t data[1024];
 139    uint32_t srcoff;
 140    int i, j, idx = 0;
 141
 142    if ((s->regs.cur_offset & BIT(31)) || s->cursor_guest_mode) {
 143        return; /* Do not update cursor if locked or rendered by guest */
 144    }
 145    /* FIXME handle cur_hv_offs correctly */
 146    srcoff = s->regs.cur_offset -
 147        (s->regs.cur_hv_offs >> 16) - (s->regs.cur_hv_offs & 0xffff) * 16;
 148    for (i = 0; i < 64; i++) {
 149        for (j = 0; j < 8; j++, idx++) {
 150            data[idx] = vga_read_byte(&s->vga, srcoff + i * 16 + j);
 151            data[512 + idx] = vga_read_byte(&s->vga, srcoff + i * 16 + j + 8);
 152        }
 153    }
 154    if (!s->cursor) {
 155        s->cursor = cursor_alloc(64, 64);
 156    }
 157    cursor_set_mono(s->cursor, s->regs.cur_color1, s->regs.cur_color0,
 158                    &data[512], 1, &data[0]);
 159    dpy_cursor_define(s->vga.con, s->cursor);
 160}
 161
 162/* Alternatively support guest rendered hardware cursor */
 163static void ati_cursor_invalidate(VGACommonState *vga)
 164{
 165    ATIVGAState *s = container_of(vga, ATIVGAState, vga);
 166    int size = (s->regs.crtc_gen_cntl & CRTC2_CUR_EN) ? 64 : 0;
 167
 168    if (s->regs.cur_offset & BIT(31)) {
 169        return; /* Do not update cursor if locked */
 170    }
 171    if (s->cursor_size != size ||
 172        vga->hw_cursor_x != s->regs.cur_hv_pos >> 16 ||
 173        vga->hw_cursor_y != (s->regs.cur_hv_pos & 0xffff) ||
 174        s->cursor_offset != s->regs.cur_offset - (s->regs.cur_hv_offs >> 16) -
 175        (s->regs.cur_hv_offs & 0xffff) * 16) {
 176        /* Remove old cursor then update and show new one if needed */
 177        vga_invalidate_scanlines(vga, vga->hw_cursor_y, vga->hw_cursor_y + 63);
 178        vga->hw_cursor_x = s->regs.cur_hv_pos >> 16;
 179        vga->hw_cursor_y = s->regs.cur_hv_pos & 0xffff;
 180        s->cursor_offset = s->regs.cur_offset - (s->regs.cur_hv_offs >> 16) -
 181                           (s->regs.cur_hv_offs & 0xffff) * 16;
 182        s->cursor_size = size;
 183        if (size) {
 184            vga_invalidate_scanlines(vga,
 185                                     vga->hw_cursor_y, vga->hw_cursor_y + 63);
 186        }
 187    }
 188}
 189
 190static void ati_cursor_draw_line(VGACommonState *vga, uint8_t *d, int scr_y)
 191{
 192    ATIVGAState *s = container_of(vga, ATIVGAState, vga);
 193    uint32_t srcoff;
 194    uint32_t *dp = (uint32_t *)d;
 195    int i, j, h;
 196
 197    if (!(s->regs.crtc_gen_cntl & CRTC2_CUR_EN) ||
 198        scr_y < vga->hw_cursor_y || scr_y >= vga->hw_cursor_y + 64 ||
 199        scr_y > s->regs.crtc_v_total_disp >> 16) {
 200        return;
 201    }
 202    /* FIXME handle cur_hv_offs correctly */
 203    srcoff = s->cursor_offset + (scr_y - vga->hw_cursor_y) * 16;
 204    dp = &dp[vga->hw_cursor_x];
 205    h = ((s->regs.crtc_h_total_disp >> 16) + 1) * 8;
 206    for (i = 0; i < 8; i++) {
 207        uint32_t color;
 208        uint8_t abits = vga_read_byte(vga, srcoff + i);
 209        uint8_t xbits = vga_read_byte(vga, srcoff + i + 8);
 210        for (j = 0; j < 8; j++, abits <<= 1, xbits <<= 1) {
 211            if (abits & BIT(7)) {
 212                if (xbits & BIT(7)) {
 213                    color = dp[i * 8 + j] ^ 0xffffffff; /* complement */
 214                } else {
 215                    continue; /* transparent, no change */
 216                }
 217            } else {
 218                color = (xbits & BIT(7) ? s->regs.cur_color1 :
 219                                          s->regs.cur_color0) | 0xff000000;
 220            }
 221            if (vga->hw_cursor_x + i * 8 + j >= h) {
 222                return; /* end of screen, don't span to next line */
 223            }
 224            dp[i * 8 + j] = color;
 225        }
 226    }
 227}
 228
 229static uint64_t ati_i2c(bitbang_i2c_interface *i2c, uint64_t data, int base)
 230{
 231    bool c = (data & BIT(base + 17) ? !!(data & BIT(base + 1)) : 1);
 232    bool d = (data & BIT(base + 16) ? !!(data & BIT(base)) : 1);
 233
 234    bitbang_i2c_set(i2c, BITBANG_I2C_SCL, c);
 235    d = bitbang_i2c_set(i2c, BITBANG_I2C_SDA, d);
 236
 237    data &= ~0xf00ULL;
 238    if (c) {
 239        data |= BIT(base + 9);
 240    }
 241    if (d) {
 242        data |= BIT(base + 8);
 243    }
 244    return data;
 245}
 246
 247static void ati_vga_update_irq(ATIVGAState *s)
 248{
 249    pci_set_irq(&s->dev, !!(s->regs.gen_int_status & s->regs.gen_int_cntl));
 250}
 251
 252static void ati_vga_vblank_irq(void *opaque)
 253{
 254    ATIVGAState *s = opaque;
 255
 256    timer_mod(&s->vblank_timer, qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) +
 257              NANOSECONDS_PER_SECOND / 60);
 258    s->regs.gen_int_status |= CRTC_VBLANK_INT;
 259    ati_vga_update_irq(s);
 260}
 261
 262static inline uint64_t ati_reg_read_offs(uint32_t reg, int offs,
 263                                         unsigned int size)
 264{
 265    if (offs == 0 && size == 4) {
 266        return reg;
 267    } else {
 268        return extract32(reg, offs * BITS_PER_BYTE, size * BITS_PER_BYTE);
 269    }
 270}
 271
 272static uint64_t ati_mm_read(void *opaque, hwaddr addr, unsigned int size)
 273{
 274    ATIVGAState *s = opaque;
 275    uint64_t val = 0;
 276
 277    switch (addr) {
 278    case MM_INDEX:
 279        val = s->regs.mm_index;
 280        break;
 281    case MM_DATA ... MM_DATA + 3:
 282        /* indexed access to regs or memory */
 283        if (s->regs.mm_index & BIT(31)) {
 284            uint32_t idx = s->regs.mm_index & ~BIT(31);
 285            if (idx <= s->vga.vram_size - size) {
 286                val = ldn_le_p(s->vga.vram_ptr + idx, size);
 287            }
 288        } else if (s->regs.mm_index > MM_DATA + 3) {
 289            val = ati_mm_read(s, s->regs.mm_index + addr - MM_DATA, size);
 290        } else {
 291            qemu_log_mask(LOG_GUEST_ERROR,
 292                "ati_mm_read: mm_index too small: %u\n", s->regs.mm_index);
 293        }
 294        break;
 295    case BIOS_0_SCRATCH ... BUS_CNTL - 1:
 296    {
 297        int i = (addr - BIOS_0_SCRATCH) / 4;
 298        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF && i > 3) {
 299            break;
 300        }
 301        val = ati_reg_read_offs(s->regs.bios_scratch[i],
 302                                addr - (BIOS_0_SCRATCH + i * 4), size);
 303        break;
 304    }
 305    case GEN_INT_CNTL:
 306        val = s->regs.gen_int_cntl;
 307        break;
 308    case GEN_INT_STATUS:
 309        val = s->regs.gen_int_status;
 310        break;
 311    case CRTC_GEN_CNTL ... CRTC_GEN_CNTL + 3:
 312        val = ati_reg_read_offs(s->regs.crtc_gen_cntl,
 313                                addr - CRTC_GEN_CNTL, size);
 314        break;
 315    case CRTC_EXT_CNTL ... CRTC_EXT_CNTL + 3:
 316        val = ati_reg_read_offs(s->regs.crtc_ext_cntl,
 317                                addr - CRTC_EXT_CNTL, size);
 318        break;
 319    case DAC_CNTL:
 320        val = s->regs.dac_cntl;
 321        break;
 322    case GPIO_VGA_DDC:
 323        val = s->regs.gpio_vga_ddc;
 324        break;
 325    case GPIO_DVI_DDC:
 326        val = s->regs.gpio_dvi_ddc;
 327        break;
 328    case GPIO_MONID ... GPIO_MONID + 3:
 329        val = ati_reg_read_offs(s->regs.gpio_monid,
 330                                addr - GPIO_MONID, size);
 331        break;
 332    case PALETTE_INDEX:
 333        /* FIXME unaligned access */
 334        val = vga_ioport_read(&s->vga, VGA_PEL_IR) << 16;
 335        val |= vga_ioport_read(&s->vga, VGA_PEL_IW) & 0xff;
 336        break;
 337    case PALETTE_DATA:
 338        val = vga_ioport_read(&s->vga, VGA_PEL_D);
 339        break;
 340    case CNFG_CNTL:
 341        val = s->regs.config_cntl;
 342        break;
 343    case CNFG_MEMSIZE:
 344        val = s->vga.vram_size;
 345        break;
 346    case CONFIG_APER_0_BASE:
 347    case CONFIG_APER_1_BASE:
 348        val = pci_default_read_config(&s->dev,
 349                                      PCI_BASE_ADDRESS_0, size) & 0xfffffff0;
 350        break;
 351    case CONFIG_APER_SIZE:
 352        val = s->vga.vram_size;
 353        break;
 354    case CONFIG_REG_1_BASE:
 355        val = pci_default_read_config(&s->dev,
 356                                      PCI_BASE_ADDRESS_2, size) & 0xfffffff0;
 357        break;
 358    case CONFIG_REG_APER_SIZE:
 359        val = memory_region_size(&s->mm);
 360        break;
 361    case MC_STATUS:
 362        val = 5;
 363        break;
 364    case RBBM_STATUS:
 365    case GUI_STAT:
 366        val = 64; /* free CMDFIFO entries */
 367        break;
 368    case CRTC_H_TOTAL_DISP:
 369        val = s->regs.crtc_h_total_disp;
 370        break;
 371    case CRTC_H_SYNC_STRT_WID:
 372        val = s->regs.crtc_h_sync_strt_wid;
 373        break;
 374    case CRTC_V_TOTAL_DISP:
 375        val = s->regs.crtc_v_total_disp;
 376        break;
 377    case CRTC_V_SYNC_STRT_WID:
 378        val = s->regs.crtc_v_sync_strt_wid;
 379        break;
 380    case CRTC_OFFSET:
 381        val = s->regs.crtc_offset;
 382        break;
 383    case CRTC_OFFSET_CNTL:
 384        val = s->regs.crtc_offset_cntl;
 385        break;
 386    case CRTC_PITCH:
 387        val = s->regs.crtc_pitch;
 388        break;
 389    case 0xf00 ... 0xfff:
 390        val = pci_default_read_config(&s->dev, addr - 0xf00, size);
 391        break;
 392    case CUR_OFFSET:
 393        val = s->regs.cur_offset;
 394        break;
 395    case CUR_HORZ_VERT_POSN:
 396        val = s->regs.cur_hv_pos;
 397        val |= s->regs.cur_offset & BIT(31);
 398        break;
 399    case CUR_HORZ_VERT_OFF:
 400        val = s->regs.cur_hv_offs;
 401        val |= s->regs.cur_offset & BIT(31);
 402        break;
 403    case CUR_CLR0:
 404        val = s->regs.cur_color0;
 405        break;
 406    case CUR_CLR1:
 407        val = s->regs.cur_color1;
 408        break;
 409    case DST_OFFSET:
 410        val = s->regs.dst_offset;
 411        break;
 412    case DST_PITCH:
 413        val = s->regs.dst_pitch;
 414        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 415            val &= s->regs.dst_tile << 16;
 416        }
 417        break;
 418    case DST_WIDTH:
 419        val = s->regs.dst_width;
 420        break;
 421    case DST_HEIGHT:
 422        val = s->regs.dst_height;
 423        break;
 424    case SRC_X:
 425        val = s->regs.src_x;
 426        break;
 427    case SRC_Y:
 428        val = s->regs.src_y;
 429        break;
 430    case DST_X:
 431        val = s->regs.dst_x;
 432        break;
 433    case DST_Y:
 434        val = s->regs.dst_y;
 435        break;
 436    case DP_GUI_MASTER_CNTL:
 437        val = s->regs.dp_gui_master_cntl;
 438        break;
 439    case SRC_OFFSET:
 440        val = s->regs.src_offset;
 441        break;
 442    case SRC_PITCH:
 443        val = s->regs.src_pitch;
 444        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 445            val &= s->regs.src_tile << 16;
 446        }
 447        break;
 448    case DP_BRUSH_BKGD_CLR:
 449        val = s->regs.dp_brush_bkgd_clr;
 450        break;
 451    case DP_BRUSH_FRGD_CLR:
 452        val = s->regs.dp_brush_frgd_clr;
 453        break;
 454    case DP_SRC_FRGD_CLR:
 455        val = s->regs.dp_src_frgd_clr;
 456        break;
 457    case DP_SRC_BKGD_CLR:
 458        val = s->regs.dp_src_bkgd_clr;
 459        break;
 460    case DP_CNTL:
 461        val = s->regs.dp_cntl;
 462        break;
 463    case DP_DATATYPE:
 464        val = s->regs.dp_datatype;
 465        break;
 466    case DP_MIX:
 467        val = s->regs.dp_mix;
 468        break;
 469    case DP_WRITE_MASK:
 470        val = s->regs.dp_write_mask;
 471        break;
 472    case DEFAULT_OFFSET:
 473        val = s->regs.default_offset;
 474        if (s->dev_id != PCI_DEVICE_ID_ATI_RAGE128_PF) {
 475            val >>= 10;
 476            val |= s->regs.default_pitch << 16;
 477            val |= s->regs.default_tile << 30;
 478        }
 479        break;
 480    case DEFAULT_PITCH:
 481        val = s->regs.default_pitch;
 482        val |= s->regs.default_tile << 16;
 483        break;
 484    case DEFAULT_SC_BOTTOM_RIGHT:
 485        val = s->regs.default_sc_bottom_right;
 486        break;
 487    default:
 488        break;
 489    }
 490    if (addr < CUR_OFFSET || addr > CUR_CLR1 || ATI_DEBUG_HW_CURSOR) {
 491        trace_ati_mm_read(size, addr, ati_reg_name(addr & ~3ULL), val);
 492    }
 493    return val;
 494}
 495
 496static inline void ati_reg_write_offs(uint32_t *reg, int offs,
 497                                      uint64_t data, unsigned int size)
 498{
 499    if (offs == 0 && size == 4) {
 500        *reg = data;
 501    } else {
 502        *reg = deposit32(*reg, offs * BITS_PER_BYTE, size * BITS_PER_BYTE,
 503                         data);
 504    }
 505}
 506
 507static void ati_mm_write(void *opaque, hwaddr addr,
 508                           uint64_t data, unsigned int size)
 509{
 510    ATIVGAState *s = opaque;
 511
 512    if (addr < CUR_OFFSET || addr > CUR_CLR1 || ATI_DEBUG_HW_CURSOR) {
 513        trace_ati_mm_write(size, addr, ati_reg_name(addr & ~3ULL), data);
 514    }
 515    switch (addr) {
 516    case MM_INDEX:
 517        s->regs.mm_index = data;
 518        break;
 519    case MM_DATA ... MM_DATA + 3:
 520        /* indexed access to regs or memory */
 521        if (s->regs.mm_index & BIT(31)) {
 522            uint32_t idx = s->regs.mm_index & ~BIT(31);
 523            if (idx <= s->vga.vram_size - size) {
 524                stn_le_p(s->vga.vram_ptr + idx, size, data);
 525            }
 526        } else if (s->regs.mm_index > MM_DATA + 3) {
 527            ati_mm_write(s, s->regs.mm_index + addr - MM_DATA, data, size);
 528        } else {
 529            qemu_log_mask(LOG_GUEST_ERROR,
 530                "ati_mm_write: mm_index too small: %u\n", s->regs.mm_index);
 531        }
 532        break;
 533    case BIOS_0_SCRATCH ... BUS_CNTL - 1:
 534    {
 535        int i = (addr - BIOS_0_SCRATCH) / 4;
 536        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF && i > 3) {
 537            break;
 538        }
 539        ati_reg_write_offs(&s->regs.bios_scratch[i],
 540                           addr - (BIOS_0_SCRATCH + i * 4), data, size);
 541        break;
 542    }
 543    case GEN_INT_CNTL:
 544        s->regs.gen_int_cntl = data;
 545        if (data & CRTC_VBLANK_INT) {
 546            ati_vga_vblank_irq(s);
 547        } else {
 548            timer_del(&s->vblank_timer);
 549            ati_vga_update_irq(s);
 550        }
 551        break;
 552    case GEN_INT_STATUS:
 553        data &= (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF ?
 554                 0x000f040fUL : 0xfc080effUL);
 555        s->regs.gen_int_status &= ~data;
 556        ati_vga_update_irq(s);
 557        break;
 558    case CRTC_GEN_CNTL ... CRTC_GEN_CNTL + 3:
 559    {
 560        uint32_t val = s->regs.crtc_gen_cntl;
 561        ati_reg_write_offs(&s->regs.crtc_gen_cntl,
 562                           addr - CRTC_GEN_CNTL, data, size);
 563        if ((val & CRTC2_CUR_EN) != (s->regs.crtc_gen_cntl & CRTC2_CUR_EN)) {
 564            if (s->cursor_guest_mode) {
 565                s->vga.force_shadow = !!(s->regs.crtc_gen_cntl & CRTC2_CUR_EN);
 566            } else {
 567                if (s->regs.crtc_gen_cntl & CRTC2_CUR_EN) {
 568                    ati_cursor_define(s);
 569                }
 570                dpy_mouse_set(s->vga.con, s->regs.cur_hv_pos >> 16,
 571                              s->regs.cur_hv_pos & 0xffff,
 572                              (s->regs.crtc_gen_cntl & CRTC2_CUR_EN) != 0);
 573            }
 574        }
 575        if ((val & (CRTC2_EXT_DISP_EN | CRTC2_EN)) !=
 576            (s->regs.crtc_gen_cntl & (CRTC2_EXT_DISP_EN | CRTC2_EN))) {
 577            ati_vga_switch_mode(s);
 578        }
 579        break;
 580    }
 581    case CRTC_EXT_CNTL ... CRTC_EXT_CNTL + 3:
 582    {
 583        uint32_t val = s->regs.crtc_ext_cntl;
 584        ati_reg_write_offs(&s->regs.crtc_ext_cntl,
 585                           addr - CRTC_EXT_CNTL, data, size);
 586        if (s->regs.crtc_ext_cntl & CRT_CRTC_DISPLAY_DIS) {
 587            DPRINTF("Display disabled\n");
 588            s->vga.ar_index &= ~BIT(5);
 589        } else {
 590            DPRINTF("Display enabled\n");
 591            s->vga.ar_index |= BIT(5);
 592            ati_vga_switch_mode(s);
 593        }
 594        if ((val & CRT_CRTC_DISPLAY_DIS) !=
 595            (s->regs.crtc_ext_cntl & CRT_CRTC_DISPLAY_DIS)) {
 596            ati_vga_switch_mode(s);
 597        }
 598        break;
 599    }
 600    case DAC_CNTL:
 601        s->regs.dac_cntl = data & 0xffffe3ff;
 602        s->vga.dac_8bit = !!(data & DAC_8BIT_EN);
 603        break;
 604    case GPIO_VGA_DDC:
 605        if (s->dev_id != PCI_DEVICE_ID_ATI_RAGE128_PF) {
 606            /* FIXME: Maybe add a property to select VGA or DVI port? */
 607        }
 608        break;
 609    case GPIO_DVI_DDC:
 610        if (s->dev_id != PCI_DEVICE_ID_ATI_RAGE128_PF) {
 611            s->regs.gpio_dvi_ddc = ati_i2c(&s->bbi2c, data, 0);
 612        }
 613        break;
 614    case GPIO_MONID ... GPIO_MONID + 3:
 615        /* FIXME What does Radeon have here? */
 616        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 617            ati_reg_write_offs(&s->regs.gpio_monid,
 618                               addr - GPIO_MONID, data, size);
 619            /*
 620             * Rage128p accesses DDC used to get EDID via these bits.
 621             * Because some drivers access this via multiple byte writes
 622             * we have to be careful when we send bits to avoid spurious
 623             * changes in bitbang_i2c state. So only do it when mask is set
 624             * and either the enable bits are changed or output bits changed
 625             * while enabled.
 626             */
 627            if ((s->regs.gpio_monid & BIT(25)) &&
 628                ((addr <= GPIO_MONID + 2 && addr + size > GPIO_MONID + 2) ||
 629                 (addr == GPIO_MONID && (s->regs.gpio_monid & 0x60000)))) {
 630                s->regs.gpio_monid = ati_i2c(&s->bbi2c, s->regs.gpio_monid, 1);
 631            }
 632        }
 633        break;
 634    case PALETTE_INDEX ... PALETTE_INDEX + 3:
 635        if (size == 4) {
 636            vga_ioport_write(&s->vga, VGA_PEL_IR, (data >> 16) & 0xff);
 637            vga_ioport_write(&s->vga, VGA_PEL_IW, data & 0xff);
 638        } else {
 639            if (addr == PALETTE_INDEX) {
 640                vga_ioport_write(&s->vga, VGA_PEL_IW, data & 0xff);
 641            } else {
 642                vga_ioport_write(&s->vga, VGA_PEL_IR, data & 0xff);
 643            }
 644        }
 645        break;
 646    case PALETTE_DATA ... PALETTE_DATA + 3:
 647        data <<= addr - PALETTE_DATA;
 648        data = bswap32(data) >> 8;
 649        vga_ioport_write(&s->vga, VGA_PEL_D, data & 0xff);
 650        data >>= 8;
 651        vga_ioport_write(&s->vga, VGA_PEL_D, data & 0xff);
 652        data >>= 8;
 653        vga_ioport_write(&s->vga, VGA_PEL_D, data & 0xff);
 654        break;
 655    case CNFG_CNTL:
 656        s->regs.config_cntl = data;
 657        break;
 658    case CRTC_H_TOTAL_DISP:
 659        s->regs.crtc_h_total_disp = data & 0x07ff07ff;
 660        break;
 661    case CRTC_H_SYNC_STRT_WID:
 662        s->regs.crtc_h_sync_strt_wid = data & 0x17bf1fff;
 663        break;
 664    case CRTC_V_TOTAL_DISP:
 665        s->regs.crtc_v_total_disp = data & 0x0fff0fff;
 666        break;
 667    case CRTC_V_SYNC_STRT_WID:
 668        s->regs.crtc_v_sync_strt_wid = data & 0x9f0fff;
 669        break;
 670    case CRTC_OFFSET:
 671        s->regs.crtc_offset = data & 0xc7ffffff;
 672        break;
 673    case CRTC_OFFSET_CNTL:
 674        s->regs.crtc_offset_cntl = data; /* FIXME */
 675        break;
 676    case CRTC_PITCH:
 677        s->regs.crtc_pitch = data & 0x07ff07ff;
 678        break;
 679    case 0xf00 ... 0xfff:
 680        /* read-only copy of PCI config space so ignore writes */
 681        break;
 682    case CUR_OFFSET:
 683        if (s->regs.cur_offset != (data & 0x87fffff0)) {
 684            s->regs.cur_offset = data & 0x87fffff0;
 685            ati_cursor_define(s);
 686        }
 687        break;
 688    case CUR_HORZ_VERT_POSN:
 689        s->regs.cur_hv_pos = data & 0x3fff0fff;
 690        if (data & BIT(31)) {
 691            s->regs.cur_offset |= data & BIT(31);
 692        } else if (s->regs.cur_offset & BIT(31)) {
 693            s->regs.cur_offset &= ~BIT(31);
 694            ati_cursor_define(s);
 695        }
 696        if (!s->cursor_guest_mode &&
 697            (s->regs.crtc_gen_cntl & CRTC2_CUR_EN) && !(data & BIT(31))) {
 698            dpy_mouse_set(s->vga.con, s->regs.cur_hv_pos >> 16,
 699                          s->regs.cur_hv_pos & 0xffff, 1);
 700        }
 701        break;
 702    case CUR_HORZ_VERT_OFF:
 703        s->regs.cur_hv_offs = data & 0x3f003f;
 704        if (data & BIT(31)) {
 705            s->regs.cur_offset |= data & BIT(31);
 706        } else if (s->regs.cur_offset & BIT(31)) {
 707            s->regs.cur_offset &= ~BIT(31);
 708            ati_cursor_define(s);
 709        }
 710        break;
 711    case CUR_CLR0:
 712        if (s->regs.cur_color0 != (data & 0xffffff)) {
 713            s->regs.cur_color0 = data & 0xffffff;
 714            ati_cursor_define(s);
 715        }
 716        break;
 717    case CUR_CLR1:
 718        /*
 719         * Update cursor unconditionally here because some clients set up
 720         * other registers before actually writing cursor data to memory at
 721         * offset so we would miss cursor change unless always updating here
 722         */
 723        s->regs.cur_color1 = data & 0xffffff;
 724        ati_cursor_define(s);
 725        break;
 726    case DST_OFFSET:
 727        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 728            s->regs.dst_offset = data & 0xfffffff0;
 729        } else {
 730            s->regs.dst_offset = data & 0xfffffc00;
 731        }
 732        break;
 733    case DST_PITCH:
 734        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 735            s->regs.dst_pitch = data & 0x3fff;
 736            s->regs.dst_tile = (data >> 16) & 1;
 737        } else {
 738            s->regs.dst_pitch = data & 0x3ff0;
 739        }
 740        break;
 741    case DST_TILE:
 742        if (s->dev_id == PCI_DEVICE_ID_ATI_RADEON_QY) {
 743            s->regs.dst_tile = data & 3;
 744        }
 745        break;
 746    case DST_WIDTH:
 747        s->regs.dst_width = data & 0x3fff;
 748        ati_2d_blt(s);
 749        break;
 750    case DST_HEIGHT:
 751        s->regs.dst_height = data & 0x3fff;
 752        break;
 753    case SRC_X:
 754        s->regs.src_x = data & 0x3fff;
 755        break;
 756    case SRC_Y:
 757        s->regs.src_y = data & 0x3fff;
 758        break;
 759    case DST_X:
 760        s->regs.dst_x = data & 0x3fff;
 761        break;
 762    case DST_Y:
 763        s->regs.dst_y = data & 0x3fff;
 764        break;
 765    case SRC_PITCH_OFFSET:
 766        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 767            s->regs.src_offset = (data & 0x1fffff) << 5;
 768            s->regs.src_pitch = (data & 0x7fe00000) >> 21;
 769            s->regs.src_tile = data >> 31;
 770        } else {
 771            s->regs.src_offset = (data & 0x3fffff) << 10;
 772            s->regs.src_pitch = (data & 0x3fc00000) >> 16;
 773            s->regs.src_tile = (data >> 30) & 1;
 774        }
 775        break;
 776    case DST_PITCH_OFFSET:
 777        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 778            s->regs.dst_offset = (data & 0x1fffff) << 5;
 779            s->regs.dst_pitch = (data & 0x7fe00000) >> 21;
 780            s->regs.dst_tile = data >> 31;
 781        } else {
 782            s->regs.dst_offset = (data & 0x3fffff) << 10;
 783            s->regs.dst_pitch = (data & 0x3fc00000) >> 16;
 784            s->regs.dst_tile = data >> 30;
 785        }
 786        break;
 787    case SRC_Y_X:
 788        s->regs.src_x = data & 0x3fff;
 789        s->regs.src_y = (data >> 16) & 0x3fff;
 790        break;
 791    case DST_Y_X:
 792        s->regs.dst_x = data & 0x3fff;
 793        s->regs.dst_y = (data >> 16) & 0x3fff;
 794        break;
 795    case DST_HEIGHT_WIDTH:
 796        s->regs.dst_width = data & 0x3fff;
 797        s->regs.dst_height = (data >> 16) & 0x3fff;
 798        ati_2d_blt(s);
 799        break;
 800    case DP_GUI_MASTER_CNTL:
 801        s->regs.dp_gui_master_cntl = data & 0xf800000f;
 802        s->regs.dp_datatype = (data & 0x0f00) >> 8 | (data & 0x30f0) << 4 |
 803                              (data & 0x4000) << 16;
 804        s->regs.dp_mix = (data & GMC_ROP3_MASK) | (data & 0x7000000) >> 16;
 805        break;
 806    case DST_WIDTH_X:
 807        s->regs.dst_x = data & 0x3fff;
 808        s->regs.dst_width = (data >> 16) & 0x3fff;
 809        ati_2d_blt(s);
 810        break;
 811    case SRC_X_Y:
 812        s->regs.src_y = data & 0x3fff;
 813        s->regs.src_x = (data >> 16) & 0x3fff;
 814        break;
 815    case DST_X_Y:
 816        s->regs.dst_y = data & 0x3fff;
 817        s->regs.dst_x = (data >> 16) & 0x3fff;
 818        break;
 819    case DST_WIDTH_HEIGHT:
 820        s->regs.dst_height = data & 0x3fff;
 821        s->regs.dst_width = (data >> 16) & 0x3fff;
 822        ati_2d_blt(s);
 823        break;
 824    case DST_HEIGHT_Y:
 825        s->regs.dst_y = data & 0x3fff;
 826        s->regs.dst_height = (data >> 16) & 0x3fff;
 827        break;
 828    case SRC_OFFSET:
 829        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 830            s->regs.src_offset = data & 0xfffffff0;
 831        } else {
 832            s->regs.src_offset = data & 0xfffffc00;
 833        }
 834        break;
 835    case SRC_PITCH:
 836        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 837            s->regs.src_pitch = data & 0x3fff;
 838            s->regs.src_tile = (data >> 16) & 1;
 839        } else {
 840            s->regs.src_pitch = data & 0x3ff0;
 841        }
 842        break;
 843    case DP_BRUSH_BKGD_CLR:
 844        s->regs.dp_brush_bkgd_clr = data;
 845        break;
 846    case DP_BRUSH_FRGD_CLR:
 847        s->regs.dp_brush_frgd_clr = data;
 848        break;
 849    case DP_CNTL:
 850        s->regs.dp_cntl = data;
 851        break;
 852    case DP_DATATYPE:
 853        s->regs.dp_datatype = data & 0xe0070f0f;
 854        break;
 855    case DP_MIX:
 856        s->regs.dp_mix = data & 0x00ff0700;
 857        break;
 858    case DP_WRITE_MASK:
 859        s->regs.dp_write_mask = data;
 860        break;
 861    case DEFAULT_OFFSET:
 862        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 863            s->regs.default_offset = data & 0xfffffff0;
 864        } else {
 865            /* Radeon has DEFAULT_PITCH_OFFSET here like DST_PITCH_OFFSET */
 866            s->regs.default_offset = (data & 0x3fffff) << 10;
 867            s->regs.default_pitch = (data & 0x3fc00000) >> 16;
 868            s->regs.default_tile = data >> 30;
 869        }
 870        break;
 871    case DEFAULT_PITCH:
 872        if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
 873            s->regs.default_pitch = data & 0x3fff;
 874            s->regs.default_tile = (data >> 16) & 1;
 875        }
 876        break;
 877    case DEFAULT_SC_BOTTOM_RIGHT:
 878        s->regs.default_sc_bottom_right = data & 0x3fff3fff;
 879        break;
 880    default:
 881        break;
 882    }
 883}
 884
 885static const MemoryRegionOps ati_mm_ops = {
 886    .read = ati_mm_read,
 887    .write = ati_mm_write,
 888    .endianness = DEVICE_LITTLE_ENDIAN,
 889};
 890
 891static void ati_vga_realize(PCIDevice *dev, Error **errp)
 892{
 893    ATIVGAState *s = ATI_VGA(dev);
 894    VGACommonState *vga = &s->vga;
 895
 896    if (s->model) {
 897        int i;
 898        for (i = 0; i < ARRAY_SIZE(ati_model_aliases); i++) {
 899            if (!strcmp(s->model, ati_model_aliases[i].name)) {
 900                s->dev_id = ati_model_aliases[i].dev_id;
 901                break;
 902            }
 903        }
 904        if (i >= ARRAY_SIZE(ati_model_aliases)) {
 905            warn_report("Unknown ATI VGA model name, "
 906                        "using default rage128p");
 907        }
 908    }
 909    if (s->dev_id != PCI_DEVICE_ID_ATI_RAGE128_PF &&
 910        s->dev_id != PCI_DEVICE_ID_ATI_RADEON_QY) {
 911        error_setg(errp, "Unknown ATI VGA device id, "
 912                   "only 0x5046 and 0x5159 are supported");
 913        return;
 914    }
 915    pci_set_word(dev->config + PCI_DEVICE_ID, s->dev_id);
 916
 917    if (s->dev_id == PCI_DEVICE_ID_ATI_RADEON_QY &&
 918        s->vga.vram_size_mb < 16) {
 919        warn_report("Too small video memory for device id");
 920        s->vga.vram_size_mb = 16;
 921    }
 922
 923    /* init vga bits */
 924    vga_common_init(vga, OBJECT(s));
 925    vga_init(vga, OBJECT(s), pci_address_space(dev),
 926             pci_address_space_io(dev), true);
 927    vga->con = graphic_console_init(DEVICE(s), 0, s->vga.hw_ops, &s->vga);
 928    if (s->cursor_guest_mode) {
 929        vga->cursor_invalidate = ati_cursor_invalidate;
 930        vga->cursor_draw_line = ati_cursor_draw_line;
 931    }
 932
 933    /* ddc, edid */
 934    I2CBus *i2cbus = i2c_init_bus(DEVICE(s), "ati-vga.ddc");
 935    bitbang_i2c_init(&s->bbi2c, i2cbus);
 936    I2CSlave *i2cddc = I2C_SLAVE(qdev_create(BUS(i2cbus), TYPE_I2CDDC));
 937    i2c_set_slave_address(i2cddc, 0x50);
 938
 939    /* mmio register space */
 940    memory_region_init_io(&s->mm, OBJECT(s), &ati_mm_ops, s,
 941                          "ati.mmregs", 0x4000);
 942    /* io space is alias to beginning of mmregs */
 943    memory_region_init_alias(&s->io, OBJECT(s), "ati.io", &s->mm, 0, 0x100);
 944
 945    pci_register_bar(dev, 0, PCI_BASE_ADDRESS_MEM_PREFETCH, &vga->vram);
 946    pci_register_bar(dev, 1, PCI_BASE_ADDRESS_SPACE_IO, &s->io);
 947    pci_register_bar(dev, 2, PCI_BASE_ADDRESS_SPACE_MEMORY, &s->mm);
 948
 949    /* most interrupts are not yet emulated but MacOS needs at least VBlank */
 950    dev->config[PCI_INTERRUPT_PIN] = 1;
 951    timer_init_ns(&s->vblank_timer, QEMU_CLOCK_VIRTUAL, ati_vga_vblank_irq, s);
 952}
 953
 954static void ati_vga_reset(DeviceState *dev)
 955{
 956    ATIVGAState *s = ATI_VGA(dev);
 957
 958    timer_del(&s->vblank_timer);
 959    ati_vga_update_irq(s);
 960
 961    /* reset vga */
 962    vga_common_reset(&s->vga);
 963    s->mode = VGA_MODE;
 964}
 965
 966static void ati_vga_exit(PCIDevice *dev)
 967{
 968    ATIVGAState *s = ATI_VGA(dev);
 969
 970    timer_del(&s->vblank_timer);
 971    graphic_console_close(s->vga.con);
 972}
 973
 974static Property ati_vga_properties[] = {
 975    DEFINE_PROP_UINT32("vgamem_mb", ATIVGAState, vga.vram_size_mb, 16),
 976    DEFINE_PROP_STRING("model", ATIVGAState, model),
 977    DEFINE_PROP_UINT16("x-device-id", ATIVGAState, dev_id,
 978                       PCI_DEVICE_ID_ATI_RAGE128_PF),
 979    DEFINE_PROP_BOOL("guest_hwcursor", ATIVGAState, cursor_guest_mode, false),
 980    DEFINE_PROP_END_OF_LIST()
 981};
 982
 983static void ati_vga_class_init(ObjectClass *klass, void *data)
 984{
 985    DeviceClass *dc = DEVICE_CLASS(klass);
 986    PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
 987
 988    dc->reset = ati_vga_reset;
 989    dc->props = ati_vga_properties;
 990    dc->hotpluggable = false;
 991    set_bit(DEVICE_CATEGORY_DISPLAY, dc->categories);
 992
 993    k->class_id = PCI_CLASS_DISPLAY_VGA;
 994    k->vendor_id = PCI_VENDOR_ID_ATI;
 995    k->device_id = PCI_DEVICE_ID_ATI_RAGE128_PF;
 996    k->romfile = "vgabios-ati.bin";
 997    k->realize = ati_vga_realize;
 998    k->exit = ati_vga_exit;
 999}
1000
1001static const TypeInfo ati_vga_info = {
1002    .name = TYPE_ATI_VGA,
1003    .parent = TYPE_PCI_DEVICE,
1004    .instance_size = sizeof(ATIVGAState),
1005    .class_init = ati_vga_class_init,
1006    .interfaces = (InterfaceInfo[]) {
1007          { INTERFACE_CONVENTIONAL_PCI_DEVICE },
1008          { },
1009    },
1010};
1011
1012static void ati_vga_register_types(void)
1013{
1014    type_register_static(&ati_vga_info);
1015}
1016
1017type_init(ati_vga_register_types)
1018