arch/x86/platform/intel-mid/pwr.c

   1 /*
   2  * Intel MID Power Management Unit (PWRMU) device driver
   3  *
   4  * Copyright (C) 2016, Intel Corporation
   5  *
   6  * Author: Andy Shevchenko <andriy.shevchenko@linux.intel.com>
   7  *
   8  * This program is free software; you can redistribute it and/or modify it
   9  * under the terms and conditions of the GNU General Public License,
  10  * version 2, as published by the Free Software Foundation.
  11  *
  12  * Intel MID Power Management Unit device driver handles the South Complex PCI
  13  * devices such as GPDMA, SPI, I2C, PWM, and so on. By default PCI core
  14  * modifies bits in PMCSR register in the PCI configuration space. This is not
  15  * enough on some SoCs like Intel Tangier. In such case PCI core sets a new
  16  * power state of the device in question through a PM hook registered in struct
  17  * pci_platform_pm_ops (see drivers/pci/pci-mid.c).
  18  */
  19
  20 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  21
  22 #include <linux/delay.h>
  23 #include <linux/errno.h>
  24 #include <linux/interrupt.h>
  25 #include <linux/kernel.h>
  26 #include <linux/export.h>
  27 #include <linux/mutex.h>
  28 #include <linux/pci.h>
  29
  30 #include <asm/intel-mid.h>
  31
  32 /* Registers */
  33 #define PM_STS                  0x00
  34 #define PM_CMD                  0x04
  35 #define PM_ICS                  0x08
  36 #define PM_WKC(x)               (0x10 + (x) * 4)
  37 #define PM_WKS(x)               (0x18 + (x) * 4)
  38 #define PM_SSC(x)               (0x20 + (x) * 4)
  39 #define PM_SSS(x)               (0x30 + (x) * 4)
  40
  41 /* Bits in PM_STS */
  42 #define PM_STS_BUSY             (1 << 8)
  43
  44 /* Bits in PM_CMD */
  45 #define PM_CMD_CMD(x)           ((x) << 0)
  46 #define PM_CMD_IOC              (1 << 8)
  47 #define PM_CMD_D3cold           (1 << 21)
  48
  49 /* List of commands */
  50 #define CMD_SET_CFG             0x01
  51
  52 /* Bits in PM_ICS */
  53 #define PM_ICS_INT_STATUS(x)    ((x) & 0xff)
  54 #define PM_ICS_IE               (1 << 8)
  55 #define PM_ICS_IP               (1 << 9)
  56 #define PM_ICS_SW_INT_STS       (1 << 10)
  57
  58 /* List of interrupts */
  59 #define INT_INVALID             0
  60 #define INT_CMD_COMPLETE        1
  61 #define INT_CMD_ERR             2
  62 #define INT_WAKE_EVENT          3
  63 #define INT_LSS_POWER_ERR       4
  64 #define INT_S0iX_MSG_ERR        5
  65 #define INT_NO_C6               6
  66 #define INT_TRIGGER_ERR         7
  67 #define INT_INACTIVITY          8
  68
  69 /* South Complex devices */
  70 #define LSS_MAX_SHARED_DEVS     4
  71 #define LSS_MAX_DEVS            64
  72
  73 #define LSS_WS_BITS             1       /* wake state width */
  74 #define LSS_PWS_BITS            2       /* power state width */
  75
  76 /* Supported device IDs */
  77 #define PCI_DEVICE_ID_PENWELL   0x0828
  78 #define PCI_DEVICE_ID_TANGIER   0x11a1
  79
  80 struct mid_pwr_dev {
  81         struct pci_dev *pdev;
  82         pci_power_t state;
  83 };
  84
  85 struct mid_pwr {
  86         struct device *dev;
  87         void __iomem *regs;
  88         int irq;
  89         bool available;
  90
  91         struct mutex lock;
  92         struct mid_pwr_dev lss[LSS_MAX_DEVS][LSS_MAX_SHARED_DEVS];
  93 };
  94
  95 static struct mid_pwr *midpwr;
  96
  97 static u32 mid_pwr_get_state(struct mid_pwr *pwr, int reg)
  98 {
  99         return readl(pwr->regs + PM_SSS(reg));
 100 }
 101
 102 static void mid_pwr_set_state(struct mid_pwr *pwr, int reg, u32 value)
 103 {
 104         writel(value, pwr->regs + PM_SSC(reg));
 105 }
 106
 107 static void mid_pwr_set_wake(struct mid_pwr *pwr, int reg, u32 value)
 108 {
 109         writel(value, pwr->regs + PM_WKC(reg));
 110 }
 111
 112 static void mid_pwr_interrupt_disable(struct mid_pwr *pwr)
 113 {
 114         writel(~PM_ICS_IE, pwr->regs + PM_ICS);
 115 }
 116
 117 static bool mid_pwr_is_busy(struct mid_pwr *pwr)
 118 {
 119         return !!(readl(pwr->regs + PM_STS) & PM_STS_BUSY);
 120 }
 121
 122 /* Wait 500ms that the latest PWRMU command finished */
 123 static int mid_pwr_wait(struct mid_pwr *pwr)
 124 {
 125         unsigned int count = 500000;
 126         bool busy;
 127
 128         do {
 129                 busy = mid_pwr_is_busy(pwr);
 130                 if (!busy)
 131                         return 0;
 132                 udelay(1);
 133         } while (--count);
 134
 135         return -EBUSY;
 136 }
 137
 138 static int mid_pwr_wait_for_cmd(struct mid_pwr *pwr, u8 cmd)
 139 {
 140         writel(PM_CMD_CMD(cmd), pwr->regs + PM_CMD);
 141         return mid_pwr_wait(pwr);
 142 }
 143
 144 static int __update_power_state(struct mid_pwr *pwr, int reg, int bit, int new)
 145 {
 146         int curstate;
 147         u32 power;
 148         int ret;
 149
 150         /* Check if the device is already in desired state */
 151         power = mid_pwr_get_state(pwr, reg);
 152         curstate = (power >> bit) & 3;
 153         if (curstate == new)
 154                 return 0;
 155
 156         /* Update the power state */
 157         mid_pwr_set_state(pwr, reg, (power & ~(3 << bit)) | (new << bit));
 158
 159         /* Send command to SCU */
 160         ret = mid_pwr_wait_for_cmd(pwr, CMD_SET_CFG);
 161         if (ret)
 162                 return ret;
 163
 164         /* Check if the device is already in desired state */
 165         power = mid_pwr_get_state(pwr, reg);
 166         curstate = (power >> bit) & 3;
 167         if (curstate != new)
 168                 return -EAGAIN;
 169
 170         return 0;
 171 }
 172
 173 static pci_power_t __find_weakest_power_state(struct mid_pwr_dev *lss,
 174                                               struct pci_dev *pdev,
 175                                               pci_power_t state)
 176 {
 177         pci_power_t weakest = PCI_D3hot;
 178         unsigned int j;
 179
 180         /* Find device in cache or first free cell */
 181         for (j = 0; j < LSS_MAX_SHARED_DEVS; j++) {
 182                 if (lss[j].pdev == pdev || !lss[j].pdev)
 183                         break;
 184         }
 185
 186         /* Store the desired state in cache */
 187         if (j < LSS_MAX_SHARED_DEVS) {
 188                 lss[j].pdev = pdev;
 189                 lss[j].state = state;
 190         } else {
 191                 dev_WARN(&pdev->dev, "No room for device in PWRMU LSS cache\n");
 192                 weakest = state;
 193         }
 194
 195         /* Find the power state we may use */
 196         for (j = 0; j < LSS_MAX_SHARED_DEVS; j++) {
 197                 if (lss[j].state < weakest)
 198                         weakest = lss[j].state;
 199         }
 200
 201         return weakest;
 202 }
 203
 204 static int __set_power_state(struct mid_pwr *pwr, struct pci_dev *pdev,
 205                              pci_power_t state, int id, int reg, int bit)
 206 {
 207         const char *name;
 208         int ret;
 209
 210         state = __find_weakest_power_state(pwr->lss[id], pdev, state);
 211         name = pci_power_name(state);
 212
 213         ret = __update_power_state(pwr, reg, bit, (__force int)state);
 214         if (ret) {
 215                 dev_warn(&pdev->dev, "Can't set power state %s: %d\n", name, ret);
 216                 return ret;
 217         }
 218
 219         dev_vdbg(&pdev->dev, "Set power state %s\n", name);
 220         return 0;
 221 }
 222
 223 static int mid_pwr_set_power_state(struct mid_pwr *pwr, struct pci_dev *pdev,
 224                                    pci_power_t state)
 225 {
 226         int id, reg, bit;
 227         int ret;
 228
 229         id = intel_mid_pwr_get_lss_id(pdev);
 230         if (id < 0)
 231                 return id;
 232
 233         reg = (id * LSS_PWS_BITS) / 32;
 234         bit = (id * LSS_PWS_BITS) % 32;
 235
 236         /* We support states between PCI_D0 and PCI_D3hot */
 237         if (state < PCI_D0)
 238                 state = PCI_D0;
 239         if (state > PCI_D3hot)
 240                 state = PCI_D3hot;
 241
 242         mutex_lock(&pwr->lock);
 243         ret = __set_power_state(pwr, pdev, state, id, reg, bit);
 244         mutex_unlock(&pwr->lock);
 245         return ret;
 246 }
 247
 248 int intel_mid_pci_set_power_state(struct pci_dev *pdev, pci_power_t state)
 249 {
 250         struct mid_pwr *pwr = midpwr;
 251         int ret = 0;
 252
 253         might_sleep();
 254
 255         if (pwr && pwr->available)
 256                 ret = mid_pwr_set_power_state(pwr, pdev, state);
 257         dev_vdbg(&pdev->dev, "set_power_state() returns %d\n", ret);
 258
 259         return 0;
 260 }
 261 EXPORT_SYMBOL_GPL(intel_mid_pci_set_power_state);
 262
 263 int intel_mid_pwr_get_lss_id(struct pci_dev *pdev)
 264 {
 265         int vndr;
 266         u8 id;
 267
 268         /*
 269          * Mapping to PWRMU index is kept in the Logical SubSystem ID byte of
 270          * Vendor capability.
 271          */
 272         vndr = pci_find_capability(pdev, PCI_CAP_ID_VNDR);
 273         if (!vndr)
 274                 return -EINVAL;
 275
 276         /* Read the Logical SubSystem ID byte */
 277         pci_read_config_byte(pdev, vndr + INTEL_MID_PWR_LSS_OFFSET, &id);
 278         if (!(id & INTEL_MID_PWR_LSS_TYPE))
 279                 return -ENODEV;
 280
 281         id &= ~INTEL_MID_PWR_LSS_TYPE;
 282         if (id >= LSS_MAX_DEVS)
 283                 return -ERANGE;
 284
 285         return id;
 286 }
 287
 288 static irqreturn_t mid_pwr_irq_handler(int irq, void *dev_id)
 289 {
 290         struct mid_pwr *pwr = dev_id;
 291         u32 ics;
 292
 293         ics = readl(pwr->regs + PM_ICS);
 294         if (!(ics & PM_ICS_IP))
 295                 return IRQ_NONE;
 296
 297         writel(ics | PM_ICS_IP, pwr->regs + PM_ICS);
 298
 299         dev_warn(pwr->dev, "Unexpected IRQ: %#x\n", PM_ICS_INT_STATUS(ics));
 300         return IRQ_HANDLED;
 301 }
 302
 303 struct mid_pwr_device_info {
 304         int (*set_initial_state)(struct mid_pwr *pwr);
 305 };
 306
 307 static int mid_pwr_probe(struct pci_dev *pdev, const struct pci_device_id *id)
 308 {
 309         struct mid_pwr_device_info *info = (void *)id->driver_data;
 310         struct device *dev = &pdev->dev;
 311         struct mid_pwr *pwr;
 312         int ret;
 313
 314         ret = pcim_enable_device(pdev);
 315         if (ret < 0) {
 316                 dev_err(&pdev->dev, "error: could not enable device\n");
 317                 return ret;
 318         }
 319
 320         ret = pcim_iomap_regions(pdev, 1 << 0, pci_name(pdev));
 321         if (ret) {
 322                 dev_err(&pdev->dev, "I/O memory remapping failed\n");
 323                 return ret;
 324         }
 325
 326         pwr = devm_kzalloc(dev, sizeof(*pwr), GFP_KERNEL);
 327         if (!pwr)
 328                 return -ENOMEM;
 329
 330         pwr->dev = dev;
 331         pwr->regs = pcim_iomap_table(pdev)[0];
 332         pwr->irq = pdev->irq;
 333
 334         mutex_init(&pwr->lock);
 335
 336         /* Disable interrupts */
 337         mid_pwr_interrupt_disable(pwr);
 338
 339         if (info && info->set_initial_state) {
 340                 ret = info->set_initial_state(pwr);
 341                 if (ret)
 342                         dev_warn(dev, "Can't set initial state: %d\n", ret);
 343         }
 344
 345         ret = devm_request_irq(dev, pdev->irq, mid_pwr_irq_handler,
 346                                IRQF_NO_SUSPEND, pci_name(pdev), pwr);
 347         if (ret)
 348                 return ret;
 349
 350         pwr->available = true;
 351         midpwr = pwr;
 352
 353         pci_set_drvdata(pdev, pwr);
 354         return 0;
 355 }
 356
 357 static int mid_set_initial_state(struct mid_pwr *pwr)
 358 {
 359         unsigned int i, j;
 360         int ret;
 361
 362         /*
 363          * Enable wake events.
 364          *
 365          * PWRMU supports up to 32 sources for wake up the system. Ungate them
 366          * all here.
 367          */
 368         mid_pwr_set_wake(pwr, 0, 0xffffffff);
 369         mid_pwr_set_wake(pwr, 1, 0xffffffff);
 370
 371         /*
 372          * Power off South Complex devices.
 373          *
 374          * There is a map (see a note below) of 64 devices with 2 bits per each
 375          * on 32-bit HW registers. The following calls set all devices to one
 376          * known initial state, i.e. PCI_D3hot. This is done in conjunction
 377          * with PMCSR setting in arch/x86/pci/intel_mid_pci.c.
 378          *
 379          * NOTE: The actual device mapping is provided by a platform at run
 380          * time using vendor capability of PCI configuration space.
 381          */
 382         mid_pwr_set_state(pwr, 0, 0xffffffff);
 383         mid_pwr_set_state(pwr, 1, 0xffffffff);
 384         mid_pwr_set_state(pwr, 2, 0xffffffff);
 385         mid_pwr_set_state(pwr, 3, 0xffffffff);
 386
 387         /* Send command to SCU */
 388         ret = mid_pwr_wait_for_cmd(pwr, CMD_SET_CFG);
 389         if (ret)
 390                 return ret;
 391
 392         for (i = 0; i < LSS_MAX_DEVS; i++) {
 393                 for (j = 0; j < LSS_MAX_SHARED_DEVS; j++)
 394                         pwr->lss[i][j].state = PCI_D3hot;
 395         }
 396
 397         return 0;
 398 }
 399
 400 static const struct mid_pwr_device_info mid_info = {
 401         .set_initial_state = mid_set_initial_state,
 402 };
 403
 404 static const struct pci_device_id mid_pwr_pci_ids[] = {
 405         { PCI_VDEVICE(INTEL, PCI_DEVICE_ID_PENWELL), (kernel_ulong_t)&mid_info },
 406         { PCI_VDEVICE(INTEL, PCI_DEVICE_ID_TANGIER), (kernel_ulong_t)&mid_info },
 407         {}
 408 };
 409
 410 static struct pci_driver mid_pwr_pci_driver = {
 411         .name           = "intel_mid_pwr",
 412         .probe          = mid_pwr_probe,
 413         .id_table       = mid_pwr_pci_ids,
 414 };
 415
 416 builtin_pci_driver(mid_pwr_pci_driver);