strace: Remove the ability to write to Qstrace
[akaros.git] / kern / drivers / timers / hpet.c
1 #include <string.h>
2 #include <stdio.h>
3 #include <assert.h>
4 #include <endian.h>
5 #include <pmap.h>
6 #include <acpi.h>
7
8 #include "hpet.h"
9
10 /* The HPET likes 64bit mmreg reads and writes.  If the arch doesn't support
11  * them, then things are a little trickier.  Probably just replace these with
12  * mm64 ops, and quit supporting 32 bit. */
13 static inline void hpet_w64(uintptr_t reg, uint64_t val)
14 {
15         *((volatile uint64_t*)reg) = val;
16 }
17
18 static inline uint64_t hpet_r64(uintptr_t reg)
19 {
20         return *((volatile uint64_t*)reg);
21 }
22
23 struct Atable *parsehpet(struct Atable *parent,
24                          char *name, uint8_t *raw, size_t rawsize)
25 {
26         /* Do we want to keep this table around?  if so, we can use newtable, which
27          * allocs an Atable and puts it on a global stailq.  then we return that
28          * pointer, not as an addr, but as a signal to parse code about whether or
29          * not it is safe to unmap (which we don't do anymore). */
30         struct Atable *hpet = mkatable(parent, HPET, "HPET", raw, rawsize, 0);
31         unsigned long hp_addr;
32         uint32_t evt_blk_id;
33         int nr_timers;
34
35         assert(hpet);
36         printk("HPET table detected at %p, for %d bytes\n", raw, rawsize);
37
38         evt_blk_id = l32get(raw + 36);
39         printd("EV BID 0x%08x\n", evt_blk_id);
40
41         hp_addr = (unsigned long)KADDR_NOCHECK(l64get(raw + 44));
42
43         printd("cap/ip %p\n", hpet_r64(hp_addr + 0x00));
44         printd("config %p\n", hpet_r64(hp_addr + 0x10));
45         printd("irqsts %p\n", hpet_r64(hp_addr + 0x20));
46
47         nr_timers = ((hpet_r64(hp_addr) >> 8) & 0xf) + 1;
48         for (int i = 0; i < nr_timers; i++)
49                 printd("Timer %d, config reg %p\n", i,
50                        hpet_r64(hp_addr + 0x100 + 0x20 * i));
51         /* 0x10, general config register.  bottom two bits are legacy mode and
52          * global enable.  turning them both off.  need to do read-modify-writes to
53          * HPET registers with reserved fields.*/
54         hpet_w64(hp_addr + 0x10, hpet_r64(hp_addr + 0x10) & ~0x3);
55         printk("Disabled the HPET timer\n");
56
57         return finatable_nochildren(hpet);
58 }
59
60 void cmos_dumping_ground()
61 {
62         uint8_t cmos_b;
63
64         /* this stuff tries to turn off various cmos / RTC timer bits.  keeping
65          * around if we need to disable the RTC alarm.  note that the HPET replaces
66          * the RTC periodic function (where available), and in those cases the RTC
67          * alarm function is implemented with SMM. */
68         outb(0x70, 0xb);
69         cmos_b = inb(0x71);
70         printk("cmos b 0x%02x\n", cmos_b);
71
72         cmos_b &= ~((1 << 5) | (1 << 6));
73         outb(0x70, 0xb);
74         outb(0x71, cmos_b);
75
76         outb(0x70, 0xb);
77         cmos_b = inb(0x71);
78         printk("cmos b 0x%02x\n", cmos_b);
79 }