hw/timer/allwinner-a10-pit.c

   1 /*
   2  * Allwinner A10 timer device emulation
   3  *
   4  * Copyright (C) 2013 Li Guang
   5  * Written by Li Guang <lig.fnst@cn.fujitsu.com>
   6  *
   7  * This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the GNU General Public License as published by the
   9  * Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful, but WITHOUT
  13  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14  * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
  15  * for more details.
  16  */
  17
  18 #include "qemu/osdep.h"
  19 #include "hw/irq.h"
  20 #include "hw/qdev-properties.h"
  21 #include "hw/sysbus.h"
  22 #include "hw/timer/allwinner-a10-pit.h"
  23 #include "migration/vmstate.h"
  24 #include "qemu/log.h"
  25 #include "qemu/module.h"
  26
  27 static void a10_pit_update_irq(AwA10PITState *s)
  28 {
  29     int i;
  30
  31     for (i = 0; i < AW_A10_PIT_TIMER_NR; i++) {
  32         qemu_set_irq(s->irq[i], !!(s->irq_status & s->irq_enable & (1 << i)));
  33     }
  34 }
  35
  36 static uint64_t a10_pit_read(void *opaque, hwaddr offset, unsigned size)
  37 {
  38     AwA10PITState *s = AW_A10_PIT(opaque);
  39     uint8_t index;
  40
  41     switch (offset) {
  42     case AW_A10_PIT_TIMER_IRQ_EN:
  43         return s->irq_enable;
  44     case AW_A10_PIT_TIMER_IRQ_ST:
  45         return s->irq_status;
  46     case AW_A10_PIT_TIMER_BASE ... AW_A10_PIT_TIMER_BASE_END:
  47         index = offset & 0xf0;
  48         index >>= 4;
  49         index -= 1;
  50         switch (offset & 0x0f) {
  51         case AW_A10_PIT_TIMER_CONTROL:
  52             return s->control[index];
  53         case AW_A10_PIT_TIMER_INTERVAL:
  54             return s->interval[index];
  55         case AW_A10_PIT_TIMER_COUNT:
  56             s->count[index] = ptimer_get_count(s->timer[index]);
  57             return s->count[index];
  58         default:
  59             qemu_log_mask(LOG_GUEST_ERROR,
  60                           "%s: Bad offset 0x%x\n",  __func__, (int)offset);
  61             break;
  62         }
  63     case AW_A10_PIT_WDOG_CONTROL:
  64         break;
  65     case AW_A10_PIT_WDOG_MODE:
  66         break;
  67     case AW_A10_PIT_COUNT_LO:
  68         return s->count_lo;
  69     case AW_A10_PIT_COUNT_HI:
  70         return s->count_hi;
  71     case AW_A10_PIT_COUNT_CTL:
  72         return s->count_ctl;
  73     default:
  74         qemu_log_mask(LOG_GUEST_ERROR,
  75                       "%s: Bad offset 0x%x\n",  __func__, (int)offset);
  76         break;
  77     }
  78
  79     return 0;
  80 }
  81
  82 /* Must be called inside a ptimer transaction block for s->timer[index] */
  83 static void a10_pit_set_freq(AwA10PITState *s, int index)
  84 {
  85     uint32_t prescaler, source, source_freq;
  86
  87     prescaler = 1 << extract32(s->control[index], 4, 3);
  88     source = extract32(s->control[index], 2, 2);
  89     source_freq = s->clk_freq[source];
  90
  91     if (source_freq) {
  92         ptimer_set_freq(s->timer[index], source_freq / prescaler);
  93     } else {
  94         qemu_log_mask(LOG_GUEST_ERROR, "%s: Invalid clock source %u\n",
  95                       __func__, source);
  96     }
  97 }
  98
  99 static void a10_pit_write(void *opaque, hwaddr offset, uint64_t value,
 100                             unsigned size)
 101 {
 102      AwA10PITState *s = AW_A10_PIT(opaque);
 103      uint8_t index;
 104
 105     switch (offset) {
 106     case AW_A10_PIT_TIMER_IRQ_EN:
 107         s->irq_enable = value;
 108         a10_pit_update_irq(s);
 109         break;
 110     case AW_A10_PIT_TIMER_IRQ_ST:
 111         s->irq_status &= ~value;
 112         a10_pit_update_irq(s);
 113         break;
 114     case AW_A10_PIT_TIMER_BASE ... AW_A10_PIT_TIMER_BASE_END:
 115         index = offset & 0xf0;
 116         index >>= 4;
 117         index -= 1;
 118         switch (offset & 0x0f) {
 119         case AW_A10_PIT_TIMER_CONTROL:
 120             s->control[index] = value;
 121             ptimer_transaction_begin(s->timer[index]);
 122             a10_pit_set_freq(s, index);
 123             if (s->control[index] & AW_A10_PIT_TIMER_RELOAD) {
 124                 ptimer_set_count(s->timer[index], s->interval[index]);
 125             }
 126             if (s->control[index] & AW_A10_PIT_TIMER_EN) {
 127                 int oneshot = 0;
 128                 if (s->control[index] & AW_A10_PIT_TIMER_MODE) {
 129                     oneshot = 1;
 130                 }
 131                 ptimer_run(s->timer[index], oneshot);
 132             } else {
 133                 ptimer_stop(s->timer[index]);
 134             }
 135             ptimer_transaction_commit(s->timer[index]);
 136             break;
 137         case AW_A10_PIT_TIMER_INTERVAL:
 138             s->interval[index] = value;
 139             ptimer_transaction_begin(s->timer[index]);
 140             ptimer_set_limit(s->timer[index], s->interval[index], 1);
 141             ptimer_transaction_commit(s->timer[index]);
 142             break;
 143         case AW_A10_PIT_TIMER_COUNT:
 144             s->count[index] = value;
 145             break;
 146         default:
 147             qemu_log_mask(LOG_GUEST_ERROR,
 148                           "%s: Bad offset 0x%x\n",  __func__, (int)offset);
 149         }
 150         break;
 151     case AW_A10_PIT_WDOG_CONTROL:
 152         s->watch_dog_control = value;
 153         break;
 154     case AW_A10_PIT_WDOG_MODE:
 155         s->watch_dog_mode = value;
 156         break;
 157     case AW_A10_PIT_COUNT_LO:
 158         s->count_lo = value;
 159         break;
 160     case AW_A10_PIT_COUNT_HI:
 161         s->count_hi = value;
 162         break;
 163     case AW_A10_PIT_COUNT_CTL:
 164         s->count_ctl = value;
 165         if (s->count_ctl & AW_A10_PIT_COUNT_RL_EN) {
 166             uint64_t  tmp_count = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 167
 168             s->count_lo = tmp_count;
 169             s->count_hi = tmp_count >> 32;
 170             s->count_ctl &= ~AW_A10_PIT_COUNT_RL_EN;
 171         }
 172         if (s->count_ctl & AW_A10_PIT_COUNT_CLR_EN) {
 173             s->count_lo = 0;
 174             s->count_hi = 0;
 175             s->count_ctl &= ~AW_A10_PIT_COUNT_CLR_EN;
 176         }
 177         break;
 178     default:
 179         qemu_log_mask(LOG_GUEST_ERROR,
 180                       "%s: Bad offset 0x%x\n",  __func__, (int)offset);
 181         break;
 182     }
 183 }
 184
 185 static const MemoryRegionOps a10_pit_ops = {
 186     .read = a10_pit_read,
 187     .write = a10_pit_write,
 188     .endianness = DEVICE_NATIVE_ENDIAN,
 189 };
 190
 191 static Property a10_pit_properties[] = {
 192     DEFINE_PROP_UINT32("clk0-freq", AwA10PITState, clk_freq[0], 0),
 193     DEFINE_PROP_UINT32("clk1-freq", AwA10PITState, clk_freq[1], 0),
 194     DEFINE_PROP_UINT32("clk2-freq", AwA10PITState, clk_freq[2], 0),
 195     DEFINE_PROP_UINT32("clk3-freq", AwA10PITState, clk_freq[3], 0),
 196     DEFINE_PROP_END_OF_LIST(),
 197 };
 198
 199 static const VMStateDescription vmstate_a10_pit = {
 200     .name = "a10.pit",
 201     .version_id = 1,
 202     .minimum_version_id = 1,
 203     .fields = (VMStateField[]) {
 204         VMSTATE_UINT32(irq_enable, AwA10PITState),
 205         VMSTATE_UINT32(irq_status, AwA10PITState),
 206         VMSTATE_UINT32_ARRAY(control, AwA10PITState, AW_A10_PIT_TIMER_NR),
 207         VMSTATE_UINT32_ARRAY(interval, AwA10PITState, AW_A10_PIT_TIMER_NR),
 208         VMSTATE_UINT32_ARRAY(count, AwA10PITState, AW_A10_PIT_TIMER_NR),
 209         VMSTATE_UINT32(watch_dog_mode, AwA10PITState),
 210         VMSTATE_UINT32(watch_dog_control, AwA10PITState),
 211         VMSTATE_UINT32(count_lo, AwA10PITState),
 212         VMSTATE_UINT32(count_hi, AwA10PITState),
 213         VMSTATE_UINT32(count_ctl, AwA10PITState),
 214         VMSTATE_PTIMER_ARRAY(timer, AwA10PITState, AW_A10_PIT_TIMER_NR),
 215         VMSTATE_END_OF_LIST()
 216     }
 217 };
 218
 219 static void a10_pit_reset(DeviceState *dev)
 220 {
 221     AwA10PITState *s = AW_A10_PIT(dev);
 222     uint8_t i;
 223
 224     s->irq_enable = 0;
 225     s->irq_status = 0;
 226     a10_pit_update_irq(s);
 227
 228     for (i = 0; i < 6; i++) {
 229         s->control[i] = AW_A10_PIT_DEFAULT_CLOCK;
 230         s->interval[i] = 0;
 231         s->count[i] = 0;
 232         ptimer_transaction_begin(s->timer[i]);
 233         ptimer_stop(s->timer[i]);
 234         a10_pit_set_freq(s, i);
 235         ptimer_transaction_commit(s->timer[i]);
 236     }
 237     s->watch_dog_mode = 0;
 238     s->watch_dog_control = 0;
 239     s->count_lo = 0;
 240     s->count_hi = 0;
 241     s->count_ctl = 0;
 242 }
 243
 244 static void a10_pit_timer_cb(void *opaque)
 245 {
 246     AwA10TimerContext *tc = opaque;
 247     AwA10PITState *s = tc->container;
 248     uint8_t i = tc->index;
 249
 250     if (s->control[i] & AW_A10_PIT_TIMER_EN) {
 251         s->irq_status |= 1 << i;
 252         if (s->control[i] & AW_A10_PIT_TIMER_MODE) {
 253             ptimer_stop(s->timer[i]);
 254             s->control[i] &= ~AW_A10_PIT_TIMER_EN;
 255         }
 256         a10_pit_update_irq(s);
 257     }
 258 }
 259
 260 static void a10_pit_init(Object *obj)
 261 {
 262     AwA10PITState *s = AW_A10_PIT(obj);
 263     SysBusDevice *sbd = SYS_BUS_DEVICE(obj);
 264     uint8_t i;
 265
 266     for (i = 0; i < AW_A10_PIT_TIMER_NR; i++) {
 267         sysbus_init_irq(sbd, &s->irq[i]);
 268     }
 269     memory_region_init_io(&s->iomem, OBJECT(s), &a10_pit_ops, s,
 270                           TYPE_AW_A10_PIT, 0x400);
 271     sysbus_init_mmio(sbd, &s->iomem);
 272
 273     for (i = 0; i < AW_A10_PIT_TIMER_NR; i++) {
 274         AwA10TimerContext *tc = &s->timer_context[i];
 275
 276         tc->container = s;
 277         tc->index = i;
 278         s->timer[i] = ptimer_init(a10_pit_timer_cb, tc, PTIMER_POLICY_DEFAULT);
 279     }
 280 }
 281
 282 static void a10_pit_finalize(Object *obj)
 283 {
 284     AwA10PITState *s = AW_A10_PIT(obj);
 285     int i;
 286
 287     for (i = 0; i < AW_A10_PIT_TIMER_NR; i++) {
 288         ptimer_free(s->timer[i]);
 289     }
 290 }
 291
 292 static void a10_pit_class_init(ObjectClass *klass, void *data)
 293 {
 294     DeviceClass *dc = DEVICE_CLASS(klass);
 295
 296     dc->reset = a10_pit_reset;
 297     device_class_set_props(dc, a10_pit_properties);
 298     dc->desc = "allwinner a10 timer";
 299     dc->vmsd = &vmstate_a10_pit;
 300 }
 301
 302 static const TypeInfo a10_pit_info = {
 303     .name = TYPE_AW_A10_PIT,
 304     .parent = TYPE_SYS_BUS_DEVICE,
 305     .instance_size = sizeof(AwA10PITState),
 306     .instance_init = a10_pit_init,
 307     .instance_finalize = a10_pit_finalize,
 308     .class_init = a10_pit_class_init,
 309 };
 310
 311 static void a10_register_types(void)
 312 {
 313     type_register_static(&a10_pit_info);
 314 }
 315
 316 type_init(a10_register_types);