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