/* $NetBSD: acpipmtimer.c,v 1.8 2009/08/18 17:47:46 dyoung Exp $ */

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: acpipmtimer.c,v 1.8 2009/08/18 17:47:46 dyoung Exp $");

#include <sys/types.h>

#include <sys/systm.h>
#include <sys/device.h>
#include <sys/malloc.h>
#include <sys/bus.h>
#include <sys/time.h>
#include <sys/timetc.h>

#include <dev/ic/acpipmtimer.h>

#define ACPI_PM_TIMER_FREQUENCY 3579545

struct hwtc {
       struct timecounter tc;
       bus_space_tag_t t;
       bus_space_handle_t h;
       bus_size_t off;
};

static u_int acpihwtimer_read_safe(struct timecounter *);
static u_int acpihwtimer_read_fast(struct timecounter *);

acpipmtimer_t
acpipmtimer_attach(device_t dev,
                  bus_space_tag_t t, bus_space_handle_t h, bus_size_t off,
                  int flags)
{
       struct hwtc *tc;

       tc = malloc(sizeof(struct hwtc), M_DEVBUF, M_WAITOK|M_ZERO);
       if (tc == NULL)
               return NULL;

       tc->tc.tc_name = device_xname(dev);
       tc->tc.tc_frequency = ACPI_PM_TIMER_FREQUENCY;
       if (flags & ACPIPMT_32BIT)
               tc->tc.tc_counter_mask = 0xffffffff;
       else
               tc->tc.tc_counter_mask = 0x00ffffff;
       if (flags & ACPIPMT_BADLATCH) {
               tc->tc.tc_get_timecount = acpihwtimer_read_safe;
               tc->tc.tc_quality = 900;
       } else {
               tc->tc.tc_get_timecount = acpihwtimer_read_fast;
               tc->tc.tc_quality = 1000;
       }

       tc->t = t;
       tc->h = h;
       tc->off = off;

       tc->tc.tc_priv = tc;
       tc_init(&tc->tc);
       aprint_normal("%s: %d-bit timer\n", tc->tc.tc_name,
                     (flags & ACPIPMT_32BIT ? 32 : 24));
       return tc;
}

int
acpipmtimer_detach(acpipmtimer_t timer, int flags)
{
       struct hwtc *tc = timer;

       return tc_detach(&tc->tc);
}

#define r(h) bus_space_read_4(h->t, h->h, h->off)

static u_int
acpihwtimer_read_safe(struct timecounter *tc)
{
       struct hwtc *h = tc->tc_priv;
       uint32_t t1, t2, t3;

       t2 = r(h);
       t3 = r(h);
       do {
               t1 = t2;
               t2 = t3;
               t3 = r(h);
       } while ((t1 > t2) || (t2 > t3));
       return (t2);
}

static u_int
acpihwtimer_read_fast(struct timecounter *tc)
{
       struct hwtc *h = tc->tc_priv;

       return r(h);
}