Linux Audio

Check our new training course

Loading...
Note: File does not exist in v3.1.
  1/*
  2 * PTP 1588 clock using the eTSEC
  3 *
  4 * Copyright (C) 2010 OMICRON electronics GmbH
  5 *
  6 *  This program is free software; you can redistribute it and/or modify
  7 *  it under the terms of the GNU General Public License as published by
  8 *  the Free Software Foundation; either version 2 of the License, or
  9 *  (at your option) any later version.
 10 *
 11 *  This program is distributed in the hope that it will be useful,
 12 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 13 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 14 *  GNU General Public License for more details.
 15 *
 16 *  You should have received a copy of the GNU General Public License
 17 *  along with this program; if not, write to the Free Software
 18 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 19 */
 20
 21#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
 22
 23#include <linux/device.h>
 24#include <linux/hrtimer.h>
 25#include <linux/interrupt.h>
 26#include <linux/kernel.h>
 27#include <linux/module.h>
 28#include <linux/of.h>
 29#include <linux/of_platform.h>
 30#include <linux/timex.h>
 31#include <linux/io.h>
 32
 33#include <linux/ptp_clock_kernel.h>
 34
 35#include "gianfar.h"
 36
 37/*
 38 * gianfar ptp registers
 39 * Generated by regen.tcl on Thu May 13 01:38:57 PM CEST 2010
 40 */
 41struct gianfar_ptp_registers {
 42	u32 tmr_ctrl;     /* Timer control register */
 43	u32 tmr_tevent;   /* Timestamp event register */
 44	u32 tmr_temask;   /* Timer event mask register */
 45	u32 tmr_pevent;   /* Timestamp event register */
 46	u32 tmr_pemask;   /* Timer event mask register */
 47	u32 tmr_stat;     /* Timestamp status register */
 48	u32 tmr_cnt_h;    /* Timer counter high register */
 49	u32 tmr_cnt_l;    /* Timer counter low register */
 50	u32 tmr_add;      /* Timer drift compensation addend register */
 51	u32 tmr_acc;      /* Timer accumulator register */
 52	u32 tmr_prsc;     /* Timer prescale */
 53	u8  res1[4];
 54	u32 tmroff_h;     /* Timer offset high */
 55	u32 tmroff_l;     /* Timer offset low */
 56	u8  res2[8];
 57	u32 tmr_alarm1_h; /* Timer alarm 1 high register */
 58	u32 tmr_alarm1_l; /* Timer alarm 1 high register */
 59	u32 tmr_alarm2_h; /* Timer alarm 2 high register */
 60	u32 tmr_alarm2_l; /* Timer alarm 2 high register */
 61	u8  res3[48];
 62	u32 tmr_fiper1;   /* Timer fixed period interval */
 63	u32 tmr_fiper2;   /* Timer fixed period interval */
 64	u32 tmr_fiper3;   /* Timer fixed period interval */
 65	u8  res4[20];
 66	u32 tmr_etts1_h;  /* Timestamp of general purpose external trigger */
 67	u32 tmr_etts1_l;  /* Timestamp of general purpose external trigger */
 68	u32 tmr_etts2_h;  /* Timestamp of general purpose external trigger */
 69	u32 tmr_etts2_l;  /* Timestamp of general purpose external trigger */
 70};
 71
 72/* Bit definitions for the TMR_CTRL register */
 73#define ALM1P                 (1<<31) /* Alarm1 output polarity */
 74#define ALM2P                 (1<<30) /* Alarm2 output polarity */
 75#define FS                    (1<<28) /* FIPER start indication */
 76#define PP1L                  (1<<27) /* Fiper1 pulse loopback mode enabled. */
 77#define PP2L                  (1<<26) /* Fiper2 pulse loopback mode enabled. */
 78#define TCLK_PERIOD_SHIFT     (16) /* 1588 timer reference clock period. */
 79#define TCLK_PERIOD_MASK      (0x3ff)
 80#define RTPE                  (1<<15) /* Record Tx Timestamp to PAL Enable. */
 81#define FRD                   (1<<14) /* FIPER Realignment Disable */
 82#define ESFDP                 (1<<11) /* External Tx/Rx SFD Polarity. */
 83#define ESFDE                 (1<<10) /* External Tx/Rx SFD Enable. */
 84#define ETEP2                 (1<<9) /* External trigger 2 edge polarity */
 85#define ETEP1                 (1<<8) /* External trigger 1 edge polarity */
 86#define COPH                  (1<<7) /* Generated clock output phase. */
 87#define CIPH                  (1<<6) /* External oscillator input clock phase */
 88#define TMSR                  (1<<5) /* Timer soft reset. */
 89#define BYP                   (1<<3) /* Bypass drift compensated clock */
 90#define TE                    (1<<2) /* 1588 timer enable. */
 91#define CKSEL_SHIFT           (0)    /* 1588 Timer reference clock source */
 92#define CKSEL_MASK            (0x3)
 93
 94/* Bit definitions for the TMR_TEVENT register */
 95#define ETS2                  (1<<25) /* External trigger 2 timestamp sampled */
 96#define ETS1                  (1<<24) /* External trigger 1 timestamp sampled */
 97#define ALM2                  (1<<17) /* Current time = alarm time register 2 */
 98#define ALM1                  (1<<16) /* Current time = alarm time register 1 */
 99#define PP1                   (1<<7)  /* periodic pulse generated on FIPER1 */
