Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/jmorris...
[linux/fpc-iii.git] / drivers / ptp / ptp_pch.c
blob71a2559278d7a0d41bf773edcf5219f35462ddb1
1 /*
2 * PTP 1588 clock using the EG20T PCH
4 * Copyright (C) 2010 OMICRON electronics GmbH
5 * Copyright (C) 2011-2012 LAPIS SEMICONDUCTOR Co., LTD.
7 * This code was derived from the IXP46X driver.
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; version 2 of the License.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
23 #include <linux/device.h>
24 #include <linux/err.h>
25 #include <linux/init.h>
26 #include <linux/interrupt.h>
27 #include <linux/io.h>
28 #include <linux/irq.h>
29 #include <linux/kernel.h>
30 #include <linux/module.h>
31 #include <linux/pci.h>
32 #include <linux/ptp_clock_kernel.h>
33 #include <linux/slab.h>
35 #define STATION_ADDR_LEN 20
36 #define PCI_DEVICE_ID_PCH_1588 0x8819
37 #define IO_MEM_BAR 1
39 #define DEFAULT_ADDEND 0xA0000000
40 #define TICKS_NS_SHIFT 5
41 #define N_EXT_TS 2
43 enum pch_status {
44 PCH_SUCCESS,
45 PCH_INVALIDPARAM,
46 PCH_NOTIMESTAMP,
47 PCH_INTERRUPTMODEINUSE,
48 PCH_FAILED,
49 PCH_UNSUPPORTED,
51 /**
52 * struct pch_ts_regs - IEEE 1588 registers
54 struct pch_ts_regs {
55 u32 control;
56 u32 event;
57 u32 addend;
58 u32 accum;
59 u32 test;
60 u32 ts_compare;
61 u32 rsystime_lo;
62 u32 rsystime_hi;
63 u32 systime_lo;
64 u32 systime_hi;
65 u32 trgt_lo;
66 u32 trgt_hi;
67 u32 asms_lo;
68 u32 asms_hi;
69 u32 amms_lo;
70 u32 amms_hi;
71 u32 ch_control;
72 u32 ch_event;
73 u32 tx_snap_lo;
74 u32 tx_snap_hi;
75 u32 rx_snap_lo;
76 u32 rx_snap_hi;
77 u32 src_uuid_lo;
78 u32 src_uuid_hi;
79 u32 can_status;
80 u32 can_snap_lo;
81 u32 can_snap_hi;
82 u32 ts_sel;
83 u32 ts_st[6];
84 u32 reserve1[14];
85 u32 stl_max_set_en;
86 u32 stl_max_set;
87 u32 reserve2[13];
88 u32 srst;
91 #define PCH_TSC_RESET (1 << 0)
92 #define PCH_TSC_TTM_MASK (1 << 1)
93 #define PCH_TSC_ASMS_MASK (1 << 2)
94 #define PCH_TSC_AMMS_MASK (1 << 3)
95 #define PCH_TSC_PPSM_MASK (1 << 4)
96 #define PCH_TSE_TTIPEND (1 << 1)
97 #define PCH_TSE_SNS (1 << 2)
98 #define PCH_TSE_SNM (1 << 3)
99 #define PCH_TSE_PPS (1 << 4)
100 #define PCH_CC_MM (1 << 0)
101 #define PCH_CC_TA (1 << 1)
103 #define PCH_CC_MODE_SHIFT 16
104 #define PCH_CC_MODE_MASK 0x001F0000
105 #define PCH_CC_VERSION (1 << 31)
106 #define PCH_CE_TXS (1 << 0)
107 #define PCH_CE_RXS (1 << 1)
108 #define PCH_CE_OVR (1 << 0)
109 #define PCH_CE_VAL (1 << 1)
110 #define PCH_ECS_ETH (1 << 0)
112 #define PCH_ECS_CAN (1 << 1)
113 #define PCH_STATION_BYTES 6
115 #define PCH_IEEE1588_ETH (1 << 0)
116 #define PCH_IEEE1588_CAN (1 << 1)
118 * struct pch_dev - Driver private data
120 struct pch_dev {
121 struct pch_ts_regs __iomem *regs;
122 struct ptp_clock *ptp_clock;
123 struct ptp_clock_info caps;
124 int exts0_enabled;
125 int exts1_enabled;
127 u32 mem_base;
128 u32 mem_size;
129 u32 irq;
130 struct pci_dev *pdev;
131 spinlock_t register_lock;
135 * struct pch_params - 1588 module parameter
137 struct pch_params {
138 u8 station[STATION_ADDR_LEN];
141 /* structure to hold the module parameters */
142 static struct pch_params pch_param = {
143 "00:00:00:00:00:00"
147 * Register access functions
149 static inline void pch_eth_enable_set(struct pch_dev *chip)
151 u32 val;
152 /* SET the eth_enable bit */
153 val = ioread32(&chip->regs->ts_sel) | (PCH_ECS_ETH);
154 iowrite32(val, (&chip->regs->ts_sel));
157 static u64 pch_systime_read(struct pch_ts_regs __iomem *regs)
159 u64 ns;
160 u32 lo, hi;
162 lo = ioread32(&regs->systime_lo);
163 hi = ioread32(&regs->systime_hi);
165 ns = ((u64) hi) << 32;
166 ns |= lo;
167 ns <<= TICKS_NS_SHIFT;
169 return ns;
172 static void pch_systime_write(struct pch_ts_regs __iomem *regs, u64 ns)
174 u32 hi, lo;
176 ns >>= TICKS_NS_SHIFT;
177 hi = ns >> 32;
178 lo = ns & 0xffffffff;
180 iowrite32(lo, &regs->systime_lo);
181 iowrite32(hi, &regs->systime_hi);
184 static inline void pch_block_reset(struct pch_dev *chip)
186 u32 val;
187 /* Reset Hardware Assist block */
188 val = ioread32(&chip->regs->control) | PCH_TSC_RESET;
189 iowrite32(val, (&chip->regs->control));
190 val = val & ~PCH_TSC_RESET;
191 iowrite32(val, (&chip->regs->control));
194 u32 pch_ch_control_read(struct pci_dev *pdev)
196 struct pch_dev *chip = pci_get_drvdata(pdev);
197 u32 val;
199 val = ioread32(&chip->regs->ch_control);
201 return val;
203 EXPORT_SYMBOL(pch_ch_control_read);
205 void pch_ch_control_write(struct pci_dev *pdev, u32 val)
207 struct pch_dev *chip = pci_get_drvdata(pdev);
209 iowrite32(val, (&chip->regs->ch_control));
211 EXPORT_SYMBOL(pch_ch_control_write);
213 u32 pch_ch_event_read(struct pci_dev *pdev)
215 struct pch_dev *chip = pci_get_drvdata(pdev);
216 u32 val;
218 val = ioread32(&chip->regs->ch_event);
220 return val;
222 EXPORT_SYMBOL(pch_ch_event_read);
224 void pch_ch_event_write(struct pci_dev *pdev, u32 val)
226 struct pch_dev *chip = pci_get_drvdata(pdev);
228 iowrite32(val, (&chip->regs->ch_event));
230 EXPORT_SYMBOL(pch_ch_event_write);
232 u32 pch_src_uuid_lo_read(struct pci_dev *pdev)
234 struct pch_dev *chip = pci_get_drvdata(pdev);
235 u32 val;
237 val = ioread32(&chip->regs->src_uuid_lo);
239 return val;
241 EXPORT_SYMBOL(pch_src_uuid_lo_read);
243 u32 pch_src_uuid_hi_read(struct pci_dev *pdev)
245 struct pch_dev *chip = pci_get_drvdata(pdev);
246 u32 val;
248 val = ioread32(&chip->regs->src_uuid_hi);
250 return val;
252 EXPORT_SYMBOL(pch_src_uuid_hi_read);
254 u64 pch_rx_snap_read(struct pci_dev *pdev)
256 struct pch_dev *chip = pci_get_drvdata(pdev);
257 u64 ns;
258 u32 lo, hi;
260 lo = ioread32(&chip->regs->rx_snap_lo);
261 hi = ioread32(&chip->regs->rx_snap_hi);
263 ns = ((u64) hi) << 32;
264 ns |= lo;
265 ns <<= TICKS_NS_SHIFT;
267 return ns;
269 EXPORT_SYMBOL(pch_rx_snap_read);
271 u64 pch_tx_snap_read(struct pci_dev *pdev)
273 struct pch_dev *chip = pci_get_drvdata(pdev);
274 u64 ns;
275 u32 lo, hi;
277 lo = ioread32(&chip->regs->tx_snap_lo);
278 hi = ioread32(&chip->regs->tx_snap_hi);
280 ns = ((u64) hi) << 32;
281 ns |= lo;
282 ns <<= TICKS_NS_SHIFT;
284 return ns;
286 EXPORT_SYMBOL(pch_tx_snap_read);
288 /* This function enables all 64 bits in system time registers [high & low].
289 This is a work-around for non continuous value in the SystemTime Register*/
290 static void pch_set_system_time_count(struct pch_dev *chip)
292 iowrite32(0x01, &chip->regs->stl_max_set_en);
293 iowrite32(0xFFFFFFFF, &chip->regs->stl_max_set);
294 iowrite32(0x00, &chip->regs->stl_max_set_en);
297 static void pch_reset(struct pch_dev *chip)
299 /* Reset Hardware Assist */
300 pch_block_reset(chip);
302 /* enable all 32 bits in system time registers */
303 pch_set_system_time_count(chip);
307 * pch_set_station_address() - This API sets the station address used by
308 * IEEE 1588 hardware when looking at PTP
309 * traffic on the ethernet interface
310 * @addr: dress which contain the column separated address to be used.
312 int pch_set_station_address(u8 *addr, struct pci_dev *pdev)
314 s32 i;
315 struct pch_dev *chip = pci_get_drvdata(pdev);
317 /* Verify the parameter */
318 if ((chip->regs == NULL) || addr == (u8 *)NULL) {
319 dev_err(&pdev->dev,
320 "invalid params returning PCH_INVALIDPARAM\n");
321 return PCH_INVALIDPARAM;
323 /* For all station address bytes */
324 for (i = 0; i < PCH_STATION_BYTES; i++) {
325 u32 val;
326 s32 tmp;
328 tmp = hex_to_bin(addr[i * 3]);
329 if (tmp < 0) {
330 dev_err(&pdev->dev,
331 "invalid params returning PCH_INVALIDPARAM\n");
332 return PCH_INVALIDPARAM;
334 val = tmp * 16;
335 tmp = hex_to_bin(addr[(i * 3) + 1]);
336 if (tmp < 0) {
337 dev_err(&pdev->dev,
338 "invalid params returning PCH_INVALIDPARAM\n");
339 return PCH_INVALIDPARAM;
341 val += tmp;
342 /* Expects ':' separated addresses */
343 if ((i < 5) && (addr[(i * 3) + 2] != ':')) {
344 dev_err(&pdev->dev,
345 "invalid params returning PCH_INVALIDPARAM\n");
346 return PCH_INVALIDPARAM;
349 /* Ideally we should set the address only after validating
350 entire string */
351 dev_dbg(&pdev->dev, "invoking pch_station_set\n");
352 iowrite32(val, &chip->regs->ts_st[i]);
354 return 0;
356 EXPORT_SYMBOL(pch_set_station_address);
359 * Interrupt service routine
361 static irqreturn_t isr(int irq, void *priv)
363 struct pch_dev *pch_dev = priv;
364 struct pch_ts_regs __iomem *regs = pch_dev->regs;
365 struct ptp_clock_event event;
366 u32 ack = 0, lo, hi, val;
368 val = ioread32(&regs->event);
370 if (val & PCH_TSE_SNS) {
371 ack |= PCH_TSE_SNS;
372 if (pch_dev->exts0_enabled) {
373 hi = ioread32(&regs->asms_hi);
374 lo = ioread32(&regs->asms_lo);
375 event.type = PTP_CLOCK_EXTTS;
376 event.index = 0;
377 event.timestamp = ((u64) hi) << 32;
378 event.timestamp |= lo;
379 event.timestamp <<= TICKS_NS_SHIFT;
380 ptp_clock_event(pch_dev->ptp_clock, &event);
384 if (val & PCH_TSE_SNM) {
385 ack |= PCH_TSE_SNM;
386 if (pch_dev->exts1_enabled) {
387 hi = ioread32(&regs->amms_hi);
388 lo = ioread32(&regs->amms_lo);
389 event.type = PTP_CLOCK_EXTTS;
390 event.index = 1;
391 event.timestamp = ((u64) hi) << 32;
392 event.timestamp |= lo;
393 event.timestamp <<= TICKS_NS_SHIFT;
394 ptp_clock_event(pch_dev->ptp_clock, &event);
398 if (val & PCH_TSE_TTIPEND)
399 ack |= PCH_TSE_TTIPEND; /* this bit seems to be always set */
401 if (ack) {
402 iowrite32(ack, &regs->event);
403 return IRQ_HANDLED;
404 } else
405 return IRQ_NONE;
409 * PTP clock operations
412 static int ptp_pch_adjfreq(struct ptp_clock_info *ptp, s32 ppb)
414 u64 adj;
415 u32 diff, addend;
416 int neg_adj = 0;
417 struct pch_dev *pch_dev = container_of(ptp, struct pch_dev, caps);
418 struct pch_ts_regs __iomem *regs = pch_dev->regs;
420 if (ppb < 0) {
421 neg_adj = 1;
422 ppb = -ppb;
424 addend = DEFAULT_ADDEND;
425 adj = addend;
426 adj *= ppb;
427 diff = div_u64(adj, 1000000000ULL);
429 addend = neg_adj ? addend - diff : addend + diff;
431 iowrite32(addend, &regs->addend);
433 return 0;
436 static int ptp_pch_adjtime(struct ptp_clock_info *ptp, s64 delta)
438 s64 now;
439 unsigned long flags;
440 struct pch_dev *pch_dev = container_of(ptp, struct pch_dev, caps);
441 struct pch_ts_regs __iomem *regs = pch_dev->regs;
443 spin_lock_irqsave(&pch_dev->register_lock, flags);
444 now = pch_systime_read(regs);
445 now += delta;
446 pch_systime_write(regs, now);
447 spin_unlock_irqrestore(&pch_dev->register_lock, flags);
449 return 0;
452 static int ptp_pch_gettime(struct ptp_clock_info *ptp, struct timespec *ts)
454 u64 ns;
455 u32 remainder;
456 unsigned long flags;
457 struct pch_dev *pch_dev = container_of(ptp, struct pch_dev, caps);
458 struct pch_ts_regs __iomem *regs = pch_dev->regs;
460 spin_lock_irqsave(&pch_dev->register_lock, flags);
461 ns = pch_systime_read(regs);
462 spin_unlock_irqrestore(&pch_dev->register_lock, flags);
464 ts->tv_sec = div_u64_rem(ns, 1000000000, &remainder);
465 ts->tv_nsec = remainder;
466 return 0;
469 static int ptp_pch_settime(struct ptp_clock_info *ptp,
470 const struct timespec *ts)
472 u64 ns;
473 unsigned long flags;
474 struct pch_dev *pch_dev = container_of(ptp, struct pch_dev, caps);
475 struct pch_ts_regs __iomem *regs = pch_dev->regs;
477 ns = ts->tv_sec * 1000000000ULL;
478 ns += ts->tv_nsec;
480 spin_lock_irqsave(&pch_dev->register_lock, flags);
481 pch_systime_write(regs, ns);
482 spin_unlock_irqrestore(&pch_dev->register_lock, flags);
484 return 0;
487 static int ptp_pch_enable(struct ptp_clock_info *ptp,
488 struct ptp_clock_request *rq, int on)
490 struct pch_dev *pch_dev = container_of(ptp, struct pch_dev, caps);
492 switch (rq->type) {
493 case PTP_CLK_REQ_EXTTS:
494 switch (rq->extts.index) {
495 case 0:
496 pch_dev->exts0_enabled = on ? 1 : 0;
497 break;
498 case 1:
499 pch_dev->exts1_enabled = on ? 1 : 0;
500 break;
501 default:
502 return -EINVAL;
504 return 0;
505 default:
506 break;
509 return -EOPNOTSUPP;
512 static struct ptp_clock_info ptp_pch_caps = {
513 .owner = THIS_MODULE,
514 .name = "PCH timer",
515 .max_adj = 50000000,
516 .n_ext_ts = N_EXT_TS,
517 .pps = 0,
518 .adjfreq = ptp_pch_adjfreq,
519 .adjtime = ptp_pch_adjtime,
520 .gettime = ptp_pch_gettime,
521 .settime = ptp_pch_settime,
522 .enable = ptp_pch_enable,
526 #ifdef CONFIG_PM
527 static s32 pch_suspend(struct pci_dev *pdev, pm_message_t state)
529 pci_disable_device(pdev);
530 pci_enable_wake(pdev, PCI_D3hot, 0);
532 if (pci_save_state(pdev) != 0) {
533 dev_err(&pdev->dev, "could not save PCI config state\n");
534 return -ENOMEM;
536 pci_set_power_state(pdev, pci_choose_state(pdev, state));
538 return 0;
541 static s32 pch_resume(struct pci_dev *pdev)
543 s32 ret;
545 pci_set_power_state(pdev, PCI_D0);
546 pci_restore_state(pdev);
547 ret = pci_enable_device(pdev);
548 if (ret) {
549 dev_err(&pdev->dev, "pci_enable_device failed\n");
550 return ret;
552 pci_enable_wake(pdev, PCI_D3hot, 0);
553 return 0;
555 #else
556 #define pch_suspend NULL
557 #define pch_resume NULL
558 #endif
560 static void pch_remove(struct pci_dev *pdev)
562 struct pch_dev *chip = pci_get_drvdata(pdev);
564 ptp_clock_unregister(chip->ptp_clock);
565 /* free the interrupt */
566 if (pdev->irq != 0)
567 free_irq(pdev->irq, chip);
569 /* unmap the virtual IO memory space */
570 if (chip->regs != NULL) {
571 iounmap(chip->regs);
572 chip->regs = NULL;
574 /* release the reserved IO memory space */
575 if (chip->mem_base != 0) {
576 release_mem_region(chip->mem_base, chip->mem_size);
577 chip->mem_base = 0;
579 pci_disable_device(pdev);
580 kfree(chip);
581 dev_info(&pdev->dev, "complete\n");
584 static s32
585 pch_probe(struct pci_dev *pdev, const struct pci_device_id *id)
587 s32 ret;
588 unsigned long flags;
589 struct pch_dev *chip;
591 chip = kzalloc(sizeof(struct pch_dev), GFP_KERNEL);
592 if (chip == NULL)
593 return -ENOMEM;
595 /* enable the 1588 pci device */
596 ret = pci_enable_device(pdev);
597 if (ret != 0) {
598 dev_err(&pdev->dev, "could not enable the pci device\n");
599 goto err_pci_en;
602 chip->mem_base = pci_resource_start(pdev, IO_MEM_BAR);
603 if (!chip->mem_base) {
604 dev_err(&pdev->dev, "could not locate IO memory address\n");
605 ret = -ENODEV;
606 goto err_pci_start;
609 /* retrieve the available length of the IO memory space */
610 chip->mem_size = pci_resource_len(pdev, IO_MEM_BAR);
612 /* allocate the memory for the device registers */
613 if (!request_mem_region(chip->mem_base, chip->mem_size, "1588_regs")) {
614 dev_err(&pdev->dev,
615 "could not allocate register memory space\n");
616 ret = -EBUSY;
617 goto err_req_mem_region;
620 /* get the virtual address to the 1588 registers */
621 chip->regs = ioremap(chip->mem_base, chip->mem_size);
623 if (!chip->regs) {
624 dev_err(&pdev->dev, "Could not get virtual address\n");
625 ret = -ENOMEM;
626 goto err_ioremap;
629 chip->caps = ptp_pch_caps;
630 chip->ptp_clock = ptp_clock_register(&chip->caps, &pdev->dev);
631 if (IS_ERR(chip->ptp_clock)) {
632 ret = PTR_ERR(chip->ptp_clock);
633 goto err_ptp_clock_reg;
636 spin_lock_init(&chip->register_lock);
638 ret = request_irq(pdev->irq, &isr, IRQF_SHARED, KBUILD_MODNAME, chip);
639 if (ret != 0) {
640 dev_err(&pdev->dev, "failed to get irq %d\n", pdev->irq);
641 goto err_req_irq;
644 /* indicate success */
645 chip->irq = pdev->irq;
646 chip->pdev = pdev;
647 pci_set_drvdata(pdev, chip);
649 spin_lock_irqsave(&chip->register_lock, flags);
650 /* reset the ieee1588 h/w */
651 pch_reset(chip);
653 iowrite32(DEFAULT_ADDEND, &chip->regs->addend);
654 iowrite32(1, &chip->regs->trgt_lo);
655 iowrite32(0, &chip->regs->trgt_hi);
656 iowrite32(PCH_TSE_TTIPEND, &chip->regs->event);
658 pch_eth_enable_set(chip);
660 if (strcmp(pch_param.station, "00:00:00:00:00:00") != 0) {
661 if (pch_set_station_address(pch_param.station, pdev) != 0) {
662 dev_err(&pdev->dev,
663 "Invalid station address parameter\n"
664 "Module loaded but station address not set correctly\n"
668 spin_unlock_irqrestore(&chip->register_lock, flags);
669 return 0;
671 err_req_irq:
672 ptp_clock_unregister(chip->ptp_clock);
673 err_ptp_clock_reg:
674 iounmap(chip->regs);
675 chip->regs = NULL;
677 err_ioremap:
678 release_mem_region(chip->mem_base, chip->mem_size);
680 err_req_mem_region:
681 chip->mem_base = 0;
683 err_pci_start:
684 pci_disable_device(pdev);
686 err_pci_en:
687 kfree(chip);
688 dev_err(&pdev->dev, "probe failed(ret=0x%x)\n", ret);
690 return ret;
693 static DEFINE_PCI_DEVICE_TABLE(pch_ieee1588_pcidev_id) = {
695 .vendor = PCI_VENDOR_ID_INTEL,
696 .device = PCI_DEVICE_ID_PCH_1588
701 static struct pci_driver pch_driver = {
702 .name = KBUILD_MODNAME,
703 .id_table = pch_ieee1588_pcidev_id,
704 .probe = pch_probe,
705 .remove = pch_remove,
706 .suspend = pch_suspend,
707 .resume = pch_resume,
710 static void __exit ptp_pch_exit(void)
712 pci_unregister_driver(&pch_driver);
715 static s32 __init ptp_pch_init(void)
717 s32 ret;
719 /* register the driver with the pci core */
720 ret = pci_register_driver(&pch_driver);
722 return ret;
725 module_init(ptp_pch_init);
726 module_exit(ptp_pch_exit);
728 module_param_string(station,
729 pch_param.station, sizeof(pch_param.station), 0444);
730 MODULE_PARM_DESC(station,
731 "IEEE 1588 station address to use - colon separated hex values");
733 MODULE_AUTHOR("LAPIS SEMICONDUCTOR, <tshimizu818@gmail.com>");
734 MODULE_DESCRIPTION("PTP clock using the EG20T timer");
735 MODULE_LICENSE("GPL");