qemu-block
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Qemu-block] [Qemu-devel] [RFC 01/13] hw/m68k: add via support


From: Mark Cave-Ayland
Subject: Re: [Qemu-block] [Qemu-devel] [RFC 01/13] hw/m68k: add via support
Date: Sat, 9 Jun 2018 11:01:31 +0100
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:52.0) Gecko/20100101 Thunderbird/52.8.0

On 08/06/18 21:05, Laurent Vivier wrote:

Signed-off-by: Laurent Vivier <address@hidden>
---
  hw/input/adb.c            |  99 ++++-
  hw/misc/Makefile.objs     |   1 +
  hw/misc/mac_via.c         | 940 ++++++++++++++++++++++++++++++++++++++++++++++
  include/hw/input/adb.h    |   8 +
  include/hw/misc/mac_via.h |  45 +++
  5 files changed, 1092 insertions(+), 1 deletion(-)
  create mode 100644 hw/misc/mac_via.c
  create mode 100644 include/hw/misc/mac_via.h

diff --git a/hw/input/adb.c b/hw/input/adb.c
index 23ae6f0d75..2e5460730c 100644
--- a/hw/input/adb.c
+++ b/hw/input/adb.c
@@ -25,6 +25,17 @@
  #include "hw/input/adb.h"
  #include "adb-internal.h"
+#define ADB_POLL_FREQ 50
+
+/* Apple Macintosh Family Hardware Refenece
+ * Table 19-10 ADB transaction states
+ */
+
+#define STATE_NEW       0
+#define STATE_EVEN      1
+#define STATE_ODD       2
+#define STATE_IDLE      3
+
  /* error codes */
  #define ADB_RET_NOTPRESENT (-2)
@@ -57,7 +68,6 @@ int adb_request(ADBBusState *s, uint8_t *obuf, const uint8_t *buf, int len)
      return ADB_RET_NOTPRESENT;
  }
-/* XXX: move that to cuda ? */
  int adb_poll(ADBBusState *s, uint8_t *obuf, uint16_t poll_mask)
  {
      ADBDevice *d;
@@ -84,6 +94,93 @@ int adb_poll(ADBBusState *s, uint8_t *obuf, uint16_t 
poll_mask)
      return olen;
  }
