The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/powerpc/cpufreq/pcr.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*-
    2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
    3  *
    4  * Copyright (c) 2009 Nathan Whitehorn
    5  * All rights reserved.
    6  *
    7  * Redistribution and use in source and binary forms, with or without
    8  * modification, are permitted provided that the following conditions
    9  * are met:
   10  * 1. Redistributions of source code must retain the above copyright
   11  *    notice, this list of conditions and the following disclaimer.
   12  * 2. Redistributions in binary form must reproduce the above copyright
   13  *    notice, this list of conditions and the following disclaimer in the
   14  *    documentation and/or other materials provided with the distribution.
   15  *
   16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
   17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
   18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
   19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
   20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
   21  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
   22  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
   23  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
   24  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   26  * SUCH DAMAGE.
   27  */
   28 
   29 #include <sys/cdefs.h>
   30 __FBSDID("$FreeBSD$");
   31 
   32 #include <sys/param.h>
   33 #include <sys/systm.h>
   34 #include <sys/bus.h>
   35 #include <sys/cpu.h>
   36 #include <sys/kernel.h>
   37 #include <sys/module.h>
   38 
   39 #include <dev/ofw/ofw_bus.h>
   40 
   41 #include "cpufreq_if.h"
   42 
   43 struct pcr_softc {
   44         device_t dev;
   45         uint32_t pcr_vals[3];
   46         int nmodes;
   47 };
   48 
   49 static void     pcr_identify(driver_t *driver, device_t parent);
   50 static int      pcr_probe(device_t dev);
   51 static int      pcr_attach(device_t dev);
   52 static int      pcr_settings(device_t dev, struct cf_setting *sets, int *count);
   53 static int      pcr_set(device_t dev, const struct cf_setting *set);
   54 static int      pcr_get(device_t dev, struct cf_setting *set);
   55 static int      pcr_type(device_t dev, int *type);
   56 
   57 static device_method_t pcr_methods[] = {
   58         /* Device interface */
   59         DEVMETHOD(device_identify,      pcr_identify),
   60         DEVMETHOD(device_probe,         pcr_probe),
   61         DEVMETHOD(device_attach,        pcr_attach),
   62 
   63         /* cpufreq interface */
   64         DEVMETHOD(cpufreq_drv_set,      pcr_set),
   65         DEVMETHOD(cpufreq_drv_get,      pcr_get),
   66         DEVMETHOD(cpufreq_drv_type,     pcr_type),
   67         DEVMETHOD(cpufreq_drv_settings, pcr_settings),
   68 
   69         {0, 0}
   70 };
   71 
   72 static driver_t pcr_driver = {
   73         "pcr",
   74         pcr_methods,
   75         sizeof(struct pcr_softc)
   76 };
   77 
   78 static devclass_t pcr_devclass;
   79 DRIVER_MODULE(pcr, cpu, pcr_driver, pcr_devclass, 0, 0);
   80 
   81 /*
   82  * States
   83  */
   84 
   85 #define PCR_TO_FREQ(a)  ((a >> 17) & 3)
   86 
   87 #define PCR_FULL        0
   88 #define PCR_HALF        1
   89 #define PCR_QUARTER     2               /* Only on 970MP */
   90 
   91 #define PSR_RECEIVED    (1ULL << 61)
   92 #define PSR_COMPLETED   (1ULL << 61)
   93 
   94 /*
   95  * SCOM addresses
   96  */
   97 
   98 #define SCOM_PCR        0x0aa00100      /* Power Control Register */
   99 #define SCOM_PCR_BIT    0x80000000      /* Data bit for PCR */
  100 #define SCOM_PSR        0x40800100      /* Power Status Register */
  101 
  102 /*
  103  * SCOM Glue
  104  */
  105 
  106 #define SCOMC_READ      0x00008000
  107 #define SCOMC_WRITE     0x00000000 
  108 
  109 static void
  110 write_scom(register_t address, uint64_t value)
  111 {
  112         register_t msr;
  113         #ifndef __powerpc64__
  114         register_t hi, lo, scratch;
  115         #endif
  116 
  117         msr = mfmsr();
  118         mtmsr(msr & ~PSL_EE); isync();
  119 
  120         #ifdef __powerpc64__
  121         mtspr(SPR_SCOMD, value);
  122         #else
  123         hi = (value >> 32) & 0xffffffff;
  124         lo = value & 0xffffffff;
  125         mtspr64(SPR_SCOMD, hi, lo, scratch); 
  126         #endif
  127         isync();
  128         mtspr(SPR_SCOMC, address | SCOMC_WRITE);
  129         isync();
  130 
  131         mtmsr(msr); isync();
  132 }
  133 
  134 static uint64_t
  135 read_scom(register_t address)
  136 {
  137         register_t msr;
  138         uint64_t ret;
  139 
  140         msr = mfmsr();
  141         mtmsr(msr & ~PSL_EE); isync();
  142 
  143         mtspr(SPR_SCOMC, address | SCOMC_READ);
  144         isync();
  145 
  146         __asm __volatile ("mfspr %0,%1;"
  147             " mr %0+1, %0; srdi %0,%0,32" : "=r" (ret) : "K" (SPR_SCOMD));
  148 
  149         (void)mfspr(SPR_SCOMC); /* Complete transcation */
  150 
  151         mtmsr(msr); isync();
  152 
  153         return (ret);
  154 }
  155 
  156 static void
  157 pcr_identify(driver_t *driver, device_t parent)
  158 {
  159         uint16_t vers;
  160         vers = mfpvr() >> 16;
  161 
  162         /* Check for an IBM 970-class CPU */
  163         switch (vers) {
  164                 case IBM970FX:
  165                 case IBM970GX:
  166                 case IBM970MP:
  167                         break;
  168                 default:
  169                         return;
  170         }
  171 
  172         /* Make sure we're not being doubly invoked. */
  173         if (device_find_child(parent, "pcr", -1) != NULL)
  174                 return;
  175 
  176         /*
  177          * We attach a child for every CPU since settings need to
  178          * be performed on every CPU in the SMP case.
  179          */
  180         if (BUS_ADD_CHILD(parent, 10, "pcr", -1) == NULL)
  181                 device_printf(parent, "add pcr child failed\n");
  182 }
  183 
  184 static int
  185 pcr_probe(device_t dev)
  186 {
  187         if (resource_disabled("pcr", 0))
  188                 return (ENXIO);
  189 
  190         device_set_desc(dev, "PPC 970 Power Control Register");
  191         return (0);
  192 }
  193 
  194 static int
  195 pcr_attach(device_t dev)
  196 {
  197         struct pcr_softc *sc;
  198         phandle_t cpu;
  199         uint32_t modes[3];
  200         int i;
  201 
  202         sc = device_get_softc(dev);
  203         sc->dev = dev;
  204 
  205         cpu = ofw_bus_get_node(device_get_parent(dev));
  206 
  207         if (cpu <= 0) {
  208                 device_printf(dev,"No CPU device tree node!\n");
  209                 return (ENXIO);
  210         }
  211 
  212         if (OF_getproplen(cpu, "power-mode-data") <= 0) {
  213                 /* Use the first CPU's node */
  214                 cpu = OF_child(OF_parent(cpu));
  215         }
  216 
  217         /*
  218          * Collect the PCR values for each mode from the device tree.
  219          * These include bus timing information, and so cannot be
  220          * directly computed.
  221          */
  222         sc->nmodes = OF_getproplen(cpu, "power-mode-data");
  223         if (sc->nmodes <= 0 || sc->nmodes > sizeof(sc->pcr_vals)) {
  224                 device_printf(dev,"No power mode data in device tree!\n");
  225                 return (ENXIO);
  226         }
  227         OF_getprop(cpu, "power-mode-data", modes, sc->nmodes);
  228         sc->nmodes /= sizeof(modes[0]);
  229 
  230         /* Sort the modes */
  231         for (i = 0; i < sc->nmodes; i++)
  232                 sc->pcr_vals[PCR_TO_FREQ(modes[i])] = modes[i];
  233 
  234         cpufreq_register(dev);
  235         return (0);
  236 }
  237 
  238 static int
  239 pcr_settings(device_t dev, struct cf_setting *sets, int *count)
  240 {
  241         struct pcr_softc *sc;
  242 
  243         sc = device_get_softc(dev);
  244         if (sets == NULL || count == NULL)
  245                 return (EINVAL);
  246         if (*count < sc->nmodes)
  247                 return (E2BIG);
  248 
  249         /* Return a list of valid settings for this driver. */
  250         memset(sets, CPUFREQ_VAL_UNKNOWN, sizeof(*sets) * sc->nmodes);
  251 
  252         sets[0].freq = 10000; sets[0].dev = dev;
  253         sets[1].freq = 5000; sets[1].dev = dev;
  254         if (sc->nmodes > 2) {
  255                 sets[2].freq = 2500;
  256                 sets[2].dev = dev;
  257         }
  258         *count = sc->nmodes;
  259 
  260         return (0);
  261 }
  262 
  263 static int
  264 pcr_set(device_t dev, const struct cf_setting *set)
  265 {
  266         struct pcr_softc *sc;
  267         register_t pcr, msr;
  268         uint64_t psr;
  269         
  270         if (set == NULL)
  271                 return (EINVAL);
  272         sc = device_get_softc(dev);
  273 
  274         /* Construct the new PCR */
  275 
  276         pcr = SCOM_PCR_BIT;
  277 
  278         if (set->freq == 10000)
  279                 pcr |= sc->pcr_vals[0];
  280         else if (set->freq == 5000)
  281                 pcr |= sc->pcr_vals[1];
  282         else if (set->freq == 2500)
  283                 pcr |= sc->pcr_vals[2];
  284 
  285         msr = mfmsr(); 
  286         mtmsr(msr & ~PSL_EE); isync();
  287 
  288         /* 970MP requires PCR and PCRH to be cleared first */
  289 
  290         write_scom(SCOM_PCR,0);                 /* Clear PCRH */
  291         write_scom(SCOM_PCR,SCOM_PCR_BIT);      /* Clear PCR */
  292 
  293         /* Set PCR */
  294 
  295         write_scom(SCOM_PCR, pcr);
  296 
  297         /* Wait for completion */
  298 
  299         do {
  300                 DELAY(100);
  301                 psr = read_scom(SCOM_PSR);
  302         } while ((psr & PSR_RECEIVED) && !(psr & PSR_COMPLETED));
  303 
  304         mtmsr(msr); isync();
  305 
  306         return (0);
  307 }
  308 
  309 static int
  310 pcr_get(device_t dev, struct cf_setting *set)
  311 {
  312         uint64_t psr;
  313 
  314         if (set == NULL)
  315                 return (EINVAL);
  316 
  317         memset(set, CPUFREQ_VAL_UNKNOWN, sizeof(*set));
  318 
  319         psr = read_scom(SCOM_PSR);
  320 
  321         /* We want bits 6 and 7 */
  322         psr = (psr >> 56) & 3;
  323 
  324         set->freq = 10000;
  325         if (psr == PCR_HALF)
  326                 set->freq = 5000;
  327         else if (psr == PCR_QUARTER)
  328                 set->freq = 2500;
  329 
  330         set->dev = dev;
  331 
  332         return (0);
  333 }
  334 
  335 static int
  336 pcr_type(device_t dev, int *type)
  337 {
  338 
  339         if (type == NULL)
  340                 return (EINVAL);
  341 
  342         *type = CPUFREQ_TYPE_RELATIVE;
  343         return (0);
  344 }
  345 

Cache object: 7837187a562f1167de6e4f219976d18a


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.