]> git.proxmox.com Git - qemu.git/blobdiff - hw/slavio_timer.c
Merge remote-tracking branch 'spice/spice.v39' into staging
[qemu.git] / hw / slavio_timer.c
index b5f9ec32a143960ac67b71d773a3d12bddad131c..5511313687c2048ce130ec13cc6a8a8be18db21e 100644 (file)
  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  * THE SOFTWARE.
  */
-#include "hw.h"
+
 #include "sun4m.h"
 #include "qemu-timer.h"
-
-//#define DEBUG_TIMER
-
-#ifdef DEBUG_TIMER
-#define DPRINTF(fmt, ...)                                       \
-    do { printf("TIMER: " fmt , ## __VA_ARGS__); } while (0)
-#else
-#define DPRINTF(fmt, ...) do {} while (0)
-#endif
+#include "sysbus.h"
+#include "trace.h"
 
 /*
  * Registers of hardware timer in sun4m.
 
 #define MAX_CPUS 16
 
-typedef struct SLAVIO_TIMERState {
+typedef struct CPUTimerState {
     qemu_irq irq;
     ptimer_state *timer;
     uint32_t count, counthigh, reached;
     uint64_t limit;
     // processor only
     uint32_t running;
-    struct SLAVIO_TIMERState *master;
-    uint32_t slave_index;
-    // system only
-    uint32_t num_slaves;
-    struct SLAVIO_TIMERState *slave[MAX_CPUS];
-    uint32_t slave_mode;
+} CPUTimerState;
+
+typedef struct SLAVIO_TIMERState {
+    SysBusDevice busdev;
+    uint32_t num_cpus;
+    CPUTimerState cputimer[MAX_CPUS + 1];
+    uint32_t cputimer_mode;
 } SLAVIO_TIMERState;
 
+typedef struct TimerContext {
+    SLAVIO_TIMERState *s;
+    unsigned int timer_index; /* 0 for system, 1 ... MAX_CPUS for CPU timers */
+} TimerContext;
+
 #define SYS_TIMER_SIZE 0x14
 #define CPU_TIMER_SIZE 0x10
 
-#define SYS_TIMER_OFFSET      0x10000ULL
-#define CPU_TIMER_OFFSET(cpu) (0x1000ULL * cpu)
-
 #define TIMER_LIMIT         0
 #define TIMER_COUNTER       1
 #define TIMER_COUNTER_NORST 2
@@ -84,332 +80,345 @@ typedef struct SLAVIO_TIMERState {
 #define TIMER_MAX_COUNT32  0x7ffffe00ULL
 #define TIMER_REACHED      0x80000000
 #define TIMER_PERIOD       500ULL // 500ns
-#define LIMIT_TO_PERIODS(l) ((l) >> 9)
-#define PERIODS_TO_LIMIT(l) ((l) << 9)
+#define LIMIT_TO_PERIODS(l) (((l) >> 9) - 1)
+#define PERIODS_TO_LIMIT(l) (((l) + 1) << 9)
 
-static int slavio_timer_is_user(SLAVIO_TIMERState *s)
+static int slavio_timer_is_user(TimerContext *tc)
 {
-    return s->master && (s->master->slave_mode & (1 << s->slave_index));
+    SLAVIO_TIMERState *s = tc->s;
+    unsigned int timer_index = tc->timer_index;
+
+    return timer_index != 0 && (s->cputimer_mode & (1 << (timer_index - 1)));
 }
 
 // Update count, set irq, update expire_time
 // Convert from ptimer countdown units
-static void slavio_timer_get_out(SLAVIO_TIMERState *s)
+static void slavio_timer_get_out(CPUTimerState *t)
 {
     uint64_t count, limit;
 
-    if (s->limit == 0) /* free-run processor or system counter */
+    if (t->limit == 0) { /* free-run system or processor counter */
         limit = TIMER_MAX_COUNT32;
-    else
-        limit = s->limit;
-
-    if (s->timer)
-        count = limit - PERIODS_TO_LIMIT(ptimer_get_count(s->timer));
-    else
-        count = 0;
-
-    DPRINTF("get_out: limit %" PRIx64 " count %x%08x\n", s->limit,
-            s->counthigh, s->count);
-    s->count = count & TIMER_COUNT_MASK32;
-    s->counthigh = count >> 32;
+    } else {
+        limit = t->limit;
+    }
+    count = limit - PERIODS_TO_LIMIT(ptimer_get_count(t->timer));
+
+    trace_slavio_timer_get_out(t->limit, t->counthigh, t->count);
+    t->count = count & TIMER_COUNT_MASK32;
+    t->counthigh = count >> 32;
 }
 
 // timer callback
 static void slavio_timer_irq(void *opaque)
 {
-    SLAVIO_TIMERState *s = opaque;
-
-    slavio_timer_get_out(s);
-    DPRINTF("callback: count %x%08x\n", s->counthigh, s->count);
-    s->reached = TIMER_REACHED;
-    if (!slavio_timer_is_user(s))
-        qemu_irq_raise(s->irq);
+    TimerContext *tc = opaque;
+    SLAVIO_TIMERState *s = tc->s;
+    CPUTimerState *t = &s->cputimer[tc->timer_index];
+
+    slavio_timer_get_out(t);
+    trace_slavio_timer_irq(t->counthigh, t->count);
+    /* if limit is 0 (free-run), there will be no match */
+    if (t->limit != 0) {
+        t->reached = TIMER_REACHED;
+    }
+    /* there is no interrupt if user timer or free-run */
+    if (!slavio_timer_is_user(tc) && t->limit != 0) {
+        qemu_irq_raise(t->irq);
+    }
 }
 
 static uint32_t slavio_timer_mem_readl(void *opaque, target_phys_addr_t addr)
 {
-    SLAVIO_TIMERState *s = opaque;
+    TimerContext *tc = opaque;
+    SLAVIO_TIMERState *s = tc->s;
     uint32_t saddr, ret;
+    unsigned int timer_index = tc->timer_index;
+    CPUTimerState *t = &s->cputimer[timer_index];
 
     saddr = addr >> 2;
     switch (saddr) {
     case TIMER_LIMIT:
         // read limit (system counter mode) or read most signifying
         // part of counter (user mode)
-        if (slavio_timer_is_user(s)) {
+        if (slavio_timer_is_user(tc)) {
             // read user timer MSW
-            slavio_timer_get_out(s);
-            ret = s->counthigh | s->reached;
+            slavio_timer_get_out(t);
+            ret = t->counthigh | t->reached;
         } else {
             // read limit
             // clear irq
-            qemu_irq_lower(s->irq);
-            s->reached = 0;
-            ret = s->limit & TIMER_LIMIT_MASK32;
+            qemu_irq_lower(t->irq);
+            t->reached = 0;
+            ret = t->limit & TIMER_LIMIT_MASK32;
         }
         break;
     case TIMER_COUNTER:
         // read counter and reached bit (system mode) or read lsbits
         // of counter (user mode)
-        slavio_timer_get_out(s);
-        if (slavio_timer_is_user(s)) // read user timer LSW
-            ret = s->count & TIMER_MAX_COUNT64;
-        else // read limit
-            ret = (s->count & TIMER_MAX_COUNT32) | s->reached;
+        slavio_timer_get_out(t);
+        if (slavio_timer_is_user(tc)) { // read user timer LSW
+            ret = t->count & TIMER_MAX_COUNT64;
+        } else { // read limit
+            ret = (t->count & TIMER_MAX_COUNT32) |
+                t->reached;
+        }
         break;
     case TIMER_STATUS:
         // only available in processor counter/timer
         // read start/stop status
-        ret = s->running;
+        if (timer_index > 0) {
+            ret = t->running;
+        } else {
+            ret = 0;
+        }
         break;
     case TIMER_MODE:
         // only available in system counter
         // read user/system mode
-        ret = s->slave_mode;
+        ret = s->cputimer_mode;
         break;
     default:
-        DPRINTF("invalid read address " TARGET_FMT_plx "\n", addr);
+        trace_slavio_timer_mem_readl_invalid(addr);
         ret = 0;
         break;
     }
-    DPRINTF("read " TARGET_FMT_plx " = %08x\n", addr, ret);
-
+    trace_slavio_timer_mem_readl(addr, ret);
     return ret;
 }
 
 static void slavio_timer_mem_writel(void *opaque, target_phys_addr_t addr,
                                     uint32_t val)
 {
-    SLAVIO_TIMERState *s = opaque;
+    TimerContext *tc = opaque;
+    SLAVIO_TIMERState *s = tc->s;
     uint32_t saddr;
+    unsigned int timer_index = tc->timer_index;
+    CPUTimerState *t = &s->cputimer[timer_index];
 
-    DPRINTF("write " TARGET_FMT_plx " %08x\n", addr, val);
+    trace_slavio_timer_mem_writel(addr, val);
     saddr = addr >> 2;
     switch (saddr) {
     case TIMER_LIMIT:
-        if (slavio_timer_is_user(s)) {
+        if (slavio_timer_is_user(tc)) {
             uint64_t count;
 
             // set user counter MSW, reset counter
-            s->limit = TIMER_MAX_COUNT64;
-            s->counthigh = val & (TIMER_MAX_COUNT64 >> 32);
-            s->reached = 0;
-            count = ((uint64_t)s->counthigh << 32) | s->count;
-            DPRINTF("processor %d user timer set to %016llx\n", s->slave_index,
-                    count);
-            if (s->timer)
-                ptimer_set_count(s->timer, LIMIT_TO_PERIODS(s->limit - count));
+            t->limit = TIMER_MAX_COUNT64;
+            t->counthigh = val & (TIMER_MAX_COUNT64 >> 32);
+            t->reached = 0;
+            count = ((uint64_t)t->counthigh << 32) | t->count;
+            trace_slavio_timer_mem_writel_limit(timer_index, count);
+            ptimer_set_count(t->timer, LIMIT_TO_PERIODS(t->limit - count));
         } else {
             // set limit, reset counter
-            qemu_irq_lower(s->irq);
-            s->limit = val & TIMER_MAX_COUNT32;
-            if (s->timer) {
-                if (s->limit == 0) /* free-run */
-                    ptimer_set_limit(s->timer,
+            qemu_irq_lower(t->irq);
+            t->limit = val & TIMER_MAX_COUNT32;
+            if (t->timer) {
+                if (t->limit == 0) { /* free-run */
+                    ptimer_set_limit(t->timer,
                                      LIMIT_TO_PERIODS(TIMER_MAX_COUNT32), 1);
-                else
-                    ptimer_set_limit(s->timer, LIMIT_TO_PERIODS(s->limit), 1);
+                } else {
+                    ptimer_set_limit(t->timer, LIMIT_TO_PERIODS(t->limit), 1);
+                }
             }
         }
         break;
     case TIMER_COUNTER:
-        if (slavio_timer_is_user(s)) {
+        if (slavio_timer_is_user(tc)) {
             uint64_t count;
 
             // set user counter LSW, reset counter
-            s->limit = TIMER_MAX_COUNT64;
-            s->count = val & TIMER_MAX_COUNT64;
-            s->reached = 0;
-            count = ((uint64_t)s->counthigh) << 32 | s->count;
-            DPRINTF("processor %d user timer set to %016llx\n", s->slave_index,
-                    count);
-            if (s->timer)
-                ptimer_set_count(s->timer, LIMIT_TO_PERIODS(s->limit - count));
-        } else
-            DPRINTF("not user timer\n");
+            t->limit = TIMER_MAX_COUNT64;
+            t->count = val & TIMER_MAX_COUNT64;
+            t->reached = 0;
+            count = ((uint64_t)t->counthigh) << 32 | t->count;
+            trace_slavio_timer_mem_writel_limit(timer_index, count);
+            ptimer_set_count(t->timer, LIMIT_TO_PERIODS(t->limit - count));
+        } else {
+            trace_slavio_timer_mem_writel_counter_invalid();
+        }
         break;
     case TIMER_COUNTER_NORST:
         // set limit without resetting counter
-        s->limit = val & TIMER_MAX_COUNT32;
-        if (s->timer) {
-            if (s->limit == 0) /* free-run */
-                ptimer_set_limit(s->timer,
-                                 LIMIT_TO_PERIODS(TIMER_MAX_COUNT32), 0);
-            else
-                ptimer_set_limit(s->timer, LIMIT_TO_PERIODS(s->limit), 0);
+        t->limit = val & TIMER_MAX_COUNT32;
+        if (t->limit == 0) { /* free-run */
+            ptimer_set_limit(t->timer, LIMIT_TO_PERIODS(TIMER_MAX_COUNT32), 0);
+        } else {
+            ptimer_set_limit(t->timer, LIMIT_TO_PERIODS(t->limit), 0);
         }
         break;
     case TIMER_STATUS:
-        if (slavio_timer_is_user(s)) {
+        if (slavio_timer_is_user(tc)) {
             // start/stop user counter
-            if ((val & 1) && !s->running) {
-                DPRINTF("processor %d user timer started\n", s->slave_index);
-                if (s->timer)
-                    ptimer_run(s->timer, 0);
-                s->running = 1;
-            } else if (!(val & 1) && s->running) {
-                DPRINTF("processor %d user timer stopped\n", s->slave_index);
-                if (s->timer)
-                    ptimer_stop(s->timer);
-                s->running = 0;
+            if ((val & 1) && !t->running) {
+                trace_slavio_timer_mem_writel_status_start(timer_index);
+                ptimer_run(t->timer, 0);
+                t->running = 1;
+            } else if (!(val & 1) && t->running) {
+                trace_slavio_timer_mem_writel_status_stop(timer_index);
+                ptimer_stop(t->timer);
+                t->running = 0;
             }
         }
         break;
     case TIMER_MODE:
-        if (s->master == NULL) {
+        if (timer_index == 0) {
             unsigned int i;
 
-            for (i = 0; i < s->num_slaves; i++) {
+            for (i = 0; i < s->num_cpus; i++) {
                 unsigned int processor = 1 << i;
+                CPUTimerState *curr_timer = &s->cputimer[i + 1];
 
                 // check for a change in timer mode for this processor
-                if ((val & processor) != (s->slave_mode & processor)) {
+                if ((val & processor) != (s->cputimer_mode & processor)) {
                     if (val & processor) { // counter -> user timer
-                        qemu_irq_lower(s->slave[i]->irq);
+                        qemu_irq_lower(curr_timer->irq);
                         // counters are always running
-                        ptimer_stop(s->slave[i]->timer);
-                        s->slave[i]->running = 0;
+                        ptimer_stop(curr_timer->timer);
+                        curr_timer->running = 0;
                         // user timer limit is always the same
-                        s->slave[i]->limit = TIMER_MAX_COUNT64;
-                        ptimer_set_limit(s->slave[i]->timer,
-                                         LIMIT_TO_PERIODS(s->slave[i]->limit),
+                        curr_timer->limit = TIMER_MAX_COUNT64;
+                        ptimer_set_limit(curr_timer->timer,
+                                         LIMIT_TO_PERIODS(curr_timer->limit),
                                          1);
                         // set this processors user timer bit in config
                         // register
-                        s->slave_mode |= processor;
-                        DPRINTF("processor %d changed from counter to user "
-                                "timer\n", s->slave[i]->slave_index);
+                        s->cputimer_mode |= processor;
+                        trace_slavio_timer_mem_writel_mode_user(timer_index);
                     } else { // user timer -> counter
                         // stop the user timer if it is running
-                        if (s->slave[i]->running)
-                            ptimer_stop(s->slave[i]->timer);
+                        if (curr_timer->running) {
+                            ptimer_stop(curr_timer->timer);
+                        }
                         // start the counter
-                        ptimer_run(s->slave[i]->timer, 0);
-                        s->slave[i]->running = 1;
+                        ptimer_run(curr_timer->timer, 0);
+                        curr_timer->running = 1;
                         // clear this processors user timer bit in config
                         // register
-                        s->slave_mode &= ~processor;
-                        DPRINTF("processor %d changed from user timer to "
-                                "counter\n", s->slave[i]->slave_index);
+                        s->cputimer_mode &= ~processor;
+                        trace_slavio_timer_mem_writel_mode_counter(timer_index);
                     }
                 }
             }
-        } else
-            DPRINTF("not system timer\n");
+        } else {
+            trace_slavio_timer_mem_writel_mode_invalid();
+        }
         break;
     default:
-        DPRINTF("invalid write address " TARGET_FMT_plx "\n", addr);
+        trace_slavio_timer_mem_writel_invalid(addr);
         break;
     }
 }
 
-static CPUReadMemoryFunc *slavio_timer_mem_read[3] = {
+static CPUReadMemoryFunc * const slavio_timer_mem_read[3] = {
     NULL,
     NULL,
     slavio_timer_mem_readl,
 };
 
-static CPUWriteMemoryFunc *slavio_timer_mem_write[3] = {
+static CPUWriteMemoryFunc * const slavio_timer_mem_write[3] = {
     NULL,
     NULL,
     slavio_timer_mem_writel,
 };
 
-static void slavio_timer_save(QEMUFile *f, void *opaque)
-{
-    SLAVIO_TIMERState *s = opaque;
-
-    qemu_put_be64s(f, &s->limit);
-    qemu_put_be32s(f, &s->count);
-    qemu_put_be32s(f, &s->counthigh);
-    qemu_put_be32s(f, &s->reached);
-    qemu_put_be32s(f, &s->running);
-    if (s->timer)
-        qemu_put_ptimer(f, s->timer);
-}
-
-static int slavio_timer_load(QEMUFile *f, void *opaque, int version_id)
-{
-    SLAVIO_TIMERState *s = opaque;
-
-    if (version_id != 3)
-        return -EINVAL;
-
-    qemu_get_be64s(f, &s->limit);
-    qemu_get_be32s(f, &s->count);
-    qemu_get_be32s(f, &s->counthigh);
-    qemu_get_be32s(f, &s->reached);
-    qemu_get_be32s(f, &s->running);
-    if (s->timer)
-        qemu_get_ptimer(f, s->timer);
+static const VMStateDescription vmstate_timer = {
+    .name ="timer",
+    .version_id = 3,
+    .minimum_version_id = 3,
+    .minimum_version_id_old = 3,
+    .fields      = (VMStateField []) {
+        VMSTATE_UINT64(limit, CPUTimerState),
+        VMSTATE_UINT32(count, CPUTimerState),
+        VMSTATE_UINT32(counthigh, CPUTimerState),
+        VMSTATE_UINT32(reached, CPUTimerState),
+        VMSTATE_UINT32(running, CPUTimerState),
+        VMSTATE_PTIMER(timer, CPUTimerState),
+        VMSTATE_END_OF_LIST()
+    }
+};
 
-    return 0;
-}
+static const VMStateDescription vmstate_slavio_timer = {
+    .name ="slavio_timer",
+    .version_id = 3,
+    .minimum_version_id = 3,
+    .minimum_version_id_old = 3,
+    .fields      = (VMStateField []) {
+        VMSTATE_STRUCT_ARRAY(cputimer, SLAVIO_TIMERState, MAX_CPUS + 1, 3,
+                             vmstate_timer, CPUTimerState),
+        VMSTATE_END_OF_LIST()
+    }
+};
 
-static void slavio_timer_reset(void *opaque)
+static void slavio_timer_reset(DeviceState *d)
 {
-    SLAVIO_TIMERState *s = opaque;
-
-    s->limit = 0;
-    s->count = 0;
-    s->reached = 0;
-    s->slave_mode = 0;
-    if (!s->master || s->slave_index < s->master->num_slaves) {
-        ptimer_set_limit(s->timer, LIMIT_TO_PERIODS(TIMER_MAX_COUNT32), 1);
-        ptimer_run(s->timer, 0);
+    SLAVIO_TIMERState *s = container_of(d, SLAVIO_TIMERState, busdev.qdev);
+    unsigned int i;
+    CPUTimerState *curr_timer;
+
+    for (i = 0; i <= MAX_CPUS; i++) {
+        curr_timer = &s->cputimer[i];
+        curr_timer->limit = 0;
+        curr_timer->count = 0;
+        curr_timer->reached = 0;
+        if (i <= s->num_cpus) {
+            ptimer_set_limit(curr_timer->timer,
+                             LIMIT_TO_PERIODS(TIMER_MAX_COUNT32), 1);
+            ptimer_run(curr_timer->timer, 0);
+            curr_timer->running = 1;
+        }
     }
-    s->running = 1;
-    qemu_irq_lower(s->irq);
+    s->cputimer_mode = 0;
 }
 
-static SLAVIO_TIMERState *slavio_timer_init(target_phys_addr_t addr,
-                                            qemu_irq irq,
-                                            SLAVIO_TIMERState *master,
-                                            uint32_t slave_index)
+static int slavio_timer_init1(SysBusDevice *dev)
 {
-    int slavio_timer_io_memory;
-    SLAVIO_TIMERState *s;
+    int io;
+    SLAVIO_TIMERState *s = FROM_SYSBUS(SLAVIO_TIMERState, dev);
     QEMUBH *bh;
+    unsigned int i;
+    TimerContext *tc;
+
+    for (i = 0; i <= MAX_CPUS; i++) {
+        tc = qemu_mallocz(sizeof(TimerContext));
+        tc->s = s;
+        tc->timer_index = i;
+
+        bh = qemu_bh_new(slavio_timer_irq, tc);
+        s->cputimer[i].timer = ptimer_init(bh);
+        ptimer_set_period(s->cputimer[i].timer, TIMER_PERIOD);
+
+        io = cpu_register_io_memory(slavio_timer_mem_read,
+                                    slavio_timer_mem_write, tc,
+                                    DEVICE_NATIVE_ENDIAN);
+        if (i == 0) {
+            sysbus_init_mmio(dev, SYS_TIMER_SIZE, io);
+        } else {
+            sysbus_init_mmio(dev, CPU_TIMER_SIZE, io);
+        }
 
-    s = qemu_mallocz(sizeof(SLAVIO_TIMERState));
-    s->irq = irq;
-    s->master = master;
-    s->slave_index = slave_index;
-    if (!master || slave_index < master->num_slaves) {
-        bh = qemu_bh_new(slavio_timer_irq, s);
-        s->timer = ptimer_init(bh);
-        ptimer_set_period(s->timer, TIMER_PERIOD);
+        sysbus_init_irq(dev, &s->cputimer[i].irq);
     }
 
-    slavio_timer_io_memory = cpu_register_io_memory(0, slavio_timer_mem_read,
-                                                    slavio_timer_mem_write, s);
-    if (master)
-        cpu_register_physical_memory(addr, CPU_TIMER_SIZE,
-                                     slavio_timer_io_memory);
-    else
-        cpu_register_physical_memory(addr, SYS_TIMER_SIZE,
-                                     slavio_timer_io_memory);
-    register_savevm("slavio_timer", addr, 3, slavio_timer_save,
-                    slavio_timer_load, s);
-    qemu_register_reset(slavio_timer_reset, 0, s);
-    slavio_timer_reset(s);
-
-    return s;
+    return 0;
 }
 
-void slavio_timer_init_all(target_phys_addr_t base, qemu_irq master_irq,
-                           qemu_irq *cpu_irqs, unsigned int num_cpus)
-{
-    SLAVIO_TIMERState *master;
-    unsigned int i;
-
-    master = slavio_timer_init(base + SYS_TIMER_OFFSET, master_irq, NULL, 0);
-
-    master->num_slaves = num_cpus;
-
-    for (i = 0; i < MAX_CPUS; i++) {
-        master->slave[i] = slavio_timer_init(base + (target_phys_addr_t)
-                                             CPU_TIMER_OFFSET(i),
-                                             cpu_irqs[i], master, i);
+static SysBusDeviceInfo slavio_timer_info = {
+    .init = slavio_timer_init1,
+    .qdev.name  = "slavio_timer",
+    .qdev.size  = sizeof(SLAVIO_TIMERState),
+    .qdev.vmsd  = &vmstate_slavio_timer,
+    .qdev.reset = slavio_timer_reset,
+    .qdev.props = (Property[]) {
+        DEFINE_PROP_UINT32("num_cpus",  SLAVIO_TIMERState, num_cpus,  0),
+        DEFINE_PROP_END_OF_LIST(),
     }
+};
+
+static void slavio_timer_register_devices(void)
+{
+    sysbus_register_withprop(&slavio_timer_info);
 }
+
+device_init(slavio_timer_register_devices)