Source-Changes-HG archive

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Old Index]

[src/trunk]: src/sys/dev/pci/voyager an alternative clock implementation for ...



details:   https://anonhg.NetBSD.org/src/rev/92f0d44276dd
branches:  trunk
changeset: 772011:92f0d44276dd
user:      macallan <macallan%NetBSD.org@localhost>
date:      Tue Dec 13 14:39:37 2011 +0000

description:
an alternative clock implementation for Loongson2F and SM502, mostly
Gdium-specific.
This supports Loongson2F frequency scaling. The problem is that Gdium has
no CPU clock independent high resolution timer we can use as a timecounter
so we use one of the SM502's PWMs to generate a 100Hz timer interrupt, use
the cp0 counter to measure time and adjust for frequency changes.
Other Loongson-based machines will need something similar but hopefully
less hackish.

diffstat:

 sys/dev/pci/voyager/files.voyager |   14 +-
 sys/dev/pci/voyager/pwmclock.c    |  355 ++++++++++++++++++++++++++++++++++++++
 2 files changed, 367 insertions(+), 2 deletions(-)

diffs (truncated from 382 to 300 lines):

diff -r c9237b01be00 -r 92f0d44276dd sys/dev/pci/voyager/files.voyager
--- a/sys/dev/pci/voyager/files.voyager Tue Dec 13 14:23:43 2011 +0000
+++ b/sys/dev/pci/voyager/files.voyager Tue Dec 13 14:39:37 2011 +0000
@@ -3,7 +3,17 @@
 define voyagerbus {}
 
 # the graphics part
-device voyagerfb: wsemuldisplaydev, rasops8, rasops16, rasops32, vcons, videomode, iic, i2c_bitbang
+device voyagerfb: wsemuldisplaydev, rasops8, rasops16, vcons, videomode, iic, i2c_bitbang
 attach voyagerfb at voyagerbus
-file   dev/pci/voyager/voyagerfb.c             voyagerfb
+file   dev/pci/voyager/voyagerfb.c             voyagerfb needs-flag
 defflag        opt_voyagerfb.h VOYAGERFB_DEBUG