+int adb_send(ADBBusState *adb, int state, uint8_t data)
+{
+    switch (state) {
+    case STATE_NEW:
+        adb->data_out[0] = data;
+        adb->data_out_index = 1;
+        break;
+    case STATE_EVEN:
+        if ((adb->data_out_index & 1) == 0) {
+            return 0;
+        }
+        adb->data_out[adb->data_out_index++] = data;
+        break;
+    case STATE_ODD:
+        if (adb->data_out_index & 1) {
+            return 0;
+        }
+        adb->data_out[adb->data_out_index++] = data;
+        break;
+    case STATE_IDLE:
+        return 0;
+    }
+    qemu_irq_raise(adb->data_ready);
+    return 1;
+}
+
+int adb_receive(ADBBusState *adb, int state, uint8_t *data)
+{
+    switch (state) {
+    case STATE_NEW:
+        return 0;
+    case STATE_EVEN:
+        if (adb->data_in_size <= 0) {
+            qemu_irq_raise(adb->data_ready);
+            return 0;
+        }
+        if (adb->data_in_index >= adb->data_in_size) {
+            *data = 0;
+            qemu_irq_raise(adb->data_ready);
+            return 1;
+        }
+        if ((adb->data_in_index & 1) == 0) {
+            return 0;
+        }
+        *data = adb->data_in[adb->data_in_index++];
+        break;
+    case STATE_ODD:
+        if (adb->data_in_size <= 0) {
+            qemu_irq_raise(adb->data_ready);
+            return 0;
+        }
+        if (adb->data_in_index >= adb->data_in_size) {
+            *data = 0;
+            qemu_irq_raise(adb->data_ready);
+            return 1;
+        }
+        if (adb->data_in_index & 1) {
+            return 0;
+        }
+        *data = adb->data_in[adb->data_in_index++];
+        break;
+    case STATE_IDLE:
+        if (adb->data_out_index == 0) {
+            return 0;
+        }
+        adb->data_in_size = adb_request(adb, adb->data_in,
+                                        adb->data_out, adb->data_out_index);
+        adb->data_out_index = 0;
+        if (adb->data_in_size < 0) {
+            *data = 0xff;
+            qemu_irq_raise(adb->data_ready);
+            return -1;
+        }
+        if (adb->data_in_size == 0) {
+            return 0;
+        }
+        *data = adb->data_in[0];
+        adb->data_in_index = 1;
+        break;
+    }
+    qemu_irq_raise(adb->data_ready);
+    if (*data == 0xff || *data == 0) {
+        return 0;
+    }
+    return 1;
+}
+
  static const TypeInfo adb_bus_type_info = {
      .name = TYPE_ADB_BUS,
      .parent = TYPE_BUS,

I'm not completely convinced by this part: from working on Mac PMU patches my feeling is that any buffering should be handled by the level above the ADB bus, since once you've sent/received something the supporting logic appears completely different.

Having said that, the ADB bus state part is new so I'm not sure I understand why this is currently needed?

diff --git a/hw/misc/Makefile.objs b/hw/misc/Makefile.objs
index 00e834d0f0..2cd8941faa 100644
--- a/hw/misc/Makefile.objs
+++ b/hw/misc/Makefile.objs
@@ -68,5 +68,6 @@ obj-$(CONFIG_PVPANIC) += pvpanic.o
  obj-$(CONFIG_HYPERV_TESTDEV) += hyperv_testdev.o
  obj-$(CONFIG_AUX) += auxbus.o
  obj-$(CONFIG_ASPEED_SOC) += aspeed_scu.o aspeed_sdmc.o
+obj-$(CONFIG_MAC_VIA) += mac_via.o
  obj-y += mmio_interface.o
  obj-$(CONFIG_MSF2) += msf2-sysreg.o
diff --git a/hw/misc/mac_via.c b/hw/misc/mac_via.c
new file mode 100644
index 0000000000..a6a11c5b3d
--- /dev/null
+++ b/hw/misc/mac_via.c
@@ -0,0 +1,940 @@
+/*
+ * QEMU m68k Macintosh VIA device support
+ *
+ * Copyright (c) 2011-2018 Laurent Vivier
+ *
+ * Some parts from hw/cuda.c
+ *
+ * Copyright (c) 2004-2007 Fabrice Bellard
+ * Copyright (c) 2007 Jocelyn Mayer
+ *
+ * some parts from linux-2.6.29, arch/m68k/include/asm/mac_via.h
+ *
+ * This work is licensed under the terms of the GNU GPL, version 2 or later.
+ * See the COPYING file in the top-level directory.
+ *
+ */
+
+#include "qemu/osdep.h"
+#include "hw/sysbus.h"
+#include "qemu/timer.h"
+#include "hw/misc/mac_via.h"
+#include "hw/input/adb.h"
+#include "sysemu/sysemu.h"
+#include "qemu/cutils.h"
+
+/* debug VIA */
+#undef DEBUG_VIA
+
+#ifdef DEBUG_VIA
+#define VIA_DPRINTF(fmt, ...)                                  \
+    do { printf("VIA%d: " fmt , via, ## __VA_ARGS__); } while (0)
+#else
+#define VIA_DPRINTF(fmt, ...)
+#endif
+
+/*
+ * VIAs: There are two in every machine,
+ */
+
+#define VIA_SIZE (0x2000)
+
+/*
+ * Not all of these are true post MacII I think.
+ * CSA: probably the ones CHRP marks as 'unused' change purposes
+ * when the IWM becomes the SWIM.
+ * http://www.rs6000.ibm.com/resource/technology/chrpio/via5.mak.html
+ * ftp://ftp.austin.ibm.com/pub/technology/spec/chrp/inwork/CHRP_IORef_1.0.pdf
+ *
+ * also, http://developer.apple.com/technotes/hw/hw_09.html claims the
+ * following changes for IIfx:
+ * VIA1A_vSccWrReq not available and that VIA1A_vSync has moved to an IOP.
+ * Also, "All of the functionality of VIA2 has been moved to other chips".
+ */
+
+#define VIA1A_vSccWrReq 0x80   /* SCC write. (input)
+                                * [CHRP] SCC WREQ: Reflects the state of the
+                                * Wait/Request pins from the SCC.
+                                * [Macintosh Family Hardware]
+                                * as CHRP on SE/30,II,IIx,IIcx,IIci.
+                                * on IIfx, "0 means an active request"
+                                */
+#define VIA1A_vRev8     0x40   /* Revision 8 board ???
+                                * [CHRP] En WaitReqB: Lets the WaitReq_L
+                                * signal from port B of the SCC appear on
+                                * the PA7 input pin. Output.
+                                * [Macintosh Family] On the SE/30, this
+                                * is the bit to flip screen buffers.
+                                * 0=alternate, 1=main.
+                                * on II,IIx,IIcx,IIci,IIfx this is a bit
+                                * for Rev ID. 0=II,IIx, 1=IIcx,IIci,IIfx
+                                */
+#define VIA1A_vHeadSel  0x20   /* Head select for IWM.
+                                * [CHRP] unused.
+                                * [Macintosh Family] "Floppy disk
+                                * state-control line SEL" on all but IIfx
+                                */
+#define VIA1A_vOverlay  0x10   /* [Macintosh Family] On SE/30,II,IIx,IIcx
+                                * this bit enables the "Overlay" address
+                                * map in the address decoders as it is on
+                                * reset for mapping the ROM over the reset
+                                * vector. 1=use overlay map.
+                                * On the IIci,IIfx it is another bit of the
+                                * CPU ID: 0=normal IIci, 1=IIci with parity
+                                * feature or IIfx.
+                                * [CHRP] En WaitReqA: Lets the WaitReq_L
+                                * signal from port A of the SCC appear
+                                * on the PA7 input pin (CHRP). Output.
+                                * [MkLinux] "Drive Select"
+                                *  (with 0x20 being 'disk head select')
+                                */
+#define VIA1A_vSync     0x08   /* [CHRP] Sync Modem: modem clock select:
+                                * 1: select the external serial clock to
+                                *    drive the SCC's /RTxCA pin.
+                                * 0: Select the 3.6864MHz clock to drive
+                                *    the SCC cell.
+                                * [Macintosh Family] Correct on all but IIfx
+                                */
+
+/* Macintosh Family Hardware sez: bits 0-2 of VIA1A are volume control
+ * on Macs which had the PWM sound hardware.  Reserved on newer models.
+ * On IIci,IIfx, bits 1-2 are the rest of the CPU ID:
+ * bit 2: 1=IIci, 0=IIfx
+ * bit 1: 1 on both IIci and IIfx.
+ * MkLinux sez bit 0 is 'burnin flag' in this case.
+ * CHRP sez: VIA1A bits 0-2 and 5 are 'unused': if programmed as
+ * inputs, these bits will read 0.
+ */
+#define VIA1A_vVolume   0x07    /* Audio volume mask for PWM */
+#define VIA1A_CPUID0    0x02    /* CPU id bit 0 on RBV, others */
+#define VIA1A_CPUID1    0x04    /* CPU id bit 0 on RBV, others */
+#define VIA1A_CPUID2    0x10    /* CPU id bit 0 on RBV, others */
+#define VIA1A_CPUID3    0x40    /* CPU id bit 0 on RBV, others */
+
+/* Info on VIA1B is from Macintosh Family Hardware & MkLinux.
+ * CHRP offers no info. */
+#define VIA1B_vSound   0x80    /* Sound enable (for compatibility with
+                                * PWM hardware) 0=enabled.
+                                * Also, on IIci w/parity, shows parity error
+                                * 0=error, 1=OK. */
+#define VIA1B_vMystery 0x40    /* On IIci, parity enable. 0=enabled,1=disabled
+                                * On SE/30, vertical sync interrupt enable.
+                                * 0=enabled. This vSync interrupt shows up
+                                * as a slot $E interrupt. */
+#define VIA1B_vADBS2   0x20    /* ADB state input bit 1 (unused on IIfx) */
+#define VIA1B_vADBS1   0x10    /* ADB state input bit 0 (unused on IIfx) */
+#define VIA1B_vADBInt  0x08    /* ADB interrupt 0=interrupt (unused on IIfx)*/
+#define VIA1B_vRTCEnb  0x04    /* Enable Real time clock. 0=enabled. */
+#define VIA1B_vRTCClk  0x02    /* Real time clock serial-clock line. */
+#define VIA1B_vRTCData 0x01    /* Real time clock serial-data line. */
+
+/*
+ *    VIA2 A register is the interrupt lines raised off the nubus
+ *    slots.
+ *      The below info is from 'Macintosh Family Hardware.'
+ *      MkLinux calls the 'IIci internal video IRQ' below the 'RBV slot 0 irq.'
+ *      It also notes that the slot $9 IRQ is the 'Ethernet IRQ' and
+ *      defines the 'Video IRQ' as 0x40 for the 'EVR' VIA work-alike.
+ *      Perhaps OSS uses vRAM1 and vRAM2 for ADB.
+ */
+
+#define VIA2A_vRAM1    0x80    /* RAM size bit 1 (IIci: reserved) */
+#define VIA2A_vRAM0    0x40    /* RAM size bit 0 (IIci: internal video IRQ) */
+#define VIA2A_vIRQE    0x20    /* IRQ from slot $E */
+#define VIA2A_vIRQD    0x10    /* IRQ from slot $D */
+#define VIA2A_vIRQC    0x08    /* IRQ from slot $C */
+#define VIA2A_vIRQB    0x04    /* IRQ from slot $B */
+#define VIA2A_vIRQA    0x02    /* IRQ from slot $A */
+#define VIA2A_vIRQ9    0x01    /* IRQ from slot $9 */
+
+/* RAM size bits decoded as follows:
+ * bit1 bit0  size of ICs in bank A
+ *  0    0    256 kbit
+ *  0    1    1 Mbit
+ *  1    0    4 Mbit
+ *  1    1   16 Mbit
+ */
+
+/*
+ *    Register B has the fun stuff in it
+ */
+
+#define VIA2B_vVBL    0x80    /* VBL output to VIA1 (60.15Hz) driven by
+                               * timer T1.
+                               * on IIci, parity test: 0=test mode.
+                               * [MkLinux] RBV_PARODD: 1=odd,0=even. */
+#define VIA2B_vSndJck 0x40    /* External sound jack status.
+                               * 0=plug is inserted.  On SE/30, always 0 */
+#define VIA2B_vTfr0   0x20    /* Transfer mode bit 0 ack from NuBus */
+#define VIA2B_vTfr1   0x10    /* Transfer mode bit 1 ack from NuBus */
+#define VIA2B_vMode32 0x08    /* 24/32bit switch - doubles as cache flush
+                               * on II, AMU/PMMU control.
+                               *   if AMU, 0=24bit to 32bit translation
+                               *   if PMMU, 1=PMMU is accessing page table.
+                               * on SE/30 tied low.
+                               * on IIx,IIcx,IIfx, unused.
+                               * on IIci/RBV, cache control. 0=flush cache.
+                               */
+#define VIA2B_vPower  0x04   /* Power off, 0=shut off power.
+                              * on SE/30 this signal sent to PDS card.
+                              */
+#define VIA2B_vBusLk  0x02   /* Lock NuBus transactions, 0=locked.
+                              * on SE/30 sent to PDS card.
+                              */
+#define VIA2B_vCDis   0x01   /* Cache control. On IIci, 1=disable cache card
+                              * on others, 0=disable processor's instruction
+                              * and data caches.
+                              */
+
+/* interrupt flags */
+
+#define IRQ_SET         0x80
+
+/* common */
+
+#define VIA_IRQ_TIMER1      0x40
+#define VIA_IRQ_TIMER2      0x20
+
+/* Apple sez: http://developer.apple.com/technotes/ov/ov_04.html
+ * Another example of a valid function that has no ROM support is the use
+ * of the alternate video page for page-flipping animation. Since there
+ * is no ROM call to flip pages, it is necessary to go play with the
+ * right bit in the VIA chip (6522 Versatile Interface Adapter).
+ * [CSA: don't know which one this is, but it's one of 'em!]
+ */
+
+/*
+ *    6522 registers - see databook.
+ * CSA: Assignments for VIA1 confirmed from CHRP spec.
+ */
+
+/* partial address decode.  0xYYXX : XX part for RBV, YY part for VIA */
+/* Note: 15 VIA regs, 8 RBV regs */
+
+#define vBufB    0x0000  /* [VIA/RBV]  Register B */
+#define vBufAH   0x0200  /* [VIA only] Buffer A, with handshake. DON'T USE! */
+#define vDirB    0x0400  /* [VIA only] Data Direction Register B. */
+#define vDirA    0x0600  /* [VIA only] Data Direction Register A. */
+#define vT1CL    0x0800  /* [VIA only] Timer one counter low. */
+#define vT1CH    0x0a00  /* [VIA only] Timer one counter high. */
+#define vT1LL    0x0c00  /* [VIA only] Timer one latches low. */
+#define vT1LH    0x0e00  /* [VIA only] Timer one latches high. */
+#define vT2CL    0x1000  /* [VIA only] Timer two counter low. */
+#define vT2CH    0x1200  /* [VIA only] Timer two counter high. */
+#define vSR      0x1400  /* [VIA only] Shift register. */
+#define vACR     0x1600  /* [VIA only] Auxilary control register. */
+#define vPCR     0x1800  /* [VIA only] Peripheral control register. */
+                         /*            CHRP sez never ever to *write* this.
+                          *            Mac family says never to *change* this.
+                          * In fact we need to initialize it once at start.
+                          */
+#define vIFR     0x1a00  /* [VIA/RBV]  Interrupt flag register. */
+#define vIER     0x1c00  /* [VIA/RBV]  Interrupt enable register. */
+#define vBufA    0x1e00  /* [VIA/RBV] register A (no handshake) */
+
+/* from linux 2.6 drivers/macintosh/via-macii.c */
+
+/* Bits in ACR */
+
+#define VIA1ACR_vShiftCtrl         0x1c        /* Shift register control bits 
*/
+#define VIA1ACR_vShiftExtClk       0x0c        /* Shift on external clock */
+#define VIA1ACR_vShiftOut          0x10        /* Shift out if 1 */
+
+/* Apple Macintosh Family Hardware Refenece
+ * Table 19-10 ADB transaction states
+ */
+
+#define VIA1B_vADB_StateMask    (VIA1B_vADBS1 | VIA1B_vADBS2)
+#define VIA1B_vADB_StateShift   4
+
+typedef struct VIATimer {
+    int index;
+    uint16_t counter; /* Timer counter */
+    uint16_t latch;   /* Timer latch */
+    int64_t next_irq_time;
+    QEMUTimer *timer;
+} VIATimer;
+
+typedef struct VIAState {
+    /* VIA registers */
+    uint8_t a;    /* data register A */
+    uint8_t b;    /* data register B */
+    uint8_t dira; /* data direction register A (1 = output) */
+    uint8_t dirb; /* data direction register B (1 = output) */
+    uint8_t pcr;  /* peripheral control register */
+    uint8_t acr;  /* auxiliary control register */
+    uint8_t ifr;  /* interrupt flag register */
+    uint8_t ier;  /* interrupt enable register */
+    uint8_t sr;   /* shift register */
+
+    uint8_t last_b;
+
+    /* Timers */
+
+    VIATimer timers[2];
+
+    /* IRQs */
+
+    qemu_irq out_irq;
+
+} VIAState;
+
+typedef struct MacVIAState {
+    SysBusDevice busdev;
+
+    /* MMIO */
+
+    MemoryRegion mmio;
+
+    /* VIAs */
+
+    VIAState via[2];
+
+    /* RTC */
+
+    uint32_t tick_offset;
+
+    uint8_t data_out;
+    int data_out_cnt;
+    uint8_t data_in;
+    uint8_t data_in_cnt;
+    uint8_t cmd;
+    int wprotect;
+    int alt;
+
+    /* ADB */
+
+    ADBBusState adb_bus;
+
+    /* external timers */
+
+    QEMUTimer *one_second_timer;
+    QEMUTimer *VBL_timer;
+
+} MacVIAState;
+
+#define VIA_TIMER_FREQ (783360)
+
+static int64_t get_next_irq_time(VIATimer *s, int64_t current_time)
+{
+    int64_t d, next_time;
+
+    /* current counter value */
+    d = muldiv64(current_time, VIA_TIMER_FREQ, NANOSECONDS_PER_SECOND);
+    next_time = d + s->counter;
+    next_time = muldiv64(next_time, NANOSECONDS_PER_SECOND, VIA_TIMER_FREQ);
+    if (next_time <= current_time) {
+        next_time = current_time + 1;
+    }
+    return next_time;
+}
+
+#define T1MODE      0xc0
+#define T1MODE_CONT 0x40
+
+static void via_arm_timer(VIATimer *ti, int64_t current_time)
+{
+    if (!ti->timer) {
+        return;
+    }
+    ti->next_irq_time = get_next_irq_time(ti, current_time);
+    timer_mod(ti->timer, ti->next_irq_time);
+}
+
+static void via_timer_update(VIAState *s, VIATimer *ti,
+                             int64_t current_time)
+{
+    if (!ti->timer) {
+        return;
+    }
+    if (!(s->ier & VIA_IRQ_TIMER1) &&
+        (s->acr & T1MODE) != T1MODE_CONT) {
+        timer_del(ti->timer);
+    } else {
+        ti->counter = ti->latch;
+        via_arm_timer(ti, current_time);
+    }
+}
+
+static void via_update_irq(VIAState *s)
+{
+    if (s->ifr & s->ier) {
+        qemu_irq_raise(s->out_irq);
+    } else {
+        qemu_irq_lower(s->out_irq);
+    }
+}
+
+static void via_timer1(void *opaque)
+{
+    VIAState *s = opaque;
+    VIATimer *ti = &s->timers[0];
+
+    via_timer_update(s, ti, ti->next_irq_time);
+    s->ifr |= VIA_IRQ_TIMER1;
+    via_update_irq(s);
+}
+
+static void via1_VBL_update(MacVIAState *m)
+{
+    if (m->via[0].ifr & m->via[0].ier & VIA1_IRQ_VBLANK) { /* 60 Hz irq */
+        timer_mod(m->VBL_timer, (qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) + 16630)
+                  / 16630 * 16630);
+    } else {
+        timer_del(m->VBL_timer);
+    }
+}
+
+static void via1_VBL(void *opaque)
+{
+    MacVIAState *m = opaque;
+    via1_VBL_update(m);
+    m->via[0].ifr |= VIA1_IRQ_VBLANK;
+    via_update_irq(&m->via[0]);
+}
+
+static void via1_irq_request(VIAState *s, int irq, int level)
+{
+    if (level) {
+        s->ifr |= 1 << irq;
+    } else {
+        s->ifr &= ~(1 << irq);
+    }
+    via_update_irq(s);
+}
+
+static void via2_irq_request(VIAState *s, int irq, int level)
+{
+    if (level) {
+        s->ifr |= 1 << irq;
+    } else {
+        s->ifr &= ~(1 << irq);
+    }
+    via_update_irq(s);
+}
+
+static void via_irq_request(void *opaque, int irq, int level)
+{
+    MacVIAState *s = opaque;
+    if (irq < VIA1_IRQ_NB) {
+        via1_irq_request(&s->via[0], irq, level);
+        return;
+    }
+    irq -= VIA1_IRQ_NB;
+    if (irq < VIA2_IRQ_NB) {
+        via2_irq_request(&s->via[1], irq, level);
+        return;
+    }
+}
+
+static void via1_one_second_update(MacVIAState *m)
+{
+    if (m->via[0].ifr & m->via[0].ier & VIA1_IRQ_ONE_SECOND) {
+        timer_mod(m->one_second_timer, (qemu_clock_get_ms(QEMU_CLOCK_VIRTUAL)
+                  + 1000) / 1000 * 1000);
+    } else {
+        timer_del(m->one_second_timer);
+    }
+}
+
+static void via1_one_second(void *opaque)
+{
+    MacVIAState *m = opaque;
+    via1_one_second_update(m);
+    m->via[0].ifr |= VIA1_IRQ_ONE_SECOND;
+    via_update_irq(&m->via[0]);
+}
+
+static void via_irq_update(MacVIAState *m, int via)
+{
+    switch (via) {
+    case 0:
+        via1_one_second_update(m);
+        via1_VBL(m);
+        break;
+    case 1:
+        break;
+    }
+}
+
+#define RTC_OFFSET 2082844800
+static uint8_t PRAM[256];
+
+static void via1_rtc_update(MacVIAState *m)
+{
+    VIAState *s = &m->via[0];
+
+    if (s->b & VIA1B_vRTCEnb) {
+        return;
+    }
+
+    if (s->dirb & VIA1B_vRTCData) {
+        /* send bits to the RTC */
+        if (!(s->last_b & VIA1B_vRTCClk) && (s->b & VIA1B_vRTCClk)) {
+            m->data_out <<= 1;
+            m->data_out |= s->b & VIA1B_vRTCData;
+            m->data_out_cnt++;
+        }
+    } else {
+        /* receive bits from the RTC */
+        if ((s->last_b & VIA1B_vRTCClk) &&
+            !(s->b & VIA1B_vRTCClk) &&
+            m->data_in_cnt) {
+            s->b = (s->b & ~VIA1B_vRTCData) |
+                   ((m->data_in >> 7) & VIA1B_vRTCData);
+            m->data_in <<= 1;
+            m->data_in_cnt--;
+        }
+    }
+
+    if (m->data_out_cnt == 8) {
+        m->data_out_cnt = 0;
+
+        if (m->cmd == 0) {
+            if (m->data_out & 0x80) {
+                /* this is a read command */
+                uint32_t time = m->tick_offset +
+                               (qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) /
+                               NANOSECONDS_PER_SECOND);
+                if (m->data_out == 0x81) {        /* seconds register 0 */
+                    m->data_in = time & 0xff;
+                    m->data_in_cnt = 8;
+                } else if (m->data_out == 0x85) { /* seconds register 1 */
+                    m->data_in = (time >> 8) & 0xff;
+                    m->data_in_cnt = 8;
+                } else if (m->data_out == 0x89) { /* seconds register 2 */
+                    m->data_in = (time >> 16) & 0xff;
+                    m->data_in_cnt = 8;
+                } else if (m->data_out == 0x8d) { /* seconds register 3 */
+                    m->data_in = (time >> 24) & 0xff;
+                    m->data_in_cnt = 8;
+                } else if ((m->data_out & 0xf3) == 0xa1) {
+                    /* PRAM address 0x10 -> 0x13 */
+                    int addr = (m->data_out >> 2) & 0x03;
+                    m->data_in = PRAM[addr];
+                    m->data_in_cnt = 8;
+                } else if ((m->data_out & 0xf3) == 0xa1) {
+                    /* PRAM address 0x00 -> 0x0f */
+                    int addr = (m->data_out >> 2) & 0x0f;
+                    m->data_in = PRAM[addr];
+                    m->data_in_cnt = 8;
+                } else if ((m->data_out & 0xf8) == 0xb8) {
+                    /* extended memory designator and sector number */
+                    m->cmd = m->data_out;
+                }
+            } else {
+                /* this is a write command */
+                m->cmd = m->data_out;
+            }
+        } else {
+            if (m->cmd & 0x80) {
+                if ((m->cmd & 0xf8) == 0xb8) {
+                    /* extended memory designator and sector number */
+                    int sector = m->cmd & 0x07;
+                    int addr = (m->data_out >> 2) & 0x1f;
+
+                    m->data_in = PRAM[sector * 8 + addr];
+                    m->data_in_cnt = 8;
+                }
+            } else if (!m->wprotect) {
+                /* this is a write command */
+                if (m->alt != 0) {
+                    /* extended memory designator and sector number */
+                    int sector = m->cmd & 0x07;
+                    int addr = (m->alt >> 2) & 0x1f;
+
+                    PRAM[sector * 8 + addr] = m->data_out;
+
+                    m->alt = 0;
+                } else if (m->cmd == 0x01) { /* seconds register 0 */
+                    /* FIXME */
+                } else if (m->cmd == 0x05) { /* seconds register 1 */
+                    /* FIXME */
+                } else if (m->cmd == 0x09) { /* seconds register 2 */
+                    /* FIXME */
+                } else if (m->cmd == 0x0d) { /* seconds register 3 */
+                    /* FIXME */
+                } else if (m->cmd == 0x31) {
+                    /* Test Register */
+                } else if (m->cmd == 0x35) {
+                    /* Write Protect register */
+                    m->wprotect = m->data_out & 1;
+                } else if ((m->cmd & 0xf3) == 0xa1) {
+                    /* PRAM address 0x10 -> 0x13 */
+                    int addr = (m->cmd >> 2) & 0x03;
+                    PRAM[addr] = m->data_out;
+                } else if ((m->cmd & 0xf3) == 0xa1) {
+                    /* PRAM address 0x00 -> 0x0f */
+                    int addr = (m->cmd >> 2) & 0x0f;
+                    PRAM[addr] = m->data_out;
+                } else if ((m->cmd & 0xf8) == 0xb8) {
+                    /* extended memory designator and sector number */
+                    m->alt = m->cmd;
+                }
+            }
+        }
+        m->data_out = 0;
+    }
+}
+
+static void via1_adb_update(MacVIAState *m)
+{
+    VIAState *s = &m->via[0];
+    int state;
+    int ret;
+
+    state = (s->b & VIA1B_vADB_StateMask) >> VIA1B_vADB_StateShift;
+
+    if (s->acr & VIA1ACR_vShiftOut) {
+        /* output mode */
+        ret = adb_send(&m->adb_bus, state, s->sr);
+        if (ret > 0) {
+            s->b &= ~VIA1B_vADBInt;
+        } else {
+            s->b |= VIA1B_vADBInt;
+        }
+    } else {
+        /* input mode */
+        ret = adb_receive(&m->adb_bus, state, &s->sr);
+        if (ret > 0) {
+            s->b &= ~VIA1B_vADBInt;
+        } else {
+            s->b |= VIA1B_vADBInt;
+        }
+    }
+}
+
+static void via_write(void *opaque, hwaddr addr,
+                       uint64_t val, unsigned int size)
+{
+    MacVIAState *m = opaque;
+    VIAState *s;
+    int via;
+
+    via = addr / VIA_SIZE;
+    addr &= VIA_SIZE - 1;
+
+    s = &m->via[via];
+
+    switch (addr) {
+    case vBufA: /* Buffer A */
+        VIA_DPRINTF("writeb: vBufA = %02"PRIx64"\n", val);
+        s->a = (s->a & ~s->dira) | (val & s->dira);
+        break;
+    case vBufB:  /* Register B */
+        VIA_DPRINTF("writeb: vBufB = %02"PRIx64"\n", val);
+        s->b = (s->b & ~s->dirb) | (val & s->dirb);
+        switch (via) {
+        case 0:
+            via1_rtc_update(m);
+            via1_adb_update(m);
+            s->last_b = s->b;
+            break;
+        case 1:
+            if (s->dirb & VIA2B_vPower &&
+                (val & VIA2B_vPower) == 0) {
+                /* shutdown */
+                qemu_system_shutdown_request(SHUTDOWN_CAUSE_GUEST_SHUTDOWN);
+            }
+            break;
+        }
+        break;
+    case vDirA:  /* Data Direction Register A. */
+        VIA_DPRINTF("writeb: vDirA = %02"PRIx64"\n", val);
+        s->dira = val;
+        break;
+    case vDirB:  /* Data Direction Register B. */
+        VIA_DPRINTF("writeb: vDirB = %02"PRIx64"\n", val);
+        s->dirb = val;
+        break;
+    case vT1CL:  /* Timer one counter low. */
+        VIA_DPRINTF("writeb: vT1CL = %02"PRIx64"\n", val);
+        s->timers[0].counter = (s->timers[0].counter & 0xff00) | val;
+        break;
+    case vT1CH:  /* Timer one counter high. */
+        VIA_DPRINTF("writeb: vT1CH = %02"PRIx64"\n", val);
+        s->timers[0].counter = (s->timers[0].counter & 0x00ff) | (val << 8);
+        via_arm_timer(&s->timers[0], qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
+        break;
+    case vT1LL:  /* Timer one latches low. */
+        VIA_DPRINTF("writeb: vT1LL = %02"PRIx64"\n", val);
+        s->timers[0].latch = (s->timers[0].latch & 0xff00) | val;
+        break;
+    case vT1LH:  /* Timer one latches high. */
+        VIA_DPRINTF("writeb: vT1LH = %02"PRIx64"\n", val);
+        s->timers[0].latch = (s->timers[0].latch & 0x00ff) | (val << 8);
+        via_arm_timer(&s->timers[0], qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
+        break;
+    case vT2CL:  /* Timer two counter low. */
+        VIA_DPRINTF("writeb: vT2CL = %02"PRIx64"\n", val);
+        s->timers[1].counter = (s->timers[1].counter & 0xff00) | val;
+        break;
+    case vT2CH:  /* Timer two counter high. */
+        VIA_DPRINTF("writeb: vT2CH = %02"PRIx64"\n", val);
+        s->timers[1].counter = (s->timers[1].counter & 0x00ff) | (val << 8);
+        via_arm_timer(&s->timers[1], qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
+        break;
+    case vSR:    /* Shift register. */
+        VIA_DPRINTF("writeb: vSR = %02"PRIx64"\n", val);
+        s->sr = val;
+        break;
+    case vACR:   /* Auxilary control register. */
+        VIA_DPRINTF("writeb: vACR = %02"PRIx64"\n", val);
+        s->acr = val;
+        via_timer_update(s, &s->timers[0],
+                         qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
+        break;
+    case vPCR:   /* Peripheral control register. */
+        VIA_DPRINTF("writeb: vPCR = %02"PRIx64"\n", val);
+        s->pcr = val;
+        break;
+    case vIFR:   /* Interrupt flag register. */
+        VIA_DPRINTF("writeb: vIFR = %02"PRIx64"\n", val);
+        if (val & IRQ_SET) {
+            /* set bits */
+            s->ifr |= val & 0x7f;
+        } else {
+            /* clear bits */
+            s->ifr &= ~val;
+        }
+        VIA_DPRINTF("            -> %02x\n", s->ifr);
+        via_timer_update(s, &s->timers[0],
+                         qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
+        via_irq_update(m, via);
+        break;
+    case vIER:   /* Interrupt enable register. */
+        VIA_DPRINTF("writeb: vIER = %02"PRIx64"\n", val);
+        if (val & IRQ_SET) {
+            /* set bits */
+            s->ier |= val & 0x7f;
+        } else {
+            /* clear bits */
+            s->ier &= ~val;
+        }
+        VIA_DPRINTF("            -> %02x\n", s->ier);
+        via_timer_update(s, &s->timers[0],
+                         qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
+        via_irq_update(m, via);
+        break;
+    default:
+        VIA_DPRINTF("writeb: addr 0x%08lx val %02"PRIx64"\n", (long)addr, val);
+        break;
+    }
+}
+
+static uint64_t via_read(void *opaque, hwaddr addr,
+                         unsigned int size)
+{
+    MacVIAState *m = opaque;
+    VIAState *s;
+    uint32_t val;
+    int via;
+
+    via = addr / VIA_SIZE;
+    addr &= VIA_SIZE - 1;
+
+    s = &m->via[via];
+
+    switch (addr) {
+    case vBufA: /* Buffer A */
+        val = s->a;
+        VIA_DPRINTF("readb:  vBufA = %02x\n", val);
+        break;
+    case vBufB:  /* Register B */
+        val = s->b;
+        VIA_DPRINTF("readb:  vBufB = %02x\n", val);
+        break;
+    case vDirA:  /* Data Direction Register A. */
+        val = s->dira;
+        VIA_DPRINTF("readb:  vDirA = %02x\n", val);
+        break;
+    case vDirB:  /* Data Direction Register B. */
+        val = s->dirb;
+        VIA_DPRINTF("readb:  vDirB = %02x\n", val);
+        break;
+    case vT1CL:  /* Timer one counter low. */
+        val = s->timers[0].counter & 0x00ff;
+        VIA_DPRINTF("readb:  vT1CL = %02x\n", val);
+        break;
+    case vT1CH:  /* Timer one counter high. */
+        val = (s->timers[0].counter >> 8) & 0x00ff;
+        VIA_DPRINTF("readb:  vT1CH = %02x\n", val);
+        break;
+    case vT1LL:  /* Timer one latches low. */
+        val = s->timers[0].latch & 0x00ff;
+        VIA_DPRINTF("readb:  vT1LL = %02x\n", val);
+        break;
+    case vT1LH:  /* Timer one latches high. */
+        val = (s->timers[0].latch >> 8) & 0x00ff;
+        VIA_DPRINTF("readb:  vT1LH = %02x\n", val);
+        break;
+    case vT2CL:  /* Timer two counter low. */
+        val = s->timers[1].counter & 0x00ff;
+        VIA_DPRINTF("readb:  vT2CL = %02x\n", val);
+        break;
+    case vT2CH:  /* Timer two counter high. */
+        val = (s->timers[1].counter >> 8) & 0x00ff;
+        VIA_DPRINTF("readb:  vT2CH = %02x\n", val);
+        break;
+    case vSR:    /* Shift register. */
+        val = s->sr;
+        VIA_DPRINTF("readb:  vSR = %02x\n", val);
+        break;
+    case vACR:   /* Auxilary control register. */
+        val = s->acr;
+        VIA_DPRINTF("readb:  vACR = %02x\n", val);
+        break;
+    case vPCR:   /* Peripheral control register. */
+        val = s->pcr;
+        VIA_DPRINTF("readb:  vPCR = %02x\n", val);
+        break;
+    case vIFR:   /* Interrupt flag register. */
+        val = s->ifr | ((s->ifr & 0x7f) ? IRQ_SET : 0);
+        VIA_DPRINTF("readb:  vIFR = %02x\n", val);
+        break;
+    case vIER:   /* Interrupt enable register. */
+        val = s->ier | IRQ_SET;
+        VIA_DPRINTF("readb:  vIER = %02x\n", val);
+        break;
+    default:
+        val = 0;
+        VIA_DPRINTF("readb:  addr 0x%08lx val ??\n", (long)addr);
+        break;
+    }
+    return val;
+}
+
+static const MemoryRegionOps via_ops = {
+    .read = via_read,
+    .write = via_write,
+    .endianness = DEVICE_NATIVE_ENDIAN,
+    .valid = {
+        .min_access_size = 1,
+        .max_access_size = 1,
+    },
+};
+
+static void mac_via_reset(DeviceState *dev)
+{
+    MacVIAState *m = MAC_VIA(dev);
+
+    m->via[0].a = 0;
+    /* 1 = disabled */
+    m->via[0].b = VIA1B_vADB_StateMask | VIA1B_vADBInt | VIA1B_vRTCEnb;
+    m->via[0].dira = 0;
+    m->via[0].dirb = 0;
+    m->via[0].pcr = 0;
+    m->via[0].acr = 0;
+    m->via[0].ifr = 0;
+    m->via[0].ier = 0;
+    m->via[0].sr = 0;
+    m->via[0].last_b = 0;
+
+    m->via[0].timers[0].counter = 0;
+    m->via[0].timers[0].latch = 0;
+    m->via[0].timers[1].counter = 0;
+    m->via[0].timers[1].latch = 0;
+
+    m->via[1].a = 0;
+    m->via[1].b = 0;
+    m->via[1].dira = 0;
+    m->via[1].dirb = 0;
+    m->via[1].pcr = 0;
+    m->via[1].acr = 0;
+    m->via[1].ifr = 0;
+    m->via[1].ier = 0;
+    m->via[1].sr = 0;
+    m->via[1].last_b = 0;
+
+    m->via[1].timers[0].counter = 0;
+    m->via[1].timers[0].latch = 0;
+    m->via[1].timers[1].counter = 0;
+    m->via[1].timers[1].latch = 0;
+
+    m->data_out = 0;
+    m->data_out_cnt = 0;
+    m->data_in = 0;
+    m->data_in_cnt = 0;
+    m->cmd = 0;
+    m->wprotect = 0;
+    m->alt = 0;
+}
+
+static void mac_via_realizefn(DeviceState *dev, Error **errp)
+{
+    MacVIAState *m = MAC_VIA(dev);
+    struct tm tm;
+
+    /* VIA 1 */
+
+    m->one_second_timer = timer_new_ms(QEMU_CLOCK_VIRTUAL, via1_one_second, m);
+    m->VBL_timer = timer_new_ns(QEMU_CLOCK_VIRTUAL, via1_VBL, m);
+
+    qemu_get_timedate(&tm, 0);
+    m->tick_offset = (uint32_t)mktimegm(&tm) + RTC_OFFSET;
+
+    /* ouput IRQs */
+
+    m->via[0].timers[0].index = 0;
+    m->via[0].timers[0].timer = timer_new_ns(QEMU_CLOCK_VIRTUAL,
+                                             via_timer1, &m->via[0]);
+    m->via[0].timers[1].index = 1;
+
+    /* VIA 2 */
+
+    /* output IRQs */
+
+    m->via[1].timers[0].index = 0;
+    m->via[1].timers[0].timer = timer_new_ns(QEMU_CLOCK_VIRTUAL,
+                                             via_timer1, &m->via[1]);
+    m->via[1].timers[1].index = 1;
+}
+
+static void mac_via_initfn(Object *obj)
+{
+    SysBusDevice *d = SYS_BUS_DEVICE(obj);
+    MacVIAState *m = MAC_VIA(obj);
+
+    memory_region_init_io(&m->mmio, NULL, &via_ops, m, "via", 2 * VIA_SIZE);
+    sysbus_init_mmio(d, &m->mmio);
+
+    /* input IRQs */
+
+    qdev_init_gpio_in(DEVICE(d), via_irq_request, VIA1_IRQ_NB + VIA2_IRQ_NB);
+
+    /* ouput IRQs */
+
+    sysbus_init_irq(d, &m->via[0].out_irq);
+    sysbus_init_irq(d, &m->via[1].out_irq);
+
+    /* ABD */
+
+    qbus_create_inplace((BusState *)&m->adb_bus, sizeof(m->adb_bus),
+                        TYPE_ADB_BUS, DEVICE(obj), "adb.0");
+
+    m->adb_bus.data_ready = qdev_get_gpio_in(DEVICE(d),
+                                             VIA1_IRQ_ADB_READY_BIT);
+}
+
+static void mac_via_class_init(ObjectClass *oc, void *data)
+{
+    DeviceClass *dc = DEVICE_CLASS(oc);
+
+    dc->realize = mac_via_realizefn;
+    dc->reset = mac_via_reset;
+}
+
+static TypeInfo mac_via_info = {
+    .name = TYPE_MAC_VIA,
+    .parent = TYPE_SYS_BUS_DEVICE,
+    .instance_size = sizeof(MacVIAState),
+    .instance_init = mac_via_initfn,
+    .class_init = mac_via_class_init,
+};
+
+static void mac_via_register_types(void)
+{
+    type_register_static(&mac_via_info);
+}
+
+type_init(mac_via_register_types);
diff --git a/include/hw/input/adb.h b/include/hw/input/adb.h
index 3ae8445e95..ce393004eb 100644
--- a/include/hw/input/adb.h
+++ b/include/hw/input/adb.h
@@ -75,6 +75,12 @@ struct ADBBusState {
      ADBDevice *devices[MAX_ADB_DEVICES];
      int nb_devices;
      int poll_index;
+    qemu_irq data_ready;
+    int data_in_size;
+    int data_in_index;
+    int data_out_index;
+    uint8_t data_in[128];
+    uint8_t data_out[16];
  };
int adb_request(ADBBusState *s, uint8_t *buf_out,
@@ -84,4 +90,6 @@ int adb_poll(ADBBusState *s, uint8_t *buf_out, uint16_t 
poll_mask);
  #define TYPE_ADB_KEYBOARD "adb-keyboard"
  #define TYPE_ADB_MOUSE "adb-mouse"
+int adb_send(ADBBusState *adb, int state, uint8_t data);
+int adb_receive(ADBBusState *adb, int state, uint8_t *data);
  #endif /* ADB_H */
diff --git a/include/hw/misc/mac_via.h b/include/hw/misc/mac_via.h
new file mode 100644
index 0000000000..e106133c2a
--- /dev/null
+++ b/include/hw/misc/mac_via.h
@@ -0,0 +1,45 @@
+/*
+ *
+ * Copyright (c) 2011-2018 Laurent Vivier
+ *
+ * This work is licensed under the terms of the GNU GPL, version 2 or later.
+ * See the COPYING file in the top-level directory.
+ */
+
+#ifndef HW_MISC_MAC_VIA_H
+#define HW_MISC_MAC_VIA_H
+#define TYPE_MAC_VIA "mac_via"
+#define MAC_VIA(obj)   OBJECT_CHECK(MacVIAState, (obj), TYPE_MAC_VIA)
+
+/* VIA1 */
+
+#define VIA1_IRQ_ONE_SECOND_BIT 0
+#define VIA1_IRQ_VBLANK_BIT     1
+#define VIA1_IRQ_ADB_READY_BIT  2
+#define VIA1_IRQ_ADB_DATA_BIT   3
+#define VIA1_IRQ_ADB_CLOCK_BIT  4
+
+#define VIA1_IRQ_NB             8
+
+#define VIA1_IRQ_ONE_SECOND (1 << VIA1_IRQ_ONE_SECOND_BIT)
+#define VIA1_IRQ_VBLANK     (1 << VIA1_IRQ_VBLANK_BIT)
+#define VIA1_IRQ_ADB_READY  (1 << VIA1_IRQ_ADB_READY_BIT)
+#define VIA1_IRQ_ADB_DATA   (1 << VIA1_IRQ_ADB_DATA_BIT)
+#define VIA1_IRQ_ADB_CLOCK  (1 << VIA1_IRQ_ADB_CLOCK_BIT)
+
+/* VIA2 */
+
+#define VIA2_IRQ_SCSI_DATA_BIT  (VIA1_IRQ_NB + 0)
+#define VIA2_IRQ_SLOT_BIT       (VIA1_IRQ_NB + 1)
+#define VIA2_IRQ_UNUSED_BIT     (VIA1_IRQ_NB + 2)
+#define VIA2_IRQ_SCSI_BIT       (VIA1_IRQ_NB + 3)
+#define VIA2_IRQ_ASC_BIT        (VIA1_IRQ_NB + 4)
+
+#define VIA2_IRQ_NB             8
+
+#define VIA2_IRQ_SCSI_DATA  (1 << VIA2_IRQ_SCSI_DATA_BIT)
+#define VIA2_IRQ_SLOT       (1 << VIA2_IRQ_SLOT_BIT)
+#define VIA2_IRQ_UNUSED     (1 << VIA2_IRQ_SCSI_BIT)
+#define VIA2_IRQ_SCSI       (1 << VIA2_IRQ_UNUSED_BIT)
+#define VIA2_IRQ_ASC        (1 << VIA2_IRQ_ASC_BIT)
+#endif

Yeah, we can certainly remove a huge chunk of this by converting over to the mos6522 device. My last set of updates to CUDA a couple of days ago are probably the best reference, but I can probably find some time to do the basic conversion for you at some point...


ATB,

Mark.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]