* 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, args...) \
-do { printf("TIMER: " fmt , ##args); } while (0)
-#else
-#define DPRINTF(fmt, args...)
-#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
- int running;
- struct SLAVIO_TIMERState *master;
- int slave_index;
- // system only
- struct SLAVIO_TIMERState *slave[MAX_CPUS];
- uint32_t slave_mode;
+ uint32_t running;
+} CPUTimerState;
+
+typedef struct SLAVIO_TIMERState {
+ SysBusDevice busdev;
+ uint32_t num_cpus;
+ CPUTimerState cputimer[MAX_CPUS + 1];
+ uint32_t cputimer_mode;
} SLAVIO_TIMERState;
-#define TIMER_MAXADDR 0x1f
+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
#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;
+ uint64_t count, limit;
+
+ if (t->limit == 0) { /* free-run system or processor counter */
+ limit = TIMER_MAX_COUNT32;
+ } else {
+ limit = t->limit;
+ }
+ count = limit - PERIODS_TO_LIMIT(ptimer_get_count(t->timer));
- count = s->limit - PERIODS_TO_LIMIT(ptimer_get_count(s->timer));
- 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;
+ 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);
- if (!slavio_timer_is_user(s)) {
- s->reached = TIMER_REACHED;
- 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 & TIMER_MAXADDR) >> 2;
+ 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;
+ 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_COUNT_MASK32;
- 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;
- int reload = 0;
+ unsigned int timer_index = tc->timer_index;
+ CPUTimerState *t = &s->cputimer[timer_index];
- DPRINTF("write " TARGET_FMT_plx " %08x\n", addr, val);
- saddr = (addr & TIMER_MAXADDR) >> 2;
+ 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
- qemu_irq_lower(s->irq);
- s->limit = TIMER_MAX_COUNT64;
- DPRINTF("processor %d user timer reset\n", s->slave_index);
- ptimer_set_limit(s->timer, LIMIT_TO_PERIODS(s->limit), 1);
+ 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->limit)
- s->limit = TIMER_MAX_COUNT32;
- ptimer_set_limit(s->timer, s->limit >> 9, 1);
+ 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(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
- qemu_irq_lower(s->irq);
- s->limit = TIMER_MAX_COUNT64;
- DPRINTF("processor %d user timer reset\n", s->slave_index);
- ptimer_set_limit(s->timer, LIMIT_TO_PERIODS(s->limit), 1);
- } 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->limit)
- s->limit = TIMER_MAX_COUNT32;
- ptimer_set_limit(s->timer, LIMIT_TO_PERIODS(s->limit), reload);
+ 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);
- ptimer_run(s->timer, 0);
- s->running = 1;
- } else if (!(val & 1) && s->running) {
- DPRINTF("processor %d user timer stopped\n", s->slave_index);
- 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 < MAX_CPUS; i++) {
- if (val & (1 << i)) {
- qemu_irq_lower(s->slave[i]->irq);
- s->slave[i]->limit = -1ULL;
- }
- if ((val & (1 << i)) != (s->slave_mode & (1 << i))) {
- ptimer_stop(s->slave[i]->timer);
- ptimer_set_limit(s->slave[i]->timer,
- LIMIT_TO_PERIODS(s->slave[i]->limit), 1);
- DPRINTF("processor %d timer changed\n",
- s->slave[i]->slave_index);
- ptimer_run(s->slave[i]->timer, 0);
+ 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->cputimer_mode & processor)) {
+ if (val & processor) { // counter -> user timer
+ qemu_irq_lower(curr_timer->irq);
+ // counters are always running
+ ptimer_stop(curr_timer->timer);
+ curr_timer->running = 0;
+ // user timer limit is always the same
+ 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->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 (curr_timer->running) {
+ ptimer_stop(curr_timer->timer);
+ }
+ // start the counter
+ ptimer_run(curr_timer->timer, 0);
+ curr_timer->running = 1;
+ // clear this processors user timer bit in config
+ // register
+ s->cputimer_mode &= ~processor;
+ trace_slavio_timer_mem_writel_mode_counter(timer_index);
+ }
}
}
- s->slave_mode = val & ((1 << MAX_CPUS) - 1);
- } 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] = {
- slavio_timer_mem_readl,
- slavio_timer_mem_readl,
+static CPUReadMemoryFunc * const slavio_timer_mem_read[3] = {
+ NULL,
+ NULL,
slavio_timer_mem_readl,
};
-static CPUWriteMemoryFunc *slavio_timer_mem_write[3] = {
- slavio_timer_mem_writel,
- slavio_timer_mem_writel,
+static CPUWriteMemoryFunc * const slavio_timer_mem_write[3] = {
+ NULL,
+ NULL,
slavio_timer_mem_writel,
};
-static void slavio_timer_save(QEMUFile *f, void *opaque)
+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()
+ }
+};
+
+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(DeviceState *d)
{
- SLAVIO_TIMERState *s = opaque;
-
- qemu_put_be64s(f, &s->limit);
- qemu_put_be32s(f, &s->count);
- qemu_put_be32s(f, &s->counthigh);
- qemu_put_be32(f, 0); // Was irq
- qemu_put_be32s(f, &s->reached);
- qemu_put_be32s(f, &s->running);
- qemu_put_be32s(f, 0); // Was mode
- qemu_put_ptimer(f, s->timer);
+ 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->cputimer_mode = 0;
}
-static int slavio_timer_load(QEMUFile *f, void *opaque, int version_id)
+static int slavio_timer_init1(SysBusDevice *dev)
{
- SLAVIO_TIMERState *s = opaque;
- uint32_t tmp;
-
- if (version_id != 2)
- return -EINVAL;
+ 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);
+ }
- qemu_get_be64s(f, &s->limit);
- qemu_get_be32s(f, &s->count);
- qemu_get_be32s(f, &s->counthigh);
- qemu_get_be32s(f, &tmp); // Was irq
- qemu_get_be32s(f, &s->reached);
- qemu_get_be32s(f, &s->running);
- qemu_get_be32s(f, &tmp); // Was mode
- qemu_get_ptimer(f, s->timer);
+ sysbus_init_irq(dev, &s->cputimer[i].irq);
+ }
return 0;
}
-static void slavio_timer_reset(void *opaque)
-{
- SLAVIO_TIMERState *s = opaque;
-
- if (slavio_timer_is_user(s))
- s->limit = TIMER_MAX_COUNT64;
- else
- s->limit = TIMER_MAX_COUNT32;
- s->count = 0;
- s->reached = 0;
- ptimer_set_limit(s->timer, LIMIT_TO_PERIODS(s->limit), 1);
- ptimer_run(s->timer, 0);
- s->running = 1;
- qemu_irq_lower(s->irq);
-}
+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 SLAVIO_TIMERState *slavio_timer_init(target_phys_addr_t addr,
- qemu_irq irq,
- SLAVIO_TIMERState *master,
- int slave_index)
+static void slavio_timer_register_devices(void)
{
- int slavio_timer_io_memory;
- SLAVIO_TIMERState *s;
- QEMUBH *bh;
-
- s = qemu_mallocz(sizeof(SLAVIO_TIMERState));
- if (!s)
- return s;
- s->irq = irq;
- s->master = master;
- s->slave_index = slave_index;
- bh = qemu_bh_new(slavio_timer_irq, s);
- s->timer = ptimer_init(bh);
- ptimer_set_period(s->timer, TIMER_PERIOD);
-
- 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, 2, slavio_timer_save,
- slavio_timer_load, s);
- qemu_register_reset(slavio_timer_reset, s);
- slavio_timer_reset(s);
-
- return s;
+ sysbus_register_withprop(&slavio_timer_info);
}
-void slavio_timer_init_all(target_phys_addr_t base, qemu_irq master_irq,
- qemu_irq *cpu_irqs)
-{
- SLAVIO_TIMERState *master;
- unsigned int i;
-
- master = slavio_timer_init(base + SYS_TIMER_OFFSET, master_irq, NULL, 0);
-
- 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);
- }
-}
+device_init(slavio_timer_register_devices)
projects / qemu.git / blobdiff