1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25#include "qemu/osdep.h"
26#include "hw/hw.h"
27#include "hw/timer/m48t59.h"
28#include "qemu/timer.h"
29#include "sysemu/sysemu.h"
30#include "hw/sysbus.h"
31#include "exec/address-spaces.h"
32#include "qemu/bcd.h"
33
34#include "m48t59-internal.h"
35
36#define TYPE_M48TXX_SYS_BUS "sysbus-m48txx"
37#define M48TXX_SYS_BUS_GET_CLASS(obj) \
38 OBJECT_GET_CLASS(M48txxSysBusDeviceClass, (obj), TYPE_M48TXX_SYS_BUS)
39#define M48TXX_SYS_BUS_CLASS(klass) \
40 OBJECT_CLASS_CHECK(M48txxSysBusDeviceClass, (klass), TYPE_M48TXX_SYS_BUS)
41#define M48TXX_SYS_BUS(obj) \
42 OBJECT_CHECK(M48txxSysBusState, (obj), TYPE_M48TXX_SYS_BUS)
43
44
45
46
47
48
49
50
51typedef struct M48txxSysBusState {
52 SysBusDevice parent_obj;
53 M48t59State state;
54 MemoryRegion io;
55} M48txxSysBusState;
56
57typedef struct M48txxSysBusDeviceClass {
58 SysBusDeviceClass parent_class;
59 M48txxInfo info;
60} M48txxSysBusDeviceClass;
61
62static M48txxInfo m48txx_sysbus_info[] = {
63 {
64 .bus_name = "sysbus-m48t02",
65 .model = 2,
66 .size = 0x800,
67 },{
68 .bus_name = "sysbus-m48t08",
69 .model = 8,
70 .size = 0x2000,
71 },{
72 .bus_name = "sysbus-m48t59",
73 .model = 59,
74 .size = 0x2000,
75 }
76};
77
78
79
80
81
82static void alarm_cb (void *opaque)
83{
84 struct tm tm;
85 uint64_t next_time;
86 M48t59State *NVRAM = opaque;
87
88 qemu_set_irq(NVRAM->IRQ, 1);
89 if ((NVRAM->buffer[0x1FF5] & 0x80) == 0 &&
90 (NVRAM->buffer[0x1FF4] & 0x80) == 0 &&
91 (NVRAM->buffer[0x1FF3] & 0x80) == 0 &&
92 (NVRAM->buffer[0x1FF2] & 0x80) == 0) {
93
94 qemu_get_timedate(&tm, NVRAM->time_offset);
95 tm.tm_mon++;
96 if (tm.tm_mon == 13) {
97 tm.tm_mon = 1;
98 tm.tm_year++;
99 }
100 next_time = qemu_timedate_diff(&tm) - NVRAM->time_offset;
101 } else if ((NVRAM->buffer[0x1FF5] & 0x80) != 0 &&
102 (NVRAM->buffer[0x1FF4] & 0x80) == 0 &&
103 (NVRAM->buffer[0x1FF3] & 0x80) == 0 &&
104 (NVRAM->buffer[0x1FF2] & 0x80) == 0) {
105
106 next_time = 24 * 60 * 60;
107 } else if ((NVRAM->buffer[0x1FF5] & 0x80) != 0 &&
108 (NVRAM->buffer[0x1FF4] & 0x80) != 0 &&
109 (NVRAM->buffer[0x1FF3] & 0x80) == 0 &&
110 (NVRAM->buffer[0x1FF2] & 0x80) == 0) {
111
112 next_time = 60 * 60;
113 } else if ((NVRAM->buffer[0x1FF5] & 0x80) != 0 &&
114 (NVRAM->buffer[0x1FF4] & 0x80) != 0 &&
115 (NVRAM->buffer[0x1FF3] & 0x80) != 0 &&
116 (NVRAM->buffer[0x1FF2] & 0x80) == 0) {
117
118 next_time = 60;
119 } else {
120
121 next_time = 1;
122 }
123 timer_mod(NVRAM->alrm_timer, qemu_clock_get_ns(rtc_clock) +
124 next_time * 1000);
125 qemu_set_irq(NVRAM->IRQ, 0);
126}
127
128static void set_alarm(M48t59State *NVRAM)
129{
130 int diff;
131 if (NVRAM->alrm_timer != NULL) {
132 timer_del(NVRAM->alrm_timer);
133 diff = qemu_timedate_diff(&NVRAM->alarm) - NVRAM->time_offset;
134 if (diff > 0)
135 timer_mod(NVRAM->alrm_timer, diff * 1000);
136 }
137}
138
139
140static inline void get_time(M48t59State *NVRAM, struct tm *tm)
141{
142 qemu_get_timedate(tm, NVRAM->time_offset);
143}
144
145static void set_time(M48t59State *NVRAM, struct tm *tm)
146{
147 NVRAM->time_offset = qemu_timedate_diff(tm);
148 set_alarm(NVRAM);
149}
150
151
152static void watchdog_cb (void *opaque)
153{
154 M48t59State *NVRAM = opaque;
155
156 NVRAM->buffer[0x1FF0] |= 0x80;
157 if (NVRAM->buffer[0x1FF7] & 0x80) {
158 NVRAM->buffer[0x1FF7] = 0x00;
159 NVRAM->buffer[0x1FFC] &= ~0x40;
160
161 qemu_system_reset_request(SHUTDOWN_CAUSE_GUEST_RESET);
162 } else {
163 qemu_set_irq(NVRAM->IRQ, 1);
164 qemu_set_irq(NVRAM->IRQ, 0);
165 }
166}
167
168static void set_up_watchdog(M48t59State *NVRAM, uint8_t value)
169{
170 uint64_t interval;
171
172 NVRAM->buffer[0x1FF0] &= ~0x80;
173 if (NVRAM->wd_timer != NULL) {
174 timer_del(NVRAM->wd_timer);
175 if (value != 0) {
176 interval = (1 << (2 * (value & 0x03))) * ((value >> 2) & 0x1F);
177 timer_mod(NVRAM->wd_timer, ((uint64_t)time(NULL) * 1000) +
178 ((interval * 1000) >> 4));
179 }
180 }
181}
182
183
184void m48t59_write(M48t59State *NVRAM, uint32_t addr, uint32_t val)
185{
186 struct tm tm;
187 int tmp;
188
189 if (addr > 0x1FF8 && addr < 0x2000)
190 NVRAM_PRINTF("%s: 0x%08x => 0x%08x\n", __func__, addr, val);
191
192
193 if ((NVRAM->model == 2 && addr < 0x7f8) ||
194 (NVRAM->model == 8 && addr < 0x1ff8) ||
195 (NVRAM->model == 59 && addr < 0x1ff0)) {
196 goto do_write;
197 }
198
199
200 switch (addr) {
201 case 0x1FF0:
202
203 break;
204 case 0x1FF1:
205
206 break;
207 case 0x1FF2:
208
209 tmp = from_bcd(val & 0x7F);
210 if (tmp >= 0 && tmp <= 59) {
211 NVRAM->alarm.tm_sec = tmp;
212 NVRAM->buffer[0x1FF2] = val;
213 set_alarm(NVRAM);
214 }
215 break;
216 case 0x1FF3:
217
218 tmp = from_bcd(val & 0x7F);
219 if (tmp >= 0 && tmp <= 59) {
220 NVRAM->alarm.tm_min = tmp;
221 NVRAM->buffer[0x1FF3] = val;
222 set_alarm(NVRAM);
223 }
224 break;
225 case 0x1FF4:
226
227 tmp = from_bcd(val & 0x3F);
228 if (tmp >= 0 && tmp <= 23) {
229 NVRAM->alarm.tm_hour = tmp;
230 NVRAM->buffer[0x1FF4] = val;
231 set_alarm(NVRAM);
232 }
233 break;
234 case 0x1FF5:
235
236 tmp = from_bcd(val & 0x3F);
237 if (tmp != 0) {
238 NVRAM->alarm.tm_mday = tmp;
239 NVRAM->buffer[0x1FF5] = val;
240 set_alarm(NVRAM);
241 }
242 break;
243 case 0x1FF6:
244
245 NVRAM->buffer[0x1FF6] = val;
246 break;
247 case 0x1FF7:
248
249 NVRAM->buffer[0x1FF7] = val;
250 set_up_watchdog(NVRAM, val);
251 break;
252 case 0x1FF8:
253 case 0x07F8:
254
255 NVRAM->buffer[addr] = (val & ~0xA0) | 0x90;
256 break;
257 case 0x1FF9:
258 case 0x07F9:
259
260 tmp = from_bcd(val & 0x7F);
261 if (tmp >= 0 && tmp <= 59) {
262 get_time(NVRAM, &tm);
263 tm.tm_sec = tmp;
264 set_time(NVRAM, &tm);
265 }
266 if ((val & 0x80) ^ (NVRAM->buffer[addr] & 0x80)) {
267 if (val & 0x80) {
268 NVRAM->stop_time = time(NULL);
269 } else {
270 NVRAM->time_offset += NVRAM->stop_time - time(NULL);
271 NVRAM->stop_time = 0;
272 }
273 }
274 NVRAM->buffer[addr] = val & 0x80;
275 break;
276 case 0x1FFA:
277 case 0x07FA:
278
279 tmp = from_bcd(val & 0x7F);
280 if (tmp >= 0 && tmp <= 59) {
281 get_time(NVRAM, &tm);
282 tm.tm_min = tmp;
283 set_time(NVRAM, &tm);
284 }
285 break;
286 case 0x1FFB:
287 case 0x07FB:
288
289 tmp = from_bcd(val & 0x3F);
290 if (tmp >= 0 && tmp <= 23) {
291 get_time(NVRAM, &tm);
292 tm.tm_hour = tmp;
293 set_time(NVRAM, &tm);
294 }
295 break;
296 case 0x1FFC:
297 case 0x07FC:
298
299 tmp = from_bcd(val & 0x07);
300 get_time(NVRAM, &tm);
301 tm.tm_wday = tmp;
302 set_time(NVRAM, &tm);
303 NVRAM->buffer[addr] = val & 0x40;
304 break;
305 case 0x1FFD:
306 case 0x07FD:
307
308 tmp = from_bcd(val & 0x3F);
309 if (tmp != 0) {
310 get_time(NVRAM, &tm);
311 tm.tm_mday = tmp;
312 set_time(NVRAM, &tm);
313 }
314 break;
315 case 0x1FFE:
316 case 0x07FE:
317
318 tmp = from_bcd(val & 0x1F);
319 if (tmp >= 1 && tmp <= 12) {
320 get_time(NVRAM, &tm);
321 tm.tm_mon = tmp - 1;
322 set_time(NVRAM, &tm);
323 }
324 break;
325 case 0x1FFF:
326 case 0x07FF:
327
328 tmp = from_bcd(val);
329 if (tmp >= 0 && tmp <= 99) {
330 get_time(NVRAM, &tm);
331 tm.tm_year = from_bcd(val) + NVRAM->base_year - 1900;
332 set_time(NVRAM, &tm);
333 }
334 break;
335 default:
336
337 if (addr >= 0x20 && addr <= 0x2F && (NVRAM->lock & 1))
338 break;
339 if (addr >= 0x30 && addr <= 0x3F && (NVRAM->lock & 2))
340 break;
341 do_write:
342 if (addr < NVRAM->size) {
343 NVRAM->buffer[addr] = val & 0xFF;
344 }
345 break;
346 }
347}
348
349uint32_t m48t59_read(M48t59State *NVRAM, uint32_t addr)
350{
351 struct tm tm;
352 uint32_t retval = 0xFF;
353
354
355 if ((NVRAM->model == 2 && addr < 0x078f) ||
356 (NVRAM->model == 8 && addr < 0x1ff8) ||
357 (NVRAM->model == 59 && addr < 0x1ff0)) {
358 goto do_read;
359 }
360
361
362 switch (addr) {
363 case 0x1FF0:
364
365 goto do_read;
366 case 0x1FF1:
367
368 retval = 0;
369 break;
370 case 0x1FF2:
371
372 goto do_read;
373 case 0x1FF3:
374
375 goto do_read;
376 case 0x1FF4:
377
378 goto do_read;
379 case 0x1FF5:
380
381 goto do_read;
382 case 0x1FF6:
383
384 goto do_read;
385 case 0x1FF7:
386
387 set_up_watchdog(NVRAM, NVRAM->buffer[0x1FF7]);
388 goto do_read;
389 case 0x1FF8:
390 case 0x07F8:
391
392 goto do_read;
393 case 0x1FF9:
394 case 0x07F9:
395
396 get_time(NVRAM, &tm);
397 retval = (NVRAM->buffer[addr] & 0x80) | to_bcd(tm.tm_sec);
398 break;
399 case 0x1FFA:
400 case 0x07FA:
401
402 get_time(NVRAM, &tm);
403 retval = to_bcd(tm.tm_min);
404 break;
405 case 0x1FFB:
406 case 0x07FB:
407
408 get_time(NVRAM, &tm);
409 retval = to_bcd(tm.tm_hour);
410 break;
411 case 0x1FFC:
412 case 0x07FC:
413
414 get_time(NVRAM, &tm);
415 retval = NVRAM->buffer[addr] | tm.tm_wday;
416 break;
417 case 0x1FFD:
418 case 0x07FD:
419
420 get_time(NVRAM, &tm);
421 retval = to_bcd(tm.tm_mday);
422 break;
423 case 0x1FFE:
424 case 0x07FE:
425
426 get_time(NVRAM, &tm);
427 retval = to_bcd(tm.tm_mon + 1);
428 break;
429 case 0x1FFF:
430 case 0x07FF:
431
432 get_time(NVRAM, &tm);
433 retval = to_bcd((tm.tm_year + 1900 - NVRAM->base_year) % 100);
434 break;
435 default:
436
437 if (addr >= 0x20 && addr <= 0x2F && (NVRAM->lock & 1))
438 break;
439 if (addr >= 0x30 && addr <= 0x3F && (NVRAM->lock & 2))
440 break;
441 do_read:
442 if (addr < NVRAM->size) {
443 retval = NVRAM->buffer[addr];
444 }
445 break;
446 }
447 if (addr > 0x1FF9 && addr < 0x2000)
448 NVRAM_PRINTF("%s: 0x%08x <= 0x%08x\n", __func__, addr, retval);
449
450 return retval;
451}
452
453
454static void NVRAM_writeb(void *opaque, hwaddr addr, uint64_t val,
455 unsigned size)
456{
457 M48t59State *NVRAM = opaque;
458
459 NVRAM_PRINTF("%s: 0x%"HWADDR_PRIx" => 0x%"PRIx64"\n", __func__, addr, val);
460 switch (addr) {
461 case 0:
462 NVRAM->addr &= ~0x00FF;
463 NVRAM->addr |= val;
464 break;
465 case 1:
466 NVRAM->addr &= ~0xFF00;
467 NVRAM->addr |= val << 8;
468 break;
469 case 3:
470 m48t59_write(NVRAM, NVRAM->addr, val);
471 NVRAM->addr = 0x0000;
472 break;
473 default:
474 break;
475 }
476}
477
478static uint64_t NVRAM_readb(void *opaque, hwaddr addr, unsigned size)
479{
480 M48t59State *NVRAM = opaque;
481 uint32_t retval;
482
483 switch (addr) {
484 case 3:
485 retval = m48t59_read(NVRAM, NVRAM->addr);
486 break;
487 default:
488 retval = -1;
489 break;
490 }
491 NVRAM_PRINTF("%s: 0x%"HWADDR_PRIx" <= 0x%08x\n", __func__, addr, retval);
492
493 return retval;
494}
495
496static uint64_t nvram_read(void *opaque, hwaddr addr, unsigned size)
497{
498 M48t59State *NVRAM = opaque;
499
500 return m48t59_read(NVRAM, addr);
501}
502
503static void nvram_write(void *opaque, hwaddr addr, uint64_t value,
504 unsigned size)
505{
506 M48t59State *NVRAM = opaque;
507
508 return m48t59_write(NVRAM, addr, value);
509}
510
511static const MemoryRegionOps nvram_ops = {
512 .read = nvram_read,
513 .write = nvram_write,
514 .impl.min_access_size = 1,
515 .impl.max_access_size = 1,
516 .valid.min_access_size = 1,
517 .valid.max_access_size = 4,
518 .endianness = DEVICE_BIG_ENDIAN,
519};
520
521static const VMStateDescription vmstate_m48t59 = {
522 .name = "m48t59",
523 .version_id = 1,
524 .minimum_version_id = 1,
525 .fields = (VMStateField[]) {
526 VMSTATE_UINT8(lock, M48t59State),
527 VMSTATE_UINT16(addr, M48t59State),
528 VMSTATE_VBUFFER_UINT32(buffer, M48t59State, 0, NULL, size),
529 VMSTATE_END_OF_LIST()
530 }
531};
532
533void m48t59_reset_common(M48t59State *NVRAM)
534{
535 NVRAM->addr = 0;
536 NVRAM->lock = 0;
537 if (NVRAM->alrm_timer != NULL)
538 timer_del(NVRAM->alrm_timer);
539
540 if (NVRAM->wd_timer != NULL)
541 timer_del(NVRAM->wd_timer);
542}
543
544static void m48t59_reset_sysbus(DeviceState *d)
545{
546 M48txxSysBusState *sys = M48TXX_SYS_BUS(d);
547 M48t59State *NVRAM = &sys->state;
548
549 m48t59_reset_common(NVRAM);
550}
551
552const MemoryRegionOps m48t59_io_ops = {
553 .read = NVRAM_readb,
554 .write = NVRAM_writeb,
555 .impl = {
556 .min_access_size = 1,
557 .max_access_size = 1,
558 },
559 .endianness = DEVICE_LITTLE_ENDIAN,
560};
561
562
563Nvram *m48t59_init(qemu_irq IRQ, hwaddr mem_base,
564 uint32_t io_base, uint16_t size, int base_year,
565 int model)
566{
567 DeviceState *dev;
568 SysBusDevice *s;
569 int i;
570
571 for (i = 0; i < ARRAY_SIZE(m48txx_sysbus_info); i++) {
572 if (m48txx_sysbus_info[i].size != size ||
573 m48txx_sysbus_info[i].model != model) {
574 continue;
575 }
576
577 dev = qdev_create(NULL, m48txx_sysbus_info[i].bus_name);
578 qdev_prop_set_int32(dev, "base-year", base_year);
579 qdev_init_nofail(dev);
580 s = SYS_BUS_DEVICE(dev);
581 sysbus_connect_irq(s, 0, IRQ);
582 if (io_base != 0) {
583 memory_region_add_subregion(get_system_io(), io_base,
584 sysbus_mmio_get_region(s, 1));
585 }
586 if (mem_base != 0) {
587 sysbus_mmio_map(s, 0, mem_base);
588 }
589
590 return NVRAM(s);
591 }
592
593 assert(false);
594 return NULL;
595}
596
597void m48t59_realize_common(M48t59State *s, Error **errp)
598{
599 s->buffer = g_malloc0(s->size);
600 if (s->model == 59) {
601 s->alrm_timer = timer_new_ns(rtc_clock, &alarm_cb, s);
602 s->wd_timer = timer_new_ns(QEMU_CLOCK_VIRTUAL, &watchdog_cb, s);
603 }
604 qemu_get_timedate(&s->alarm, 0);
605}
606
607static void m48t59_init1(Object *obj)
608{
609 M48txxSysBusDeviceClass *u = M48TXX_SYS_BUS_GET_CLASS(obj);
610 M48txxSysBusState *d = M48TXX_SYS_BUS(obj);
611 SysBusDevice *dev = SYS_BUS_DEVICE(obj);
612 M48t59State *s = &d->state;
613
614 s->model = u->info.model;
615 s->size = u->info.size;
616 sysbus_init_irq(dev, &s->IRQ);
617
618 memory_region_init_io(&s->iomem, obj, &nvram_ops, s, "m48t59.nvram",
619 s->size);
620 memory_region_init_io(&d->io, obj, &m48t59_io_ops, s, "m48t59", 4);
621}
622
623static void m48t59_realize(DeviceState *dev, Error **errp)
624{
625 M48txxSysBusState *d = M48TXX_SYS_BUS(dev);
626 M48t59State *s = &d->state;
627 SysBusDevice *sbd = SYS_BUS_DEVICE(dev);
628
629 sysbus_init_mmio(sbd, &s->iomem);
630 sysbus_init_mmio(sbd, &d->io);
631 m48t59_realize_common(s, errp);
632}
633
634static uint32_t m48txx_sysbus_read(Nvram *obj, uint32_t addr)
635{
636 M48txxSysBusState *d = M48TXX_SYS_BUS(obj);
637 return m48t59_read(&d->state, addr);
638}
639
640static void m48txx_sysbus_write(Nvram *obj, uint32_t addr, uint32_t val)
641{
642 M48txxSysBusState *d = M48TXX_SYS_BUS(obj);
643 m48t59_write(&d->state, addr, val);
644}
645
646static void m48txx_sysbus_toggle_lock(Nvram *obj, int lock)
647{
648 M48txxSysBusState *d = M48TXX_SYS_BUS(obj);
649 m48t59_toggle_lock(&d->state, lock);
650}
651
652static Property m48t59_sysbus_properties[] = {
653 DEFINE_PROP_INT32("base-year", M48txxSysBusState, state.base_year, 0),
654 DEFINE_PROP_END_OF_LIST(),
655};
656
657static void m48txx_sysbus_class_init(ObjectClass *klass, void *data)
658{
659 DeviceClass *dc = DEVICE_CLASS(klass);
660 NvramClass *nc = NVRAM_CLASS(klass);
661
662 dc->realize = m48t59_realize;
663 dc->reset = m48t59_reset_sysbus;
664 dc->props = m48t59_sysbus_properties;
665 dc->vmsd = &vmstate_m48t59;
666 nc->read = m48txx_sysbus_read;
667 nc->write = m48txx_sysbus_write;
668 nc->toggle_lock = m48txx_sysbus_toggle_lock;
669}
670
671static void m48txx_sysbus_concrete_class_init(ObjectClass *klass, void *data)
672{
673 M48txxSysBusDeviceClass *u = M48TXX_SYS_BUS_CLASS(klass);
674 M48txxInfo *info = data;
675
676 u->info = *info;
677}
678
679static const TypeInfo nvram_info = {
680 .name = TYPE_NVRAM,
681 .parent = TYPE_INTERFACE,
682 .class_size = sizeof(NvramClass),
683};
684
685static const TypeInfo m48txx_sysbus_type_info = {
686 .name = TYPE_M48TXX_SYS_BUS,
687 .parent = TYPE_SYS_BUS_DEVICE,
688 .instance_size = sizeof(M48txxSysBusState),
689 .instance_init = m48t59_init1,
690 .abstract = true,
691 .class_init = m48txx_sysbus_class_init,
692 .interfaces = (InterfaceInfo[]) {
693 { TYPE_NVRAM },
694 { }
695 }
696};
697
698static void m48t59_register_types(void)
699{
700 TypeInfo sysbus_type_info = {
701 .parent = TYPE_M48TXX_SYS_BUS,
702 .class_size = sizeof(M48txxSysBusDeviceClass),
703 .class_init = m48txx_sysbus_concrete_class_init,
704 };
705 int i;
706
707 type_register_static(&nvram_info);
708 type_register_static(&m48txx_sysbus_type_info);
709
710 for (i = 0; i < ARRAY_SIZE(m48txx_sysbus_info); i++) {
711 sysbus_type_info.name = m48txx_sysbus_info[i].bus_name;
712 sysbus_type_info.class_data = &m48txx_sysbus_info[i];
713 type_register(&sysbus_type_info);
714 }
715}
716
717type_init(m48t59_register_types)
718