+
+# a clock timer
+device         pwmclock
+attach         pwmclock at voyagerbus
+file   dev/pci/voyager/pwmclock.c              pwmclock needs-flag
+
+# the audio part
+device         vac: audiobus, auconv, mulaw
+attach         vac at voyagerbus
+file   dev/pci/voyager/vac.c                   vac needs-flag
diff -r c9237b01be00 -r 92f0d44276dd sys/dev/pci/voyager/pwmclock.c
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/sys/dev/pci/voyager/pwmclock.c    Tue Dec 13 14:39:37 2011 +0000
@@ -0,0 +1,355 @@
+/*     $NetBSD: pwmclock.c,v 1.1 2011/12/13 14:39:37 macallan Exp $    */
+
+/*
+ * Copyright (c) 2011 Michael Lorenz
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+ * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+ * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
+ * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+ * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+ * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+ * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+ * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
+ * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#include <sys/cdefs.h>
+__KERNEL_RCSID(0, "$NetBSD: pwmclock.c,v 1.1 2011/12/13 14:39:37 macallan Exp $");
+
+#include <sys/param.h>
+#include <sys/systm.h>
+#include <sys/kernel.h>
+#include <sys/device.h>
+#include <sys/cpu.h>
+#include <sys/timetc.h>
+#include <sys/sysctl.h>
+
+#include <dev/pci/voyagervar.h>
+#include <dev/ic/sm502reg.h>
+
+#include <mips/mips3_clock.h>
+#include <mips/locore.h>
+#include <mips/bonito/bonitoreg.h>
+#include <mips/bonito/bonitovar.h>
+
+#ifdef PWMCLOCK_DEBUG
+#define DPRINTF aprint_error
+#else
+#define DPRINTF while (0) printf
+#endif
+
+int pwmclock_intr(void *);
+
+struct pwmclock_softc {
+       device_t sc_dev;
+       bus_space_tag_t sc_memt;
+       bus_space_handle_t sc_regh;
+       uint32_t sc_reg, sc_last;
+       uint32_t sc_scale[8];
+       uint32_t sc_count;      /* should probably be 64 bit */
+       int sc_step;
+       int sc_step_wanted;
+};
+
+static int     pwmclock_match(device_t, cfdata_t, void *);
+static void    pwmclock_attach(device_t, device_t, void *);
+
+CFATTACH_DECL_NEW(pwmclock, sizeof(struct pwmclock_softc),
+    pwmclock_match, pwmclock_attach, NULL, NULL);
+
+static void pwmclock_start(void);
+static u_int get_pwmclock_timecount(struct timecounter *);
+
+struct pwmclock_softc *pwmclock;
+extern void (*initclocks_ptr)(void);
+extern struct clockframe cf;
+
+/* 0, 1/4, 3/8, 1/2, 5/8, 3/4, 7/8, 1 */
+static int scale_m[] = {1, 1, 3, 1, 5, 3, 7, 1};
+static int scale_d[] = {0, 4, 8, 2, 8, 4, 8, 1};
+
+#define scale(x, f) (x * scale_d[f] / scale_m[f])
+
+void pwmclock_set_speed(struct pwmclock_softc *, int);
+static int  pwmclock_cpuspeed_temp(SYSCTLFN_ARGS);
+static int  pwmclock_cpuspeed_cur(SYSCTLFN_ARGS);
+static int  pwmclock_cpuspeed_available(SYSCTLFN_ARGS);
+
+static struct timecounter pwmclock_timecounter = {
+       get_pwmclock_timecount, /* get_timecount */
+       0,                      /* no poll_pps */
+       0xffffffff,             /* counter_mask */
+       0,                      /* frequency */
+       "pwm",                  /* name */
+       100,                    /* quality */
+       NULL,                   /* tc_priv */
+       NULL                    /* tc_next */
+};
+
+static int
+pwmclock_match(device_t parent, cfdata_t match, void *aux)
+{
+       struct voyager_attach_args *vaa = (struct voyager_attach_args *)aux;
+
+       if (strcmp(vaa->vaa_name, "pwmclock") == 0) return 100;
+       return 0;
+}
+
+static uint32_t
+pwmclock_wait_edge(struct pwmclock_softc *sc)
+{
+       /* clear interrupt */
+       bus_space_write_4(sc->sc_memt, sc->sc_regh, SM502_PWM1, sc->sc_reg);
+       while ((bus_space_read_4(sc->sc_memt, sc->sc_regh, SM502_PWM1) & SM502_PWM_INTR_PENDING) == 0);
+       return mips3_cp0_count_read();
+}
+
+static void
+pwmclock_attach(device_t parent, device_t self, void *aux)
+{
+       struct pwmclock_softc *sc = device_private(self);
+       struct voyager_attach_args *vaa = aux;
+       const struct sysctlnode *sysctl_node, *me, *freq;
+       uint32_t reg, last, curr, diff, acc;
+       int i, clk;
+
+       sc->sc_dev = self;
+       sc->sc_memt = vaa->vaa_tag;
+       sc->sc_regh = vaa->vaa_regh;
+
+       aprint_normal("\n");
+
+       voyager_establish_intr(parent, 22, pwmclock_intr, sc);
+       reg = voyager_set_pwm(100, 100); /* 100Hz, 10% duty cycle */
+       reg |= SM502_PWM_ENABLE | SM502_PWM_ENABLE_INTR | SM502_PWM_INTR_PENDING;
+       sc->sc_reg = reg;
+       pwmclock = sc;
+       initclocks_ptr = pwmclock_start;
+
+       /* ok, let's see how far the cycle counter gets between interrupts */
+       aprint_normal_dev(sc->sc_dev, "calibrating CPU timer...\n");
+       for (clk = 1; clk < 8; clk++) {
+               REGVAL(LS2F_CHIPCFG0) = (REGVAL(LS2F_CHIPCFG0) & ~LS2FCFG_FREQSCALE_MASK) | clk;
+               bus_space_write_4(sc->sc_memt, sc->sc_regh, SM502_PWM1, sc->sc_reg);
+               acc = 0;
+               last = pwmclock_wait_edge(sc);
+               for (i = 0; i < 16; i++) {
+                       curr = pwmclock_wait_edge(sc);
+                       diff = curr - last;
+                       acc += diff;
+                       last = curr;
+               }
+               sc->sc_scale[clk] = (acc >> 4) / 5000;
+       }
+       for (clk = 1; clk < 8; clk++) {
+               aprint_normal_dev(sc->sc_dev, "%d/8: %d\n", clk + 1, sc->sc_scale[clk]);
+       }
+       sc->sc_step = 7;
+       sc->sc_step_wanted = 7;
+
+       /* now setup sysctl */
+       if (sysctl_createv(NULL, 0, NULL, 
+           &me, 
+           CTLFLAG_READWRITE, CTLTYPE_NODE, "loongson", NULL, NULL,
+           0, NULL, 0, CTL_MACHDEP, CTL_CREATE, CTL_EOL) != 0)
+               aprint_error_dev(sc->sc_dev, "couldn't create 'loongson' node\n");
+       
+       if (sysctl_createv(NULL, 0, NULL, 
+           &freq, 
+           CTLFLAG_READWRITE, CTLTYPE_NODE, "frequency", NULL, NULL,
+           0, NULL, 0, CTL_MACHDEP, me->sysctl_num, CTL_CREATE, CTL_EOL) != 0)
+               aprint_error_dev(sc->sc_dev, "couldn't create 'frequency' node\n");
+
+       if (sysctl_createv(NULL, 0, NULL, 
+           &sysctl_node, 
+           CTLFLAG_READWRITE | CTLFLAG_OWNDESC,
+           CTLTYPE_INT, "target", "CPU speed", pwmclock_cpuspeed_temp, 
+           0, sc, 0, CTL_MACHDEP, me->sysctl_num, freq->sysctl_num, 
+           CTL_CREATE, CTL_EOL) == 0) {
+       } else
+               aprint_error_dev(sc->sc_dev, "couldn't create 'target' node\n");
+
+       if (sysctl_createv(NULL, 0, NULL, 
+           &sysctl_node, 
+           CTLFLAG_READWRITE,
+           CTLTYPE_INT, "current", NULL, pwmclock_cpuspeed_cur, 
+           1, sc, 0, CTL_MACHDEP, me->sysctl_num, freq->sysctl_num, 
+           CTL_CREATE, CTL_EOL) == 0) {
+       } else
+               aprint_error_dev(sc->sc_dev, "couldn't create 'current' node\n");
+
+       if (sysctl_createv(NULL, 0, NULL, 
+           &sysctl_node, 
+           CTLFLAG_READWRITE,
+           CTLTYPE_STRING, "available", NULL, pwmclock_cpuspeed_available, 
+           2, sc, 0, CTL_MACHDEP, me->sysctl_num, freq->sysctl_num, 
+           CTL_CREATE, CTL_EOL) == 0) {
+       } else
+               aprint_error_dev(sc->sc_dev, "couldn't create 'available' node\n");
+}
+
+void
+pwmclock_set_speed(struct pwmclock_softc *sc, int speed)
+{
+
+       if ((speed < 1) || (speed > 7))
+               return;
+       sc->sc_step_wanted = speed;
+       DPRINTF("%s: %d\n", __func__, speed);
+}
+
+/*
+ * the PWM interrupt handler
+ * we don't have a CPU clock independent, high resolution counter so we're
+ * stuck with a PWM that can't count and a CP0 counter that slows down or
+ * speeds up with the actual CPU speed. In order to still get halfway
+ * accurate time we do the following:
+ * - only change CPU speed in the timer interrupt
+ * - each timer interrupt we measure how many CP0 cycles passed since last
+ *   time, adjust for CPU speed since we can be sure it didn't change, use
+ *   that to update a separate counter
+ * - when reading the time counter we take the number of CP0 ticks since 
+ *   the last timer interrupt, scale it to CPU clock, return that plus the
+ *   interrupt updated counter mentioned above to get something close to
+ *   CP0 running at full speed 
+ * - when changing CPU speed do it as close to taking the time from CP0 as
+ *   possible to keep the period of time we spend with CP0 running at the
+ *   wrong frequency as short as possible - hopefully short enough to stay
+ *   insignificant compared to other noise since switching speeds isn't
+ *   going to happen all that often
+ */
+
+int
+pwmclock_intr(void *cookie)
+{
+       struct pwmclock_softc *sc = cookie;
+       uint32_t reg, now, diff;
+
+       /* is it us? */
+       reg = bus_space_read_4(sc->sc_memt, sc->sc_regh, SM502_PWM1);
+       if ((reg & SM502_PWM_INTR_PENDING) == 0)
+               return 0;
+
+       /* yes, it's us, so clear the interrupt */
+       bus_space_write_4(sc->sc_memt, sc->sc_regh, SM502_PWM1, sc->sc_reg);
+
+       /*
+        * this looks kinda funny but what we want here is this:
+        * - reading the counter and changing the CPU clock should be as
+        *   close together as possible in order to remain halfway accurate
+        * - we need to use the previous sc_step in order to scale the
+        *   interval passed since the last clock interrupt correctly, so
+        *   we only change sc_step after doing that
+        */
+       if (sc->sc_step_wanted != sc->sc_step) {
+               REGVAL(LS2F_CHIPCFG0) =
+                   (REGVAL(LS2F_CHIPCFG0) & ~LS2FCFG_FREQSCALE_MASK) |
+                    sc->sc_step_wanted;
+       }
+
+       now = mips3_cp0_count_read();           
+       diff = now - sc->sc_last;
+       sc->sc_count += scale(diff, sc->sc_step);
+       sc->sc_last = now;
+       if (sc->sc_step_wanted != sc->sc_step) {
+               sc->sc_step = sc->sc_step_wanted;
+       }
+       hardclock(&cf);
+
+       return 1;
+}
+



Home | Main Index | Thread Index | Old Index