1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
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 <linux/module.h>
28#include <asm/mrst.h>
29#include <asm/intel_scu_ipc.h>
30
31
32#define IPCMSG_WATCHDOG_TIMER 0xF8
33#define IPCMSG_BATTERY 0xEF
34#define IPCMSG_FW_UPDATE 0xFE
35#define IPCMSG_PCNTRL 0xFF
36#define IPCMSG_FW_REVISION 0xF4
37
38
39#define IPC_CMD_PCNTRL_W 0
40#define IPC_CMD_PCNTRL_R 1
41#define IPC_CMD_PCNTRL_M 2
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61#define IPC_BASE_ADDR 0xFF11C000
62#define IPC_MAX_ADDR 0x100
63#define IPC_WWBUF_SIZE 20
64#define IPC_RWBUF_SIZE 20
65#define IPC_I2C_BASE 0xFF12B000
66#define IPC_I2C_MAX_ADDR 0x10
67
68static int ipc_probe(struct pci_dev *dev, const struct pci_device_id *id);
69static void ipc_remove(struct pci_dev *pdev);
70
71struct intel_scu_ipc_dev {
72 struct pci_dev *pdev;
73 void __iomem *ipc_base;
74 void __iomem *i2c_base;
75};
76
77static struct intel_scu_ipc_dev ipcdev;
78
79static int platform;
80
81
82
83
84
85
86#define IPC_READ_BUFFER 0x90
87
88#define IPC_I2C_CNTRL_ADDR 0
89#define I2C_DATA_ADDR 0x04
90
91static DEFINE_MUTEX(ipclock);
92
93
94
95
96
97
98
99static inline void ipc_command(u32 cmd)
100{
101 writel(cmd, ipcdev.ipc_base);
102}
103
104
105
106
107
108
109static inline void ipc_data_writel(u32 data, u32 offset)
110{
111 writel(data, ipcdev.ipc_base + 0x80 + offset);
112}
113
114
115
116
117
118
119
120
121
122static inline u8 ipc_read_status(void)
123{
124 return __raw_readl(ipcdev.ipc_base + 0x04);
125}
126
127static inline u8 ipc_data_readb(u32 offset)
128{
129 return readb(ipcdev.ipc_base + IPC_READ_BUFFER + offset);
130}
131
132static inline u32 ipc_data_readl(u32 offset)
133{
134 return readl(ipcdev.ipc_base + IPC_READ_BUFFER + offset);
135}
136
137static inline int busy_loop(void)
138{
139 u32 status = 0;
140 u32 loop_count = 0;
141
142 status = ipc_read_status();
143 while (status & 1) {
144 udelay(1);
145 status = ipc_read_status();
146 loop_count++;
147
148 if (loop_count > 100000) {
149 dev_err(&ipcdev.pdev->dev, "IPC timed out");
150 return -ETIMEDOUT;
151 }
152 }
153 if ((status >> 1) & 1)
154 return -EIO;
155
156 return 0;
157}
158
159
160static int pwr_reg_rdwr(u16 *addr, u8 *data, u32 count, u32 op, u32 id)
161{
162 int i, nc, bytes, d;
163 u32 offset = 0;
164 int err;
165 u8 cbuf[IPC_WWBUF_SIZE] = { };
166 u32 *wbuf = (u32 *)&cbuf;
167
168 mutex_lock(&ipclock);
169
170 memset(cbuf, 0, sizeof(cbuf));
171
172 if (ipcdev.pdev == NULL) {
173 mutex_unlock(&ipclock);
174 return -ENODEV;
175 }
176
177 if (platform != MRST_CPU_CHIP_PENWELL) {
178 bytes = 0;
179 d = 0;
180 for (i = 0; i < count; i++) {
181 cbuf[bytes++] = addr[i];
182 cbuf[bytes++] = addr[i] >> 8;
183 if (id != IPC_CMD_PCNTRL_R)
184 cbuf[bytes++] = data[d++];
185 if (id == IPC_CMD_PCNTRL_M)
186 cbuf[bytes++] = data[d++];
187 }
188 for (i = 0; i < bytes; i += 4)
189 ipc_data_writel(wbuf[i/4], i);
190 ipc_command(bytes << 16 | id << 12 | 0 << 8 | op);
191 } else {
192 for (nc = 0; nc < count; nc++, offset += 2) {
193 cbuf[offset] = addr[nc];
194 cbuf[offset + 1] = addr[nc] >> 8;
195 }
196
197 if (id == IPC_CMD_PCNTRL_R) {
198 for (nc = 0, offset = 0; nc < count; nc++, offset += 4)
199 ipc_data_writel(wbuf[nc], offset);
200 ipc_command((count*2) << 16 | id << 12 | 0 << 8 | op);
201 } else if (id == IPC_CMD_PCNTRL_W) {
202 for (nc = 0; nc < count; nc++, offset += 1)
203 cbuf[offset] = data[nc];
204 for (nc = 0, offset = 0; nc < count; nc++, offset += 4)
205 ipc_data_writel(wbuf[nc], offset);
206 ipc_command((count*3) << 16 | id << 12 | 0 << 8 | op);
207 } else if (id == IPC_CMD_PCNTRL_M) {
208 cbuf[offset] = data[0];
209 cbuf[offset + 1] = data[1];
210 ipc_data_writel(wbuf[0], 0);
211 ipc_command(4 << 16 | id << 12 | 0 << 8 | op);
212 }
213 }
214
215 err = busy_loop();
216 if (id == IPC_CMD_PCNTRL_R) {
217
218 memcpy_fromio(cbuf, ipcdev.ipc_base + 0x90, 16);
219 if (platform != MRST_CPU_CHIP_PENWELL) {
220 for (nc = 0, offset = 2; nc < count; nc++, offset += 3)
221 data[nc] = ipc_data_readb(offset);
222 } else {
223 for (nc = 0; nc < count; nc++)
224 data[nc] = ipc_data_readb(nc);
225 }
226 }
227 mutex_unlock(&ipclock);
228 return err;
229}
230
231
232
233
234
235
236
237
238
239
240
241int intel_scu_ipc_ioread8(u16 addr, u8 *data)
242{
243 return pwr_reg_rdwr(&addr, data, 1, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
244}
245EXPORT_SYMBOL(intel_scu_ipc_ioread8);
246
247
248
249
250
251
252
253
254
255
256
257int intel_scu_ipc_ioread16(u16 addr, u16 *data)
258{
259 u16 x[2] = {addr, addr + 1 };
260 return pwr_reg_rdwr(x, (u8 *)data, 2, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
261}
262EXPORT_SYMBOL(intel_scu_ipc_ioread16);
263
264
265
266
267
268
269
270
271
272
273
274int intel_scu_ipc_ioread32(u16 addr, u32 *data)
275{
276 u16 x[4] = {addr, addr + 1, addr + 2, addr + 3};
277 return pwr_reg_rdwr(x, (u8 *)data, 4, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
278}
279EXPORT_SYMBOL(intel_scu_ipc_ioread32);
280
281
282
283
284
285
286
287
288
289
290
291int intel_scu_ipc_iowrite8(u16 addr, u8 data)
292{
293 return pwr_reg_rdwr(&addr, &data, 1, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
294}
295EXPORT_SYMBOL(intel_scu_ipc_iowrite8);
296
297
298
299
300
301
302
303
304
305
306
307int intel_scu_ipc_iowrite16(u16 addr, u16 data)
308{
309 u16 x[2] = {addr, addr + 1 };
310 return pwr_reg_rdwr(x, (u8 *)&data, 2, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
311}
312EXPORT_SYMBOL(intel_scu_ipc_iowrite16);
313
314
315
316
317
318
319
320
321
322
323
324int intel_scu_ipc_iowrite32(u16 addr, u32 data)
325{
326 u16 x[4] = {addr, addr + 1, addr + 2, addr + 3};
327 return pwr_reg_rdwr(x, (u8 *)&data, 4, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
328}
329EXPORT_SYMBOL(intel_scu_ipc_iowrite32);
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344int intel_scu_ipc_readv(u16 *addr, u8 *data, int len)
345{
346 return pwr_reg_rdwr(addr, data, len, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_R);
347}
348EXPORT_SYMBOL(intel_scu_ipc_readv);
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364int intel_scu_ipc_writev(u16 *addr, u8 *data, int len)
365{
366 return pwr_reg_rdwr(addr, data, len, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_W);
367}
368EXPORT_SYMBOL(intel_scu_ipc_writev);
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386int intel_scu_ipc_update_register(u16 addr, u8 bits, u8 mask)
387{
388 u8 data[2] = { bits, mask };
389 return pwr_reg_rdwr(&addr, data, 1, IPCMSG_PCNTRL, IPC_CMD_PCNTRL_M);
390}
391EXPORT_SYMBOL(intel_scu_ipc_update_register);
392
393
394
395
396
397
398
399
400
401
402
403
404
405int intel_scu_ipc_simple_command(int cmd, int sub)
406{
407 int err;
408
409 mutex_lock(&ipclock);
410 if (ipcdev.pdev == NULL) {
411 mutex_unlock(&ipclock);
412 return -ENODEV;
413 }
414 ipc_command(sub << 12 | cmd);
415 err = busy_loop();
416 mutex_unlock(&ipclock);
417 return err;
418}
419EXPORT_SYMBOL(intel_scu_ipc_simple_command);
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434int intel_scu_ipc_command(int cmd, int sub, u32 *in, int inlen,
435 u32 *out, int outlen)
436{
437 int i, err;
438
439 mutex_lock(&ipclock);
440 if (ipcdev.pdev == NULL) {
441 mutex_unlock(&ipclock);
442 return -ENODEV;
443 }
444
445 for (i = 0; i < inlen; i++)
446 ipc_data_writel(*in++, 4 * i);
447
448 ipc_command((inlen << 16) | (sub << 12) | cmd);
449 err = busy_loop();
450
451 for (i = 0; i < outlen; i++)
452 *out++ = ipc_data_readl(4 * i);
453
454 mutex_unlock(&ipclock);
455 return err;
456}
457EXPORT_SYMBOL(intel_scu_ipc_command);
458
459
460#define IPC_I2C_WRITE 1
461#define IPC_I2C_READ 2
462
463
464
465
466
467
468
469
470
471
472
473
474
475int intel_scu_ipc_i2c_cntrl(u32 addr, u32 *data)
476{
477 u32 cmd = 0;
478
479 mutex_lock(&ipclock);
480 if (ipcdev.pdev == NULL) {
481 mutex_unlock(&ipclock);
482 return -ENODEV;
483 }
484 cmd = (addr >> 24) & 0xFF;
485 if (cmd == IPC_I2C_READ) {
486 writel(addr, ipcdev.i2c_base + IPC_I2C_CNTRL_ADDR);
487
488 mdelay(1);
489 *data = readl(ipcdev.i2c_base + I2C_DATA_ADDR);
490 } else if (cmd == IPC_I2C_WRITE) {
491 writel(*data, ipcdev.i2c_base + I2C_DATA_ADDR);
492 mdelay(1);
493 writel(addr, ipcdev.i2c_base + IPC_I2C_CNTRL_ADDR);
494 } else {
495 dev_err(&ipcdev.pdev->dev,
496 "intel_scu_ipc: I2C INVALID_CMD = 0x%x\n", cmd);
497
498 mutex_unlock(&ipclock);
499 return -EIO;
500 }
501 mutex_unlock(&ipclock);
502 return 0;
503}
504EXPORT_SYMBOL(intel_scu_ipc_i2c_cntrl);
505
506#define IPC_FW_LOAD_ADDR 0xFFFC0000
507#define IPC_FW_UPDATE_MBOX_ADDR 0xFFFFDFF4
508#define IPC_MAX_FW_SIZE 262144
509#define IPC_FW_MIP_HEADER_SIZE 2048
510
511#define IPC_CMD_FW_UPDATE_READY 0x10FE
512
513#define IPC_CMD_FW_UPDATE_GO 0x20FE
514
515#define IPC_FW_UPDATE_SUCCESS 0x444f4e45
516#define IPC_FW_UPDATE_BADN 0x4241444E
517#define IPC_FW_TXHIGH 0x54784849
518#define IPC_FW_TXLOW 0x54784c4f
519
520struct fw_update_mailbox {
521 u32 status;
522 u32 scu_flag;
523 u32 driver_flag;
524};
525
526
527
528
529
530
531
532
533
534
535int intel_scu_ipc_fw_update(u8 *buffer, u32 length)
536{
537 void __iomem *fw_update_base;
538 struct fw_update_mailbox __iomem *mailbox = NULL;
539 int retry_cnt = 0;
540 u32 status;
541
542 mutex_lock(&ipclock);
543 fw_update_base = ioremap_nocache(IPC_FW_LOAD_ADDR, (128*1024));
544 if (fw_update_base == NULL) {
545 mutex_unlock(&ipclock);
546 return -ENOMEM;
547 }
548 mailbox = ioremap_nocache(IPC_FW_UPDATE_MBOX_ADDR,
549 sizeof(struct fw_update_mailbox));
550 if (mailbox == NULL) {
551 iounmap(fw_update_base);
552 mutex_unlock(&ipclock);
553 return -ENOMEM;
554 }
555
556 ipc_command(IPC_CMD_FW_UPDATE_READY);
557
558
559 writel(0, &mailbox->status);
560 writel(0, &mailbox->scu_flag);
561 writel(0, &mailbox->driver_flag);
562
563
564 memcpy_toio(fw_update_base, buffer, 0x800);
565
566
567
568
569
570
571
572 ipc_command(IPC_CMD_FW_UPDATE_GO);
573
574
575 while (readl(&mailbox->scu_flag) != 1) {
576 rmb();
577 mdelay(1);
578 }
579
580
581
582
583
584 while (readl(&mailbox->status) != IPC_FW_TXLOW) {
585 rmb();
586 mdelay(10);
587 }
588 mdelay(10);
589
590update_retry:
591 if (retry_cnt > 5)
592 goto update_end;
593
594 if (readl(&mailbox->status) != IPC_FW_TXLOW)
595 goto update_end;
596 buffer = buffer + 0x800;
597 memcpy_toio(fw_update_base, buffer, 0x20000);
598 writel(1, &mailbox->driver_flag);
599 while (readl(&mailbox->scu_flag) == 1) {
600 rmb();
601 mdelay(1);
602 }
603
604
605 if (readl(&mailbox->status) == IPC_FW_UPDATE_BADN)
606 goto update_end;
607
608 while (readl(&mailbox->status) != IPC_FW_TXHIGH) {
609 rmb();
610 mdelay(10);
611 }
612 mdelay(10);
613
614 if (readl(&mailbox->status) != IPC_FW_TXHIGH)
615 goto update_end;
616
617 buffer = buffer + 0x20000;
618 memcpy_toio(fw_update_base, buffer, 0x20000);
619 writel(0, &mailbox->driver_flag);
620
621 while (mailbox->scu_flag == 0) {
622 rmb();
623 mdelay(1);
624 }
625
626
627 if (readl(&mailbox->status) == IPC_FW_UPDATE_BADN)
628 goto update_end;
629
630 if (readl(&mailbox->status) == IPC_FW_TXLOW) {
631 ++retry_cnt;
632 goto update_retry;
633 }
634
635update_end:
636 status = readl(&mailbox->status);
637
638 iounmap(fw_update_base);
639 iounmap(mailbox);
640 mutex_unlock(&ipclock);
641
642 if (status == IPC_FW_UPDATE_SUCCESS)
643 return 0;
644 return -EIO;
645}
646EXPORT_SYMBOL(intel_scu_ipc_fw_update);
647
648
649
650
651
652
653
654
655static irqreturn_t ioc(int irq, void *dev_id)
656{
657 return IRQ_HANDLED;
658}
659
660
661
662
663
664
665
666
667
668static int ipc_probe(struct pci_dev *dev, const struct pci_device_id *id)
669{
670 int err;
671 resource_size_t pci_resource;
672
673 if (ipcdev.pdev)
674 return -EBUSY;
675
676 ipcdev.pdev = pci_dev_get(dev);
677
678 err = pci_enable_device(dev);
679 if (err)
680 return err;
681
682 err = pci_request_regions(dev, "intel_scu_ipc");
683 if (err)
684 return err;
685
686 pci_resource = pci_resource_start(dev, 0);
687 if (!pci_resource)
688 return -ENOMEM;
689
690 if (request_irq(dev->irq, ioc, 0, "intel_scu_ipc", &ipcdev))
691 return -EBUSY;
692
693 ipcdev.ipc_base = ioremap_nocache(IPC_BASE_ADDR, IPC_MAX_ADDR);
694 if (!ipcdev.ipc_base)
695 return -ENOMEM;
696
697 ipcdev.i2c_base = ioremap_nocache(IPC_I2C_BASE, IPC_I2C_MAX_ADDR);
698 if (!ipcdev.i2c_base) {
699 iounmap(ipcdev.ipc_base);
700 return -ENOMEM;
701 }
702
703 intel_scu_devices_create();
704
705 return 0;
706}
707
708
709
710
711
712
713
714
715
716
717
718static void ipc_remove(struct pci_dev *pdev)
719{
720 free_irq(pdev->irq, &ipcdev);
721 pci_release_regions(pdev);
722 pci_dev_put(ipcdev.pdev);
723 iounmap(ipcdev.ipc_base);
724 iounmap(ipcdev.i2c_base);
725 ipcdev.pdev = NULL;
726 intel_scu_devices_destroy();
727}
728
729static DEFINE_PCI_DEVICE_TABLE(pci_ids) = {
730 {PCI_DEVICE(PCI_VENDOR_ID_INTEL, 0x080e)},
731 {PCI_DEVICE(PCI_VENDOR_ID_INTEL, 0x082a)},
732 { 0,}
733};
734MODULE_DEVICE_TABLE(pci, pci_ids);
735
736static struct pci_driver ipc_driver = {
737 .name = "intel_scu_ipc",
738 .id_table = pci_ids,
739 .probe = ipc_probe,
740 .remove = ipc_remove,
741};
742
743
744static int __init intel_scu_ipc_init(void)
745{
746 platform = mrst_identify_cpu();
747 if (platform == 0)
748 return -ENODEV;
749 return pci_register_driver(&ipc_driver);
750}
751
752static void __exit intel_scu_ipc_exit(void)
753{
754 pci_unregister_driver(&ipc_driver);
755}
756
757MODULE_AUTHOR("Sreedhara DS <sreedhara.ds@intel.com>");
758MODULE_DESCRIPTION("Intel SCU IPC driver");
759MODULE_LICENSE("GPL");
760
761module_init(intel_scu_ipc_init);
762module_exit(intel_scu_ipc_exit);
763