100#define PP2                   (1<<6)  /* periodic pulse generated on FIPER2 */
101#define PP3                   (1<<5)  /* periodic pulse generated on FIPER3 */
102
103/* Bit definitions for the TMR_TEMASK register */
104#define ETS2EN                (1<<25) /* External trigger 2 timestamp enable */
105#define ETS1EN                (1<<24) /* External trigger 1 timestamp enable */
106#define ALM2EN                (1<<17) /* Timer ALM2 event enable */
107#define ALM1EN                (1<<16) /* Timer ALM1 event enable */
108#define PP1EN                 (1<<7) /* Periodic pulse event 1 enable */
109#define PP2EN                 (1<<6) /* Periodic pulse event 2 enable */
110
111/* Bit definitions for the TMR_PEVENT register */
112#define TXP2                  (1<<9) /* PTP transmitted timestamp im TXTS2 */
113#define TXP1                  (1<<8) /* PTP transmitted timestamp in TXTS1 */
114#define RXP                   (1<<0) /* PTP frame has been received */
115
116/* Bit definitions for the TMR_PEMASK register */
117#define TXP2EN                (1<<9) /* Transmit PTP packet event 2 enable */
118#define TXP1EN                (1<<8) /* Transmit PTP packet event 1 enable */
119#define RXPEN                 (1<<0) /* Receive PTP packet event enable */
120
121/* Bit definitions for the TMR_STAT register */
122#define STAT_VEC_SHIFT        (0) /* Timer general purpose status vector */
123#define STAT_VEC_MASK         (0x3f)
124
125/* Bit definitions for the TMR_PRSC register */
126#define PRSC_OCK_SHIFT        (0) /* Output clock division/prescale factor. */
127#define PRSC_OCK_MASK         (0xffff)
128
129
130#define DRIVER		"gianfar_ptp"
131#define DEFAULT_CKSEL	1
132#define N_EXT_TS	2
133#define REG_SIZE	sizeof(struct gianfar_ptp_registers)
134
135struct etsects {
136	struct gianfar_ptp_registers __iomem *regs;
137	spinlock_t lock; /* protects regs */
138	struct ptp_clock *clock;
139	struct ptp_clock_info caps;
140	struct resource *rsrc;
141	int irq;
142	u64 alarm_interval; /* for periodic alarm */
143	u64 alarm_value;
144	u32 tclk_period;  /* nanoseconds */
145	u32 tmr_prsc;
146	u32 tmr_add;
147	u32 cksel;
148	u32 tmr_fiper1;
149	u32 tmr_fiper2;
150};
151
152/*
153 * Register access functions
154 */
155
156/* Caller must hold etsects->lock. */
157static u64 tmr_cnt_read(struct etsects *etsects)
158{
159	u64 ns;
160	u32 lo, hi;
161
162	lo = gfar_read(&etsects->regs->tmr_cnt_l);
163	hi = gfar_read(&etsects->regs->tmr_cnt_h);
164	ns = ((u64) hi) << 32;
165	ns |= lo;
166	return ns;
167}
168
169/* Caller must hold etsects->lock. */
170static void tmr_cnt_write(struct etsects *etsects, u64 ns)
171{
172	u32 hi = ns >> 32;
173	u32 lo = ns & 0xffffffff;
174
175	gfar_write(&etsects->regs->tmr_cnt_l, lo);
176	gfar_write(&etsects->regs->tmr_cnt_h, hi);
177}
178
179/* Caller must hold etsects->lock. */
180static void set_alarm(struct etsects *etsects)
181{
182	u64 ns;
183	u32 lo, hi;
184
185	ns = tmr_cnt_read(etsects) + 1500000000ULL;
186	ns = div_u64(ns, 1000000000UL) * 1000000000ULL;
187	ns -= etsects->tclk_period;
188	hi = ns >> 32;
189	lo = ns & 0xffffffff;
190	gfar_write(&etsects->regs->tmr_alarm1_l, lo);
191	gfar_write(&etsects->regs->tmr_alarm1_h, hi);
192}
193
194/* Caller must hold etsects->lock. */
195static void set_fipers(struct etsects *etsects)
196{
197	set_alarm(etsects);
198	gfar_write(&etsects->regs->tmr_fiper1, etsects->tmr_fiper1);
199	gfar_write(&etsects->regs->tmr_fiper2, etsects->tmr_fiper2);
200}
201
202/*
203 * Interrupt service routine
204 */
205
206static irqreturn_t isr(int irq, void *priv)
207{
208	struct etsects *etsects = priv;
209	struct ptp_clock_event event;
210	u64 ns;
211	u32 ack = 0, lo, hi, mask, val;
212
213	val = gfar_read(&etsects->regs->tmr_tevent);
214
215	if (val & ETS1) {
216		ack |= ETS1;
217		hi = gfar_read(&etsects->regs->tmr_etts1_h);
218		lo = gfar_read(&etsects->regs->tmr_etts1_l);
219		event.type = PTP_CLOCK_EXTTS;
220		event.index = 0;
221		event.timestamp = ((u64) hi) << 32;
222		event.timestamp |= lo;
223		ptp_clock_event(etsects->clock, &event);
224	}
225
226	if (val & ETS2) {
227		ack |= ETS2;
228		hi = gfar_read(&etsects->regs->tmr_etts2_h);
229		lo = gfar_read(&etsects->regs->tmr_etts2_l);
230		event.type = PTP_CLOCK_EXTTS;
231		event.index = 1;
232		event.timestamp = ((u64) hi) << 32;
233		event.timestamp |= lo;
234		ptp_clock_event(etsects->clock, &event);
235	}
236
237	if (val & ALM2) {
238		ack |= ALM2;
239		if (etsects->alarm_value) {
240			event.type = PTP_CLOCK_ALARM;
241			event.index = 0;
242			event.timestamp = etsects->alarm_value;
243			ptp_clock_event(etsects->clock, &event);
244		}
245		if (etsects->alarm_interval) {
246			ns = etsects->alarm_value + etsects->alarm_interval;
247			hi = ns >> 32;
248			lo = ns & 0xffffffff;
249			spin_lock(&etsects->lock);
250			gfar_write(&etsects->regs->tmr_alarm2_l, lo);
251			gfar_write(&etsects->regs->tmr_alarm2_h, hi);
252			spin_unlock(&etsects->lock);
253			etsects->alarm_value = ns;
254		} else {
255			gfar_write(&etsects->regs->tmr_tevent, ALM2);
256			spin_lock(&etsects->lock);
257			mask = gfar_read(&etsects->regs->tmr_temask);
258			mask &= ~ALM2EN;
259			gfar_write(&etsects->regs->tmr_temask, mask);
260			spin_unlock(&etsects->lock);
261			etsects->alarm_value = 0;
262			etsects->alarm_interval = 0;
263		}
264	}
265
266	if (val & PP1) {
267		ack |= PP1;
268		event.type = PTP_CLOCK_PPS;
269		ptp_clock_event(etsects->clock, &event);
270	}
271
272	if (ack) {
273		gfar_write(&etsects->regs->tmr_tevent, ack);
274		return IRQ_HANDLED;
275	} else
276		return IRQ_NONE;
277}
278
279/*
280 * PTP clock operations
281 */
282
283static int ptp_gianfar_adjfreq(struct ptp_clock_info *ptp, s32 ppb)
284{
285	u64 adj;
286	u32 diff, tmr_add;
287	int neg_adj = 0;
288	struct etsects *etsects = container_of(ptp, struct etsects, caps);
289
290	if (ppb < 0) {
291		neg_adj = 1;
292		ppb = -ppb;
293	}
294	tmr_add = etsects->tmr_add;
295	adj = tmr_add;
296	adj *= ppb;
297	diff = div_u64(adj, 1000000000ULL);
298
299	tmr_add = neg_adj ? tmr_add - diff : tmr_add + diff;
300
301	gfar_write(&etsects->regs->tmr_add, tmr_add);
302
303	return 0;
304}
305
306static int ptp_gianfar_adjtime(struct ptp_clock_info *ptp, s64 delta)
307{
308	s64 now;
309	unsigned long flags;
310	struct etsects *etsects = container_of(ptp, struct etsects, caps);
311
312	spin_lock_irqsave(&etsects->lock, flags);
313
314	now = tmr_cnt_read(etsects);
315	now += delta;
316	tmr_cnt_write(etsects, now);
317
318	spin_unlock_irqrestore(&etsects->lock, flags);
319
320	set_fipers(etsects);
321
322	return 0;
323}
324
325static int ptp_gianfar_gettime(struct ptp_clock_info *ptp, struct timespec *ts)
326{
327	u64 ns;
328	u32 remainder;
329	unsigned long flags;
330	struct etsects *etsects = container_of(ptp, struct etsects, caps);
331
332	spin_lock_irqsave(&etsects->lock, flags);
333
334	ns = tmr_cnt_read(etsects);
335
336	spin_unlock_irqrestore(&etsects->lock, flags);
337
338	ts->tv_sec = div_u64_rem(ns, 1000000000, &remainder);
339	ts->tv_nsec = remainder;
340	return 0;
341}
342
343static int ptp_gianfar_settime(struct ptp_clock_info *ptp,
344			       const struct timespec *ts)
345{
346	u64 ns;
347	unsigned long flags;
348	struct etsects *etsects = container_of(ptp, struct etsects, caps);
349
350	ns = ts->tv_sec * 1000000000ULL;
351	ns += ts->tv_nsec;
352
353	spin_lock_irqsave(&etsects->lock, flags);
354
355	tmr_cnt_write(etsects, ns);
356	set_fipers(etsects);
357
358	spin_unlock_irqrestore(&etsects->lock, flags);
359
360	return 0;
361}
362
363static int ptp_gianfar_enable(struct ptp_clock_info *ptp,
364			      struct ptp_clock_request *rq, int on)
365{
366	struct etsects *etsects = container_of(ptp, struct etsects, caps);
367	unsigned long flags;
368	u32 bit, mask;
369
370	switch (rq->type) {
371	case PTP_CLK_REQ_EXTTS:
372		switch (rq->extts.index) {
373		case 0:
374			bit = ETS1EN;
375			break;
376		case 1:
377			bit = ETS2EN;
378			break;
379		default:
380			return -EINVAL;
381		}
382		spin_lock_irqsave(&etsects->lock, flags);
383		mask = gfar_read(&etsects->regs->tmr_temask);
384		if (on)
385			mask |= bit;
386		else
387			mask &= ~bit;
388		gfar_write(&etsects->regs->tmr_temask, mask);
389		spin_unlock_irqrestore(&etsects->lock, flags);
390		return 0;
391
392	case PTP_CLK_REQ_PPS:
393		spin_lock_irqsave(&etsects->lock, flags);
394		mask = gfar_read(&etsects->regs->tmr_temask);
395		if (on)
396			mask |= PP1EN;
397		else
398			mask &= ~PP1EN;
399		gfar_write(&etsects->regs->tmr_temask, mask);
400		spin_unlock_irqrestore(&etsects->lock, flags);
401		return 0;
402
403	default:
404		break;
405	}
406
407	return -EOPNOTSUPP;
408}
409
410static struct ptp_clock_info ptp_gianfar_caps = {
411	.owner		= THIS_MODULE,
412	.name		= "gianfar clock",
413	.max_adj	= 512000,
414	.n_alarm	= 0,
415	.n_ext_ts	= N_EXT_TS,
416	.n_per_out	= 0,
417	.n_pins		= 0,
418	.pps		= 1,
419	.adjfreq	= ptp_gianfar_adjfreq,
420	.adjtime	= ptp_gianfar_adjtime,
421	.gettime	= ptp_gianfar_gettime,
422	.settime	= ptp_gianfar_settime,
423	.enable		= ptp_gianfar_enable,
424};
425
426/* OF device tree */
427
428static int get_of_u32(struct device_node *node, char *str, u32 *val)
429{
430	int plen;
431	const u32 *prop = of_get_property(node, str, &plen);
432
433	if (!prop || plen != sizeof(*prop))
434		return -1;
435	*val = *prop;
436	return 0;
437}
438
439static int gianfar_ptp_probe(struct platform_device *dev)
440{
441	struct device_node *node = dev->dev.of_node;
442	struct etsects *etsects;
443	struct timespec now;
444	int err = -ENOMEM;
445	u32 tmr_ctrl;
446	unsigned long flags;
447
448	etsects = kzalloc(sizeof(*etsects), GFP_KERNEL);
449	if (!etsects)
450		goto no_memory;
451
452	err = -ENODEV;
453
454	etsects->caps = ptp_gianfar_caps;
455
456	if (get_of_u32(node, "fsl,cksel", &etsects->cksel))
457		etsects->cksel = DEFAULT_CKSEL;
458
459	if (get_of_u32(node, "fsl,tclk-period", &etsects->tclk_period) ||
460	    get_of_u32(node, "fsl,tmr-prsc", &etsects->tmr_prsc) ||
461	    get_of_u32(node, "fsl,tmr-add", &etsects->tmr_add) ||
462	    get_of_u32(node, "fsl,tmr-fiper1", &etsects->tmr_fiper1) ||
463	    get_of_u32(node, "fsl,tmr-fiper2", &etsects->tmr_fiper2) ||
464	    get_of_u32(node, "fsl,max-adj", &etsects->caps.max_adj)) {
465		pr_err("device tree node missing required elements\n");
466		goto no_node;
467	}
468
469	etsects->irq = platform_get_irq(dev, 0);
470
471	if (etsects->irq == NO_IRQ) {
472		pr_err("irq not in device tree\n");
473		goto no_node;
474	}
475	if (request_irq(etsects->irq, isr, 0, DRIVER, etsects)) {
476		pr_err("request_irq failed\n");
477		goto no_node;
478	}
479
480	etsects->rsrc = platform_get_resource(dev, IORESOURCE_MEM, 0);
481	if (!etsects->rsrc) {
482		pr_err("no resource\n");
483		goto no_resource;
484	}
485	if (request_resource(&iomem_resource, etsects->rsrc)) {
486		pr_err("resource busy\n");
487		goto no_resource;
488	}
489
490	spin_lock_init(&etsects->lock);
491
492	etsects->regs = ioremap(etsects->rsrc->start,
493				resource_size(etsects->rsrc));
494	if (!etsects->regs) {
495		pr_err("ioremap ptp registers failed\n");
496		goto no_ioremap;
497	}
498	getnstimeofday(&now);
499	ptp_gianfar_settime(&etsects->caps, &now);
500
501	tmr_ctrl =
502	  (etsects->tclk_period & TCLK_PERIOD_MASK) << TCLK_PERIOD_SHIFT |
503	  (etsects->cksel & CKSEL_MASK) << CKSEL_SHIFT;
504
505	spin_lock_irqsave(&etsects->lock, flags);
506
507	gfar_write(&etsects->regs->tmr_ctrl,   tmr_ctrl);
508	gfar_write(&etsects->regs->tmr_add,    etsects->tmr_add);
509	gfar_write(&etsects->regs->tmr_prsc,   etsects->tmr_prsc);
510	gfar_write(&etsects->regs->tmr_fiper1, etsects->tmr_fiper1);
511	gfar_write(&etsects->regs->tmr_fiper2, etsects->tmr_fiper2);
512	set_alarm(etsects);
513	gfar_write(&etsects->regs->tmr_ctrl,   tmr_ctrl|FS|RTPE|TE|FRD);
514
515	spin_unlock_irqrestore(&etsects->lock, flags);
516
517	etsects->clock = ptp_clock_register(&etsects->caps, &dev->dev);
518	if (IS_ERR(etsects->clock)) {
519		err = PTR_ERR(etsects->clock);
520		goto no_clock;
521	}
522	gfar_phc_index = ptp_clock_index(etsects->clock);
523
524	platform_set_drvdata(dev, etsects);
525
526	return 0;
527
528no_clock:
529	iounmap(etsects->regs);
530no_ioremap:
531	release_resource(etsects->rsrc);
532no_resource:
533	free_irq(etsects->irq, etsects);
534no_node:
535	kfree(etsects);
536no_memory:
537	return err;
538}
539
540static int gianfar_ptp_remove(struct platform_device *dev)
541{
542	struct etsects *etsects = platform_get_drvdata(dev);
543
544	gfar_write(&etsects->regs->tmr_temask, 0);
545	gfar_write(&etsects->regs->tmr_ctrl,   0);
546
547	gfar_phc_index = -1;
548	ptp_clock_unregister(etsects->clock);
549	iounmap(etsects->regs);
550	release_resource(etsects->rsrc);
551	free_irq(etsects->irq, etsects);
552	kfree(etsects);
553
554	return 0;
555}
556
557static struct of_device_id match_table[] = {
558	{ .compatible = "fsl,etsec-ptp" },
559	{},
560};
561
562static struct platform_driver gianfar_ptp_driver = {
563	.driver = {
564		.name		= "gianfar_ptp",
565		.of_match_table	= match_table,
566		.owner		= THIS_MODULE,
567	},
568	.probe       = gianfar_ptp_probe,
569	.remove      = gianfar_ptp_remove,
570};
571
572module_platform_driver(gianfar_ptp_driver);
573
574MODULE_AUTHOR("Richard Cochran <richardcochran@gmail.com>");
575MODULE_DESCRIPTION("PTP clock using the eTSEC");
576MODULE_LICENSE("GPL");