Linux Audio

Check our new training course

Loading...
v4.6
  1/*
  2 * intel_scu_ipc.c: Driver for the Intel SCU IPC mechanism
  3 *
  4 * (C) Copyright 2008-2010,2015 Intel Corporation
  5 * Author: Sreedhara DS (sreedhara.ds@intel.com)
  6 *
  7 * This program is free software; you can redistribute it and/or
  8 * modify it under the terms of the GNU General Public License
  9 * as published by the Free Software Foundation; version 2
 10 * of the License.
 11 *
 12 * SCU running in ARC processor communicates with other entity running in IA
 13 * core through IPC mechanism which in turn messaging between IA core ad SCU.
 14 * SCU has two IPC mechanism IPC-1 and IPC-2. IPC-1 is used between IA32 and
 15 * SCU where IPC-2 is used between P-Unit and SCU. This driver delas with
 16 * IPC-1 Driver provides an API for power control unit registers (e.g. MSIC)
 17 * along with other APIs.
 18 */
 19#include <linux/delay.h>
 20#include <linux/errno.h>
 21#include <linux/init.h>
 22#include <linux/device.h>
 23#include <linux/pm.h>
 24#include <linux/pci.h>
 25#include <linux/interrupt.h>
 26#include <linux/sfi.h>
 27#include <asm/intel-mid.h>
 28#include <asm/intel_scu_ipc.h>
 29
 30/* IPC defines the following message types */
 31#define IPCMSG_WATCHDOG_TIMER 0xF8 /* Set Kernel Watchdog Threshold */
 32#define IPCMSG_BATTERY        0xEF /* Coulomb Counter Accumulator */
 33#define IPCMSG_FW_UPDATE      0xFE /* Firmware update */
 34#define IPCMSG_PCNTRL         0xFF /* Power controller unit read/write */
 35#define IPCMSG_FW_REVISION    0xF4 /* Get firmware revision */
 36
 37/* Command id associated with message IPCMSG_PCNTRL */
 38#define IPC_CMD_PCNTRL_W      0 /* Register write */
 39#define IPC_CMD_PCNTRL_R      1 /* Register read */
 40#define IPC_CMD_PCNTRL_M      2 /* Register read-modify-write */
 41
 42/*
 43 * IPC register summary
 44 *
 45 * IPC register blocks are memory mapped at fixed address of PCI BAR 0.
 46 * To read or write information to the SCU, driver writes to IPC-1 memory
 47 * mapped registers. The following is the IPC mechanism
 
 48 *
 49 * 1. IA core cDMI interface claims this transaction and converts it to a
 50 *    Transaction Layer Packet (TLP) message which is sent across the cDMI.
 51 *
 52 * 2. South Complex cDMI block receives this message and writes it to
 53 *    the IPC-1 register block, causing an interrupt to the SCU
 54 *
 55 * 3. SCU firmware decodes this interrupt and IPC message and the appropriate
 56 *    message handler is called within firmware.
 57 */
 58
 
 
 59#define IPC_WWBUF_SIZE    20		/* IPC Write buffer Size */
 60#define IPC_RWBUF_SIZE    20		/* IPC Read buffer Size */
 61#define IPC_IOC	          0x100		/* IPC command register IOC bit */
 
 62
 63#define PCI_DEVICE_ID_LINCROFT		0x082a
 64#define PCI_DEVICE_ID_PENWELL		0x080e
 65#define PCI_DEVICE_ID_CLOVERVIEW	0x08ea
 66#define PCI_DEVICE_ID_TANGIER		0x11a0
 67
 68/* intel scu ipc driver data */
 69struct intel_scu_ipc_pdata_t {
 70	u32 i2c_base;
 71	u32 i2c_len;
 72	u8 irq_mode;
 73};
 74
 75static struct intel_scu_ipc_pdata_t intel_scu_ipc_lincroft_pdata = {
 76	.i2c_base = 0xff12b000,
 77	.i2c_len = 0x10,
 78	.irq_mode = 0,
 79};
 80
 81/* Penwell and Cloverview */
 82static struct intel_scu_ipc_pdata_t intel_scu_ipc_penwell_pdata = {
 83	.i2c_base = 0xff12b000,
 84	.i2c_len = 0x10,
 85	.irq_mode = 1,
 86};
 87
 88static struct intel_scu_ipc_pdata_t intel_scu_ipc_tangier_pdata = {
 89	.i2c_base  = 0xff00d000,
 90	.i2c_len = 0x10,
 91	.irq_mode = 0,
 92};
 93
 94struct intel_scu_ipc_dev {
 95	struct device *dev;
 96	void __iomem *ipc_base;
 97	void __iomem *i2c_base;
 98	struct completion cmd_complete;
 99	u8 irq_mode;
100};
101
102static struct intel_scu_ipc_dev  ipcdev; /* Only one for now */
103
 
 
104/*
105 * IPC Read Buffer (Read Only):
106 * 16 byte buffer for receiving data from SCU, if IPC command
107 * processing results in response data
108 */
109#define IPC_READ_BUFFER		0x90
110
111#define IPC_I2C_CNTRL_ADDR	0
112#define I2C_DATA_ADDR		0x04
113
114static DEFINE_MUTEX(ipclock); /* lock used to prevent multiple call to SCU */
115
116/*
117 * Send ipc command
118 * Command Register (Write Only):
119 * A write to this register results in an interrupt to the SCU core processor
120 * Format:
121 * |rfu2(8) | size(8) | command id(4) | rfu1(3) | ioc(1) | command(8)|
122 */
123static inline void ipc_command(struct intel_scu_ipc_dev *scu, u32 cmd)
124{
125	if (scu->irq_mode) {
126		reinit_completion(&scu->cmd_complete);
127		writel(cmd | IPC_IOC, scu->ipc_base);
128	}
129	writel(cmd, scu->ipc_base);
130}
131
132/*
133 * Write ipc data
134 * IPC Write Buffer (Write Only):
135 * 16-byte buffer for sending data associated with IPC command to
136 * SCU. Size of the data is specified in the IPC_COMMAND_REG register
137 */
138static inline void ipc_data_writel(struct intel_scu_ipc_dev *scu, u32 data, u32 offset)
139{
140	writel(data, scu->ipc_base + 0x80 + offset);
141}
142
143/*
144 * Status Register (Read Only):
145 * Driver will read this register to get the ready/busy status of the IPC
146 * block and error status of the IPC command that was just processed by SCU
147 * Format:
148 * |rfu3(8)|error code(8)|initiator id(8)|cmd id(4)|rfu1(2)|error(1)|busy(1)|
149 */
150static inline u8 ipc_read_status(struct intel_scu_ipc_dev *scu)
151{
152	return __raw_readl(scu->ipc_base + 0x04);
153}
154
155/* Read ipc byte data */
156static inline u8 ipc_data_readb(struct intel_scu_ipc_dev *scu, u32 offset)
157{
158	return readb(scu->ipc_base + IPC_READ_BUFFER + offset);
159}
160
161/* Read ipc u32 data */
162static inline u32 ipc_data_readl(struct intel_scu_ipc_dev *scu, u32 offset)
163{
164	return readl(scu->ipc_base + IPC_READ_BUFFER + offset);
165}
166
167/* Wait till scu status is busy */
168static inline int busy_loop(struct intel_scu_ipc_dev *scu)
169{
170	u32 status = ipc_read_status(scu);
171	u32 loop_count = 100000;
172
173	/* break if scu doesn't reset busy bit after huge retry */
174	while ((status & BIT(0)) && --loop_count) {
175		udelay(1); /* scu processing time is in few u secods */
176		status = ipc_read_status(scu);
177	}
178
179	if (status & BIT(0)) {
180		dev_err(scu->dev, "IPC timed out");
181		return -ETIMEDOUT;
182	}
183
184	if (status & BIT(1))
185		return -EIO;
186
187	return 0;
188}
189
190/* Wait till ipc ioc interrupt is received or timeout in 3 HZ */
191static inline int ipc_wait_for_interrupt(struct intel_scu_ipc_dev *scu)
192{
193	int status;
 
194
195	if (!wait_for_completion_timeout(&scu->cmd_complete, 3 * HZ)) {
196		dev_err(scu->dev, "IPC timed out\n");
197		return -ETIMEDOUT;
 
 
 
 
 
 
 
198	}
199
200	status = ipc_read_status(scu);
201	if (status & BIT(1))
202		return -EIO;
203
204	return 0;
205}
206
207static int intel_scu_ipc_check_status(struct intel_scu_ipc_dev *scu)
208{
209	return scu->irq_mode ? ipc_wait_for_interrupt(scu) : busy_loop(scu);
210}
211
212/* Read/Write power control(PMIC in Langwell, MSIC in PenWell) registers */
213static int pwr_reg_rdwr(u16 *addr, u8 *data, u32 count, u32 op, u32 id)
214{
215	struct intel_scu_ipc_dev *scu = &ipcdev;
216	int nc;
217	u32 offset = 0;
218	int err;
219	u8 cbuf[IPC_WWBUF_SIZE];
220	u32 *wbuf = (u32 *)&cbuf;
221
222	memset(cbuf, 0, sizeof(cbuf));
223
224	mutex_lock(&ipclock);
225
226	if (scu->dev == NULL) {
 
 
227		mutex_unlock(&ipclock);
228		return -ENODEV;
229	}
230
231	for (nc = 0; nc < count; nc++, offset += 2) {
232		cbuf[offset] = addr[nc];
233		cbuf[offset + 1] = addr[nc] >> 8;
234	}
235
236	if (id == IPC_CMD_PCNTRL_R) {
237		for (nc = 0, offset = 0; nc < count; nc++, offset += 4)
238			ipc_data_writel(scu, wbuf[nc], offset);
239		ipc_command(scu, (count * 2) << 16 | id << 12 | 0 << 8 | op);
240	} else if (id == IPC_CMD_PCNTRL_W) {
241		for (nc = 0; nc < count; nc++, offset += 1)
242			cbuf[offset] = data[nc];
243		for (nc = 0, offset = 0; nc < count; nc++, offset += 4)
244			ipc_data_writel(scu, wbuf[nc], offset);
245		ipc_command(scu, (count * 3) << 16 | id << 12 | 0 << 8 | op);
246	} else if (id == IPC_CMD_PCNTRL_M) {
247		cbuf[offset] = data[0];
248		cbuf[offset + 1] = data[1];
249		ipc_data_writel(scu, wbuf[0], 0); /* Write wbuff */
250		ipc_command(scu, 4 << 16 | id << 12 | 0 << 8 | op);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
251	}
252
253	err = intel_scu_ipc_check_status(scu);
254	if (!err && id == IPC_CMD_PCNTRL_R) { /* Read rbuf */
255		/* Workaround: values are read as 0 without memcpy_fromio */
256		memcpy_fromio(cbuf, scu->ipc_base + 0x90, 16);
257		for (nc = 0; nc < count; nc++)
258			data[nc] = ipc_data_readb(scu, nc);
 
 
 
 
 
259	}
260	mutex_unlock(&ipclock);
261	return err;
262}
263
264/**
265 *	intel_scu_ipc_ioread8		-	read a word via the SCU
266 *	@addr: register on SCU
267 *	@data: return pointer for read byte
268 *
269 *	Read a single register. Returns 0 on success or an error code. All
270 *	locking between SCU accesses is handled for the caller.
271 *
272 *	This function may sleep.
273 */
274int intel_scu_ipc_ioread8(u16 addr, u8 *data)
275{
276	return pwr_reg_rdwr(&addr, data, 1, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
277}
278EXPORT_SYMBOL(intel_scu_ipc_ioread8);
279
280/**
281 *	intel_scu_ipc_ioread16		-	read a word via the SCU
282 *	@addr: register on SCU
283 *	@data: return pointer for read word
284 *
285 *	Read a register pair. Returns 0 on success or an error code. All
286 *	locking between SCU accesses is handled for the caller.
287 *
288 *	This function may sleep.
289 */
290int intel_scu_ipc_ioread16(u16 addr, u16 *data)
291{
292	u16 x[2] = {addr, addr + 1};
293	return pwr_reg_rdwr(x, (u8 *)data, 2, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
294}
295EXPORT_SYMBOL(intel_scu_ipc_ioread16);
296
297/**
298 *	intel_scu_ipc_ioread32		-	read a dword via the SCU
299 *	@addr: register on SCU
300 *	@data: return pointer for read dword
301 *
302 *	Read four registers. Returns 0 on success or an error code. All
303 *	locking between SCU accesses is handled for the caller.
304 *
305 *	This function may sleep.
306 */
307int intel_scu_ipc_ioread32(u16 addr, u32 *data)
308{
309	u16 x[4] = {addr, addr + 1, addr + 2, addr + 3};
310	return pwr_reg_rdwr(x, (u8 *)data, 4, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
311}
312EXPORT_SYMBOL(intel_scu_ipc_ioread32);
313
314/**
315 *	intel_scu_ipc_iowrite8		-	write a byte via the SCU
316 *	@addr: register on SCU
317 *	@data: byte to write
318 *
319 *	Write a single register. Returns 0 on success or an error code. All
320 *	locking between SCU accesses is handled for the caller.
321 *
322 *	This function may sleep.
323 */
324int intel_scu_ipc_iowrite8(u16 addr, u8 data)
325{
326	return pwr_reg_rdwr(&addr, &data, 1, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
327}
328EXPORT_SYMBOL(intel_scu_ipc_iowrite8);
329
330/**
331 *	intel_scu_ipc_iowrite16		-	write a word via the SCU
332 *	@addr: register on SCU
333 *	@data: word to write
334 *
335 *	Write two registers. Returns 0 on success or an error code. All
336 *	locking between SCU accesses is handled for the caller.
337 *
338 *	This function may sleep.
339 */
340int intel_scu_ipc_iowrite16(u16 addr, u16 data)
341{
342	u16 x[2] = {addr, addr + 1};
343	return pwr_reg_rdwr(x, (u8 *)&data, 2, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
344}
345EXPORT_SYMBOL(intel_scu_ipc_iowrite16);
346
347/**
348 *	intel_scu_ipc_iowrite32		-	write a dword via the SCU
349 *	@addr: register on SCU
350 *	@data: dword to write
351 *
352 *	Write four registers. Returns 0 on success or an error code. All
353 *	locking between SCU accesses is handled for the caller.
354 *
355 *	This function may sleep.
356 */
357int intel_scu_ipc_iowrite32(u16 addr, u32 data)
358{
359	u16 x[4] = {addr, addr + 1, addr + 2, addr + 3};
360	return pwr_reg_rdwr(x, (u8 *)&data, 4, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
361}
362EXPORT_SYMBOL(intel_scu_ipc_iowrite32);
363
364/**
365 *	intel_scu_ipc_readvv		-	read a set of registers
366 *	@addr: register list
367 *	@data: bytes to return
368 *	@len: length of array
369 *
370 *	Read registers. Returns 0 on success or an error code. All
371 *	locking between SCU accesses is handled for the caller.
372 *
373 *	The largest array length permitted by the hardware is 5 items.
374 *
375 *	This function may sleep.
376 */
377int intel_scu_ipc_readv(u16 *addr, u8 *data, int len)
378{
379	return pwr_reg_rdwr(addr, data, len, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
380}
381EXPORT_SYMBOL(intel_scu_ipc_readv);
382
383/**
384 *	intel_scu_ipc_writev		-	write a set of registers
385 *	@addr: register list
386 *	@data: bytes to write
387 *	@len: length of array
388 *
389 *	Write registers. Returns 0 on success or an error code. All
390 *	locking between SCU accesses is handled for the caller.
391 *
392 *	The largest array length permitted by the hardware is 5 items.
393 *
394 *	This function may sleep.
395 *
396 */
397int intel_scu_ipc_writev(u16 *addr, u8 *data, int len)
398{
399	return pwr_reg_rdwr(addr, data, len, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
400}
401EXPORT_SYMBOL(intel_scu_ipc_writev);
402
 
403/**
404 *	intel_scu_ipc_update_register	-	r/m/w a register
405 *	@addr: register address
406 *	@bits: bits to update
407 *	@mask: mask of bits to update
408 *
409 *	Read-modify-write power control unit register. The first data argument
410 *	must be register value and second is mask value
411 *	mask is a bitmap that indicates which bits to update.
412 *	0 = masked. Don't modify this bit, 1 = modify this bit.
413 *	returns 0 on success or an error code.
414 *
415 *	This function may sleep. Locking between SCU accesses is handled
416 *	for the caller.
417 */
418int intel_scu_ipc_update_register(u16 addr, u8 bits, u8 mask)
419{
420	u8 data[2] = { bits, mask };
421	return pwr_reg_rdwr(&addr, data, 1, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_M);
422}
423EXPORT_SYMBOL(intel_scu_ipc_update_register);
424
425/**
426 *	intel_scu_ipc_simple_command	-	send a simple command
427 *	@cmd: command
428 *	@sub: sub type
429 *
430 *	Issue a simple command to the SCU. Do not use this interface if
431 *	you must then access data as any data values may be overwritten
432 *	by another SCU access by the time this function returns.
433 *
434 *	This function may sleep. Locking for SCU accesses is handled for
435 *	the caller.
436 */
437int intel_scu_ipc_simple_command(int cmd, int sub)
438{
439	struct intel_scu_ipc_dev *scu = &ipcdev;
440	int err;
441
442	mutex_lock(&ipclock);
443	if (scu->dev == NULL) {
444		mutex_unlock(&ipclock);
445		return -ENODEV;
446	}
447	ipc_command(scu, sub << 12 | cmd);
448	err = intel_scu_ipc_check_status(scu);
449	mutex_unlock(&ipclock);
450	return err;
451}
452EXPORT_SYMBOL(intel_scu_ipc_simple_command);
453
454/**
455 *	intel_scu_ipc_command	-	command with data
456 *	@cmd: command
457 *	@sub: sub type
458 *	@in: input data
459 *	@inlen: input length in dwords
460 *	@out: output data
461 *	@outlein: output length in dwords
462 *
463 *	Issue a command to the SCU which involves data transfers. Do the
464 *	data copies under the lock but leave it for the caller to interpret
465 */
 
466int intel_scu_ipc_command(int cmd, int sub, u32 *in, int inlen,
467			  u32 *out, int outlen)
468{
469	struct intel_scu_ipc_dev *scu = &ipcdev;
470	int i, err;
471
472	mutex_lock(&ipclock);
473	if (scu->dev == NULL) {
474		mutex_unlock(&ipclock);
475		return -ENODEV;
476	}
477
478	for (i = 0; i < inlen; i++)
479		ipc_data_writel(scu, *in++, 4 * i);
480
481	ipc_command(scu, (inlen << 16) | (sub << 12) | cmd);
482	err = intel_scu_ipc_check_status(scu);
483
484	if (!err) {
485		for (i = 0; i < outlen; i++)
486			*out++ = ipc_data_readl(scu, 4 * i);
487	}
488
489	mutex_unlock(&ipclock);
490	return err;
491}
492EXPORT_SYMBOL(intel_scu_ipc_command);
493
494/* I2C commands */
495#define IPC_I2C_WRITE 1 /* I2C Write command */
496#define IPC_I2C_READ  2 /* I2C Read command */
497
498/**
499 *	intel_scu_ipc_i2c_cntrl		-	I2C read/write operations
500 *	@addr: I2C address + command bits
501 *	@data: data to read/write
502 *
503 *	Perform an an I2C read/write operation via the SCU. All locking is
504 *	handled for the caller. This function may sleep.
505 *
506 *	Returns an error code or 0 on success.
507 *
508 *	This has to be in the IPC driver for the locking.
509 */
510int intel_scu_ipc_i2c_cntrl(u32 addr, u32 *data)
511{
512	struct intel_scu_ipc_dev *scu = &ipcdev;
513	u32 cmd = 0;
514
515	mutex_lock(&ipclock);
516	if (scu->dev == NULL) {
517		mutex_unlock(&ipclock);
518		return -ENODEV;
519	}
520	cmd = (addr >> 24) & 0xFF;
521	if (cmd == IPC_I2C_READ) {
522		writel(addr, scu->i2c_base + IPC_I2C_CNTRL_ADDR);
523		/* Write not getting updated without delay */
524		mdelay(1);
525		*data = readl(scu->i2c_base + I2C_DATA_ADDR);
526	} else if (cmd == IPC_I2C_WRITE) {
527		writel(*data, scu->i2c_base + I2C_DATA_ADDR);
528		mdelay(1);
529		writel(addr, scu->i2c_base + IPC_I2C_CNTRL_ADDR);
530	} else {
531		dev_err(scu->dev,
532			"intel_scu_ipc: I2C INVALID_CMD = 0x%x\n", cmd);
533
534		mutex_unlock(&ipclock);
535		return -EIO;
536	}
537	mutex_unlock(&ipclock);
538	return 0;
539}
540EXPORT_SYMBOL(intel_scu_ipc_i2c_cntrl);
541
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
542/*
543 * Interrupt handler gets called when ioc bit of IPC_COMMAND_REG set to 1
544 * When ioc bit is set to 1, caller api must wait for interrupt handler called
545 * which in turn unlocks the caller api. Currently this is not used
546 *
547 * This is edge triggered so we need take no action to clear anything
548 */
549static irqreturn_t ioc(int irq, void *dev_id)
550{
551	struct intel_scu_ipc_dev *scu = dev_id;
552
553	if (scu->irq_mode)
554		complete(&scu->cmd_complete);
555
556	return IRQ_HANDLED;
557}
558
559/**
560 *	ipc_probe	-	probe an Intel SCU IPC
561 *	@pdev: the PCI device matching
562 *	@id: entry in the match table
563 *
564 *	Enable and install an intel SCU IPC. This appears in the PCI space
565 *	but uses some hard coded addresses as well.
566 */
567static int ipc_probe(struct pci_dev *pdev, const struct pci_device_id *id)
568{
569	int platform;		/* Platform type */
570	int err;
571	struct intel_scu_ipc_dev *scu = &ipcdev;
572	struct intel_scu_ipc_pdata_t *pdata;
573
574	platform = intel_mid_identify_cpu();
575	if (platform == 0)
576		return -ENODEV;
577
578	if (scu->dev)		/* We support only one SCU */
579		return -EBUSY;
580
581	pdata = (struct intel_scu_ipc_pdata_t *)id->driver_data;
582
583	scu->dev = &pdev->dev;
584	scu->irq_mode = pdata->irq_mode;
585
586	err = pcim_enable_device(pdev);
587	if (err)
588		return err;
589
590	err = pcim_iomap_regions(pdev, 1 << 0, pci_name(pdev));
591	if (err)
592		return err;
593
594	init_completion(&scu->cmd_complete);
 
 
595
596	err = devm_request_irq(&pdev->dev, pdev->irq, ioc, 0, "intel_scu_ipc",
597			       scu);
598	if (err)
599		return err;
600
601	scu->ipc_base = pcim_iomap_table(pdev)[0];
 
 
602
603	scu->i2c_base = ioremap_nocache(pdata->i2c_base, pdata->i2c_len);
604	if (!scu->i2c_base)
 
605		return -ENOMEM;
 
606
607	intel_scu_devices_create();
608
609	pci_set_drvdata(pdev, scu);
610	return 0;
611}
612
613static const struct pci_device_id pci_ids[] = {
614	{
615		PCI_VDEVICE(INTEL, PCI_DEVICE_ID_LINCROFT),
616		(kernel_ulong_t)&intel_scu_ipc_lincroft_pdata,
617	}, {
618		PCI_VDEVICE(INTEL, PCI_DEVICE_ID_PENWELL),
619		(kernel_ulong_t)&intel_scu_ipc_penwell_pdata,
620	}, {
621		PCI_VDEVICE(INTEL, PCI_DEVICE_ID_CLOVERVIEW),
622		(kernel_ulong_t)&intel_scu_ipc_penwell_pdata,
623	}, {
624		PCI_VDEVICE(INTEL, PCI_DEVICE_ID_TANGIER),
625		(kernel_ulong_t)&intel_scu_ipc_tangier_pdata,
626	}, {
627		0,
628	}
 
 
 
 
 
 
 
 
 
629};
 
630
631static struct pci_driver ipc_driver = {
632	.driver = {
633		.suppress_bind_attrs = true,
634	},
635	.name = "intel_scu_ipc",
636	.id_table = pci_ids,
637	.probe = ipc_probe,
 
638};
639builtin_pci_driver(ipc_driver);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
v3.1
  1/*
  2 * intel_scu_ipc.c: Driver for the Intel SCU IPC mechanism
  3 *
  4 * (C) Copyright 2008-2010 Intel Corporation
  5 * Author: Sreedhara DS (sreedhara.ds@intel.com)
  6 *
  7 * This program is free software; you can redistribute it and/or
  8 * modify it under the terms of the GNU General Public License
  9 * as published by the Free Software Foundation; version 2
 10 * of the License.
 11 *
 12 * SCU running in ARC processor communicates with other entity running in IA
 13 * core through IPC mechanism which in turn messaging between IA core ad SCU.
 14 * SCU has two IPC mechanism IPC-1 and IPC-2. IPC-1 is used between IA32 and
 15 * SCU where IPC-2 is used between P-Unit and SCU. This driver delas with
 16 * IPC-1 Driver provides an API for power control unit registers (e.g. MSIC)
 17 * along with other APIs.
 18 */
 19#include <linux/delay.h>
 20#include <linux/errno.h>
 21#include <linux/init.h>
 22#include <linux/sysdev.h>
 23#include <linux/pm.h>
 24#include <linux/pci.h>
 25#include <linux/interrupt.h>
 26#include <linux/sfi.h>
 27#include <asm/mrst.h>
 28#include <asm/intel_scu_ipc.h>
 29
 30/* IPC defines the following message types */
 31#define IPCMSG_WATCHDOG_TIMER 0xF8 /* Set Kernel Watchdog Threshold */
 32#define IPCMSG_BATTERY        0xEF /* Coulomb Counter Accumulator */
 33#define IPCMSG_FW_UPDATE      0xFE /* Firmware update */
 34#define IPCMSG_PCNTRL         0xFF /* Power controller unit read/write */
 35#define IPCMSG_FW_REVISION    0xF4 /* Get firmware revision */
 36
 37/* Command id associated with message IPCMSG_PCNTRL */
 38#define IPC_CMD_PCNTRL_W      0 /* Register write */
 39#define IPC_CMD_PCNTRL_R      1 /* Register read */
 40#define IPC_CMD_PCNTRL_M      2 /* Register read-modify-write */
 41
 42/*
 43 * IPC register summary
 44 *
 45 * IPC register blocks are memory mapped at fixed address of 0xFF11C000
 46 * To read or write information to the SCU, driver writes to IPC-1 memory
 47 * mapped registers (base address 0xFF11C000). The following is the IPC
 48 * mechanism
 49 *
 50 * 1. IA core cDMI interface claims this transaction and converts it to a
 51 *    Transaction Layer Packet (TLP) message which is sent across the cDMI.
 52 *
 53 * 2. South Complex cDMI block receives this message and writes it to
 54 *    the IPC-1 register block, causing an interrupt to the SCU
 55 *
 56 * 3. SCU firmware decodes this interrupt and IPC message and the appropriate
 57 *    message handler is called within firmware.
 58 */
 59
 60#define IPC_BASE_ADDR     0xFF11C000	/* IPC1 base register address */
 61#define IPC_MAX_ADDR      0x100		/* Maximum IPC regisers */
 62#define IPC_WWBUF_SIZE    20		/* IPC Write buffer Size */
 63#define IPC_RWBUF_SIZE    20		/* IPC Read buffer Size */
 64#define IPC_I2C_BASE      0xFF12B000	/* I2C control register base address */
 65#define IPC_I2C_MAX_ADDR  0x10		/* Maximum I2C regisers */
 66
 67static int ipc_probe(struct pci_dev *dev, const struct pci_device_id *id);
 68static void ipc_remove(struct pci_dev *pdev);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 69
 70struct intel_scu_ipc_dev {
 71	struct pci_dev *pdev;
 72	void __iomem *ipc_base;
 73	void __iomem *i2c_base;
 
 
 74};
 75
 76static struct intel_scu_ipc_dev  ipcdev; /* Only one for now */
 77
 78static int platform;		/* Platform type */
 79
 80/*
 81 * IPC Read Buffer (Read Only):
 82 * 16 byte buffer for receiving data from SCU, if IPC command
 83 * processing results in response data
 84 */
 85#define IPC_READ_BUFFER		0x90
 86
 87#define IPC_I2C_CNTRL_ADDR	0
 88#define I2C_DATA_ADDR		0x04
 89
 90static DEFINE_MUTEX(ipclock); /* lock used to prevent multiple call to SCU */
 91
 92/*
 
 93 * Command Register (Write Only):
 94 * A write to this register results in an interrupt to the SCU core processor
 95 * Format:
 96 * |rfu2(8) | size(8) | command id(4) | rfu1(3) | ioc(1) | command(8)|
 97 */
 98static inline void ipc_command(u32 cmd) /* Send ipc command */
 99{
100	writel(cmd, ipcdev.ipc_base);
 
 
 
 
101}
102
103/*
 
104 * IPC Write Buffer (Write Only):
105 * 16-byte buffer for sending data associated with IPC command to
106 * SCU. Size of the data is specified in the IPC_COMMAND_REG register
107 */
108static inline void ipc_data_writel(u32 data, u32 offset) /* Write ipc data */
109{
110	writel(data, ipcdev.ipc_base + 0x80 + offset);
111}
112
113/*
114 * Status Register (Read Only):
115 * Driver will read this register to get the ready/busy status of the IPC
116 * block and error status of the IPC command that was just processed by SCU
117 * Format:
118 * |rfu3(8)|error code(8)|initiator id(8)|cmd id(4)|rfu1(2)|error(1)|busy(1)|
119 */
 
 
 
 
120
121static inline u8 ipc_read_status(void)
 
122{
123	return __raw_readl(ipcdev.ipc_base + 0x04);
124}
125
126static inline u8 ipc_data_readb(u32 offset) /* Read ipc byte data */
 
127{
128	return readb(ipcdev.ipc_base + IPC_READ_BUFFER + offset);
129}
130
131static inline u32 ipc_data_readl(u32 offset) /* Read ipc u32 data */
 
132{
133	return readl(ipcdev.ipc_base + IPC_READ_BUFFER + offset);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
134}
135
136static inline int busy_loop(void) /* Wait till scu status is busy */
 
137{
138	u32 status = 0;
139	u32 loop_count = 0;
140
141	status = ipc_read_status();
142	while (status & 1) {
143		udelay(1); /* scu processing time is in few u secods */
144		status = ipc_read_status();
145		loop_count++;
146		/* break if scu doesn't reset busy bit after huge retry */
147		if (loop_count > 100000) {
148			dev_err(&ipcdev.pdev->dev, "IPC timed out");
149			return -ETIMEDOUT;
150		}
151	}
152	if ((status >> 1) & 1)
 
 
153		return -EIO;
154
155	return 0;
156}
157
 
 
 
 
 
158/* Read/Write power control(PMIC in Langwell, MSIC in PenWell) registers */
159static int pwr_reg_rdwr(u16 *addr, u8 *data, u32 count, u32 op, u32 id)
160{
161	int i, nc, bytes, d;
 
162	u32 offset = 0;
163	int err;
164	u8 cbuf[IPC_WWBUF_SIZE] = { };
165	u32 *wbuf = (u32 *)&cbuf;
166
 
 
167	mutex_lock(&ipclock);
168
169	memset(cbuf, 0, sizeof(cbuf));
170
171	if (ipcdev.pdev == NULL) {
172		mutex_unlock(&ipclock);
173		return -ENODEV;
174	}
175
176	if (platform != MRST_CPU_CHIP_PENWELL) {
177		bytes = 0;
178		d = 0;
179		for (i = 0; i < count; i++) {
180			cbuf[bytes++] = addr[i];
181			cbuf[bytes++] = addr[i] >> 8;
182			if (id != IPC_CMD_PCNTRL_R)
183				cbuf[bytes++] = data[d++];
184			if (id == IPC_CMD_PCNTRL_M)
185				cbuf[bytes++] = data[d++];
186		}
187		for (i = 0; i < bytes; i += 4)
188			ipc_data_writel(wbuf[i/4], i);
189		ipc_command(bytes << 16 |  id << 12 | 0 << 8 | op);
190	} else {
191		for (nc = 0; nc < count; nc++, offset += 2) {
192			cbuf[offset] = addr[nc];
193			cbuf[offset + 1] = addr[nc] >> 8;
194		}
195
196		if (id == IPC_CMD_PCNTRL_R) {
197			for (nc = 0, offset = 0; nc < count; nc++, offset += 4)
198				ipc_data_writel(wbuf[nc], offset);
199			ipc_command((count*2) << 16 |  id << 12 | 0 << 8 | op);
200		} else if (id == IPC_CMD_PCNTRL_W) {
201			for (nc = 0; nc < count; nc++, offset += 1)
202				cbuf[offset] = data[nc];
203			for (nc = 0, offset = 0; nc < count; nc++, offset += 4)
204				ipc_data_writel(wbuf[nc], offset);
205			ipc_command((count*3) << 16 |  id << 12 | 0 << 8 | op);
206		} else if (id == IPC_CMD_PCNTRL_M) {
207			cbuf[offset] = data[0];
208			cbuf[offset + 1] = data[1];
209			ipc_data_writel(wbuf[0], 0); /* Write wbuff */
210			ipc_command(4 << 16 |  id << 12 | 0 << 8 | op);
211		}
212	}
213
214	err = busy_loop();
215	if (id == IPC_CMD_PCNTRL_R) { /* Read rbuf */
216		/* Workaround: values are read as 0 without memcpy_fromio */
217		memcpy_fromio(cbuf, ipcdev.ipc_base + 0x90, 16);
218		if (platform != MRST_CPU_CHIP_PENWELL) {
219			for (nc = 0, offset = 2; nc < count; nc++, offset += 3)
220				data[nc] = ipc_data_readb(offset);
221		} else {
222			for (nc = 0; nc < count; nc++)
223				data[nc] = ipc_data_readb(nc);
224		}
225	}
226	mutex_unlock(&ipclock);
227	return err;
228}
229
230/**
231 *	intel_scu_ipc_ioread8		-	read a word via the SCU
232 *	@addr: register on SCU
233 *	@data: return pointer for read byte
234 *
235 *	Read a single register. Returns 0 on success or an error code. All
236 *	locking between SCU accesses is handled for the caller.
237 *
238 *	This function may sleep.
239 */
240int intel_scu_ipc_ioread8(u16 addr, u8 *data)
241{
242	return pwr_reg_rdwr(&addr, data, 1, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
243}
244EXPORT_SYMBOL(intel_scu_ipc_ioread8);
245
246/**
247 *	intel_scu_ipc_ioread16		-	read a word via the SCU
248 *	@addr: register on SCU
249 *	@data: return pointer for read word
250 *
251 *	Read a register pair. Returns 0 on success or an error code. All
252 *	locking between SCU accesses is handled for the caller.
253 *
254 *	This function may sleep.
255 */
256int intel_scu_ipc_ioread16(u16 addr, u16 *data)
257{
258	u16 x[2] = {addr, addr + 1 };
259	return pwr_reg_rdwr(x, (u8 *)data, 2, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
260}
261EXPORT_SYMBOL(intel_scu_ipc_ioread16);
262
263/**
264 *	intel_scu_ipc_ioread32		-	read a dword via the SCU
265 *	@addr: register on SCU
266 *	@data: return pointer for read dword
267 *
268 *	Read four registers. Returns 0 on success or an error code. All
269 *	locking between SCU accesses is handled for the caller.
270 *
271 *	This function may sleep.
272 */
273int intel_scu_ipc_ioread32(u16 addr, u32 *data)
274{
275	u16 x[4] = {addr, addr + 1, addr + 2, addr + 3};
276	return pwr_reg_rdwr(x, (u8 *)data, 4, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
277}
278EXPORT_SYMBOL(intel_scu_ipc_ioread32);
279
280/**
281 *	intel_scu_ipc_iowrite8		-	write a byte via the SCU
282 *	@addr: register on SCU
283 *	@data: byte to write
284 *
285 *	Write a single register. Returns 0 on success or an error code. All
286 *	locking between SCU accesses is handled for the caller.
287 *
288 *	This function may sleep.
289 */
290int intel_scu_ipc_iowrite8(u16 addr, u8 data)
291{
292	return pwr_reg_rdwr(&addr, &data, 1, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
293}
294EXPORT_SYMBOL(intel_scu_ipc_iowrite8);
295
296/**
297 *	intel_scu_ipc_iowrite16		-	write a word via the SCU
298 *	@addr: register on SCU
299 *	@data: word to write
300 *
301 *	Write two registers. Returns 0 on success or an error code. All
302 *	locking between SCU accesses is handled for the caller.
303 *
304 *	This function may sleep.
305 */
306int intel_scu_ipc_iowrite16(u16 addr, u16 data)
307{
308	u16 x[2] = {addr, addr + 1 };
309	return pwr_reg_rdwr(x, (u8 *)&data, 2, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
310}
311EXPORT_SYMBOL(intel_scu_ipc_iowrite16);
312
313/**
314 *	intel_scu_ipc_iowrite32		-	write a dword via the SCU
315 *	@addr: register on SCU
316 *	@data: dword to write
317 *
318 *	Write four registers. Returns 0 on success or an error code. All
319 *	locking between SCU accesses is handled for the caller.
320 *
321 *	This function may sleep.
322 */
323int intel_scu_ipc_iowrite32(u16 addr, u32 data)
324{
325	u16 x[4] = {addr, addr + 1, addr + 2, addr + 3};
326	return pwr_reg_rdwr(x, (u8 *)&data, 4, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
327}
328EXPORT_SYMBOL(intel_scu_ipc_iowrite32);
329
330/**
331 *	intel_scu_ipc_readvv		-	read a set of registers
332 *	@addr: register list
333 *	@data: bytes to return
334 *	@len: length of array
335 *
336 *	Read registers. Returns 0 on success or an error code. All
337 *	locking between SCU accesses is handled for the caller.
338 *
339 *	The largest array length permitted by the hardware is 5 items.
340 *
341 *	This function may sleep.
342 */
343int intel_scu_ipc_readv(u16 *addr, u8 *data, int len)
344{
345	return pwr_reg_rdwr(addr, data, len, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
346}
347EXPORT_SYMBOL(intel_scu_ipc_readv);
348
349/**
350 *	intel_scu_ipc_writev		-	write a set of registers
351 *	@addr: register list
352 *	@data: bytes to write
353 *	@len: length of array
354 *
355 *	Write registers. Returns 0 on success or an error code. All
356 *	locking between SCU accesses is handled for the caller.
357 *
358 *	The largest array length permitted by the hardware is 5 items.
359 *
360 *	This function may sleep.
361 *
362 */
363int intel_scu_ipc_writev(u16 *addr, u8 *data, int len)
364{
365	return pwr_reg_rdwr(addr, data, len, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
366}
367EXPORT_SYMBOL(intel_scu_ipc_writev);
368
369
370/**
371 *	intel_scu_ipc_update_register	-	r/m/w a register
372 *	@addr: register address
373 *	@bits: bits to update
374 *	@mask: mask of bits to update
375 *
376 *	Read-modify-write power control unit register. The first data argument
377 *	must be register value and second is mask value
378 *	mask is a bitmap that indicates which bits to update.
379 *	0 = masked. Don't modify this bit, 1 = modify this bit.
380 *	returns 0 on success or an error code.
381 *
382 *	This function may sleep. Locking between SCU accesses is handled
383 *	for the caller.
384 */
385int intel_scu_ipc_update_register(u16 addr, u8 bits, u8 mask)
386{
387	u8 data[2] = { bits, mask };
388	return pwr_reg_rdwr(&addr, data, 1, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_M);
389}
390EXPORT_SYMBOL(intel_scu_ipc_update_register);
391
392/**
393 *	intel_scu_ipc_simple_command	-	send a simple command
394 *	@cmd: command
395 *	@sub: sub type
396 *
397 *	Issue a simple command to the SCU. Do not use this interface if
398 *	you must then access data as any data values may be overwritten
399 *	by another SCU access by the time this function returns.
400 *
401 *	This function may sleep. Locking for SCU accesses is handled for
402 *	the caller.
403 */
404int intel_scu_ipc_simple_command(int cmd, int sub)
405{
 
406	int err;
407
408	mutex_lock(&ipclock);
409	if (ipcdev.pdev == NULL) {
410		mutex_unlock(&ipclock);
411		return -ENODEV;
412	}
413	ipc_command(sub << 12 | cmd);
414	err = busy_loop();
415	mutex_unlock(&ipclock);
416	return err;
417}
418EXPORT_SYMBOL(intel_scu_ipc_simple_command);
419
420/**
421 *	intel_scu_ipc_command	-	command with data
422 *	@cmd: command
423 *	@sub: sub type
424 *	@in: input data
425 *	@inlen: input length in dwords
426 *	@out: output data
427 *	@outlein: output length in dwords
428 *
429 *	Issue a command to the SCU which involves data transfers. Do the
430 *	data copies under the lock but leave it for the caller to interpret
431 */
432
433int intel_scu_ipc_command(int cmd, int sub, u32 *in, int inlen,
434							u32 *out, int outlen)
435{
 
436	int i, err;
437
438	mutex_lock(&ipclock);
439	if (ipcdev.pdev == NULL) {
440		mutex_unlock(&ipclock);
441		return -ENODEV;
442	}
443
444	for (i = 0; i < inlen; i++)
445		ipc_data_writel(*in++, 4 * i);
446
447	ipc_command((inlen << 16) | (sub << 12) | cmd);
448	err = busy_loop();
449
450	for (i = 0; i < outlen; i++)
451		*out++ = ipc_data_readl(4 * i);
 
 
452
453	mutex_unlock(&ipclock);
454	return err;
455}
456EXPORT_SYMBOL(intel_scu_ipc_command);
457
458/*I2C commands */
459#define IPC_I2C_WRITE 1 /* I2C Write command */
460#define IPC_I2C_READ  2 /* I2C Read command */
461
462/**
463 *	intel_scu_ipc_i2c_cntrl		-	I2C read/write operations
464 *	@addr: I2C address + command bits
465 *	@data: data to read/write
466 *
467 *	Perform an an I2C read/write operation via the SCU. All locking is
468 *	handled for the caller. This function may sleep.
469 *
470 *	Returns an error code or 0 on success.
471 *
472 *	This has to be in the IPC driver for the locking.
473 */
474int intel_scu_ipc_i2c_cntrl(u32 addr, u32 *data)
475{
 
476	u32 cmd = 0;
477
478	mutex_lock(&ipclock);
479	if (ipcdev.pdev == NULL) {
480		mutex_unlock(&ipclock);
481		return -ENODEV;
482	}
483	cmd = (addr >> 24) & 0xFF;
484	if (cmd == IPC_I2C_READ) {
485		writel(addr, ipcdev.i2c_base + IPC_I2C_CNTRL_ADDR);
486		/* Write not getting updated without delay */
487		mdelay(1);
488		*data = readl(ipcdev.i2c_base + I2C_DATA_ADDR);
489	} else if (cmd == IPC_I2C_WRITE) {
490		writel(*data, ipcdev.i2c_base + I2C_DATA_ADDR);
491		mdelay(1);
492		writel(addr, ipcdev.i2c_base + IPC_I2C_CNTRL_ADDR);
493	} else {
494		dev_err(&ipcdev.pdev->dev,
495			"intel_scu_ipc: I2C INVALID_CMD = 0x%x\n", cmd);
496
497		mutex_unlock(&ipclock);
498		return -EIO;
499	}
500	mutex_unlock(&ipclock);
501	return 0;
502}
503EXPORT_SYMBOL(intel_scu_ipc_i2c_cntrl);
504
505#define IPC_FW_LOAD_ADDR 0xFFFC0000 /* Storage location for FW image */
506#define IPC_FW_UPDATE_MBOX_ADDR 0xFFFFDFF4 /* Mailbox between ipc and scu */
507#define IPC_MAX_FW_SIZE 262144 /* 256K storage size for loading the FW image */
508#define IPC_FW_MIP_HEADER_SIZE 2048 /* Firmware MIP header size */
509/* IPC inform SCU to get ready for update process */
510#define IPC_CMD_FW_UPDATE_READY  0x10FE
511/* IPC inform SCU to go for update process */
512#define IPC_CMD_FW_UPDATE_GO     0x20FE
513/* Status code for fw update */
514#define IPC_FW_UPDATE_SUCCESS	0x444f4e45 /* Status code 'DONE' */
515#define IPC_FW_UPDATE_BADN	0x4241444E /* Status code 'BADN' */
516#define IPC_FW_TXHIGH		0x54784849 /* Status code 'IPC_FW_TXHIGH' */
517#define IPC_FW_TXLOW		0x54784c4f /* Status code 'IPC_FW_TXLOW' */
518
519struct fw_update_mailbox {
520	u32    status;
521	u32    scu_flag;
522	u32    driver_flag;
523};
524
525
526/**
527 *	intel_scu_ipc_fw_update	-	 Firmware update utility
528 *	@buffer: firmware buffer
529 *	@length: size of firmware buffer
530 *
531 *	This function provides an interface to load the firmware into
532 *	the SCU. Returns 0 on success or -1 on failure
533 */
534int intel_scu_ipc_fw_update(u8 *buffer, u32 length)
535{
536	void __iomem *fw_update_base;
537	struct fw_update_mailbox __iomem *mailbox = NULL;
538	int retry_cnt = 0;
539	u32 status;
540
541	mutex_lock(&ipclock);
542	fw_update_base = ioremap_nocache(IPC_FW_LOAD_ADDR, (128*1024));
543	if (fw_update_base == NULL) {
544		mutex_unlock(&ipclock);
545		return -ENOMEM;
546	}
547	mailbox = ioremap_nocache(IPC_FW_UPDATE_MBOX_ADDR,
548					sizeof(struct fw_update_mailbox));
549	if (mailbox == NULL) {
550		iounmap(fw_update_base);
551		mutex_unlock(&ipclock);
552		return -ENOMEM;
553	}
554
555	ipc_command(IPC_CMD_FW_UPDATE_READY);
556
557	/* Intitialize mailbox */
558	writel(0, &mailbox->status);
559	writel(0, &mailbox->scu_flag);
560	writel(0, &mailbox->driver_flag);
561
562	/* Driver copies the 2KB MIP header to SRAM at 0xFFFC0000*/
563	memcpy_toio(fw_update_base, buffer, 0x800);
564
565	/* Driver sends "FW Update" IPC command (CMD_ID 0xFE; MSG_ID 0x02).
566	* Upon receiving this command, SCU will write the 2K MIP header
567	* from 0xFFFC0000 into NAND.
568	* SCU will write a status code into the Mailbox, and then set scu_flag.
569	*/
570
571	ipc_command(IPC_CMD_FW_UPDATE_GO);
572
573	/*Driver stalls until scu_flag is set */
574	while (readl(&mailbox->scu_flag) != 1) {
575		rmb();
576		mdelay(1);
577	}
578
579	/* Driver checks Mailbox status.
580	 * If the status is 'BADN', then abort (bad NAND).
581	 * If the status is 'IPC_FW_TXLOW', then continue.
582	 */
583	while (readl(&mailbox->status) != IPC_FW_TXLOW) {
584		rmb();
585		mdelay(10);
586	}
587	mdelay(10);
588
589update_retry:
590	if (retry_cnt > 5)
591		goto update_end;
592
593	if (readl(&mailbox->status) != IPC_FW_TXLOW)
594		goto update_end;
595	buffer = buffer + 0x800;
596	memcpy_toio(fw_update_base, buffer, 0x20000);
597	writel(1, &mailbox->driver_flag);
598	while (readl(&mailbox->scu_flag) == 1) {
599		rmb();
600		mdelay(1);
601	}
602
603	/* check for 'BADN' */
604	if (readl(&mailbox->status) == IPC_FW_UPDATE_BADN)
605		goto update_end;
606
607	while (readl(&mailbox->status) != IPC_FW_TXHIGH) {
608		rmb();
609		mdelay(10);
610	}
611	mdelay(10);
612
613	if (readl(&mailbox->status) != IPC_FW_TXHIGH)
614		goto update_end;
615
616	buffer = buffer + 0x20000;
617	memcpy_toio(fw_update_base, buffer, 0x20000);
618	writel(0, &mailbox->driver_flag);
619
620	while (mailbox->scu_flag == 0) {
621		rmb();
622		mdelay(1);
623	}
624
625	/* check for 'BADN' */
626	if (readl(&mailbox->status) == IPC_FW_UPDATE_BADN)
627		goto update_end;
628
629	if (readl(&mailbox->status) == IPC_FW_TXLOW) {
630		++retry_cnt;
631		goto update_retry;
632	}
633
634update_end:
635	status = readl(&mailbox->status);
636
637	iounmap(fw_update_base);
638	iounmap(mailbox);
639	mutex_unlock(&ipclock);
640
641	if (status == IPC_FW_UPDATE_SUCCESS)
642		return 0;
643	return -EIO;
644}
645EXPORT_SYMBOL(intel_scu_ipc_fw_update);
646
647/*
648 * Interrupt handler gets called when ioc bit of IPC_COMMAND_REG set to 1
649 * When ioc bit is set to 1, caller api must wait for interrupt handler called
650 * which in turn unlocks the caller api. Currently this is not used
651 *
652 * This is edge triggered so we need take no action to clear anything
653 */
654static irqreturn_t ioc(int irq, void *dev_id)
655{
 
 
 
 
 
656	return IRQ_HANDLED;
657}
658
659/**
660 *	ipc_probe	-	probe an Intel SCU IPC
661 *	@dev: the PCI device matching
662 *	@id: entry in the match table
663 *
664 *	Enable and install an intel SCU IPC. This appears in the PCI space
665 *	but uses some hard coded addresses as well.
666 */
667static int ipc_probe(struct pci_dev *dev, const struct pci_device_id *id)
668{
 
669	int err;
670	resource_size_t pci_resource;
 
671
672	if (ipcdev.pdev)		/* We support only one SCU */
 
 
 
 
673		return -EBUSY;
674
675	ipcdev.pdev = pci_dev_get(dev);
 
 
 
676
677	err = pci_enable_device(dev);
678	if (err)
679		return err;
680
681	err = pci_request_regions(dev, "intel_scu_ipc");
682	if (err)
683		return err;
684
685	pci_resource = pci_resource_start(dev, 0);
686	if (!pci_resource)
687		return -ENOMEM;
688
689	if (request_irq(dev->irq, ioc, 0, "intel_scu_ipc", &ipcdev))
690		return -EBUSY;
 
 
691
692	ipcdev.ipc_base = ioremap_nocache(IPC_BASE_ADDR, IPC_MAX_ADDR);
693	if (!ipcdev.ipc_base)
694		return -ENOMEM;
695
696	ipcdev.i2c_base = ioremap_nocache(IPC_I2C_BASE, IPC_I2C_MAX_ADDR);
697	if (!ipcdev.i2c_base) {
698		iounmap(ipcdev.ipc_base);
699		return -ENOMEM;
700	}
701
702	intel_scu_devices_create();
703
 
704	return 0;
705}
706
707/**
708 *	ipc_remove	-	remove a bound IPC device
709 *	@pdev: PCI device
710 *
711 *	In practice the SCU is not removable but this function is also
712 *	called for each device on a module unload or cleanup which is the
713 *	path that will get used.
714 *
715 *	Free up the mappings and release the PCI resources
716 */
717static void ipc_remove(struct pci_dev *pdev)
718{
719	free_irq(pdev->irq, &ipcdev);
720	pci_release_regions(pdev);
721	pci_dev_put(ipcdev.pdev);
722	iounmap(ipcdev.ipc_base);
723	iounmap(ipcdev.i2c_base);
724	ipcdev.pdev = NULL;
725	intel_scu_devices_destroy();
726}
727
728static DEFINE_PCI_DEVICE_TABLE(pci_ids) = {
729	{PCI_DEVICE(PCI_VENDOR_ID_INTEL, 0x080e)},
730	{PCI_DEVICE(PCI_VENDOR_ID_INTEL, 0x082a)},
731	{ 0,}
732};
733MODULE_DEVICE_TABLE(pci, pci_ids);
734
735static struct pci_driver ipc_driver = {
 
 
 
736	.name = "intel_scu_ipc",
737	.id_table = pci_ids,
738	.probe = ipc_probe,
739	.remove = ipc_remove,
740};
741
742
743static int __init intel_scu_ipc_init(void)
744{
745	platform = mrst_identify_cpu();
746	if (platform == 0)
747		return -ENODEV;
748	return  pci_register_driver(&ipc_driver);
749}
750
751static void __exit intel_scu_ipc_exit(void)
752{
753	pci_unregister_driver(&ipc_driver);
754}
755
756MODULE_AUTHOR("Sreedhara DS <sreedhara.ds@intel.com>");
757MODULE_DESCRIPTION("Intel SCU IPC driver");
758MODULE_LICENSE("GPL");
759
760module_init(intel_scu_ipc_init);
761module_exit(intel_scu_ipc_exit);