blob: 627887b075a7c757bcaf4e9b20a6ce10e9152867 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
Linus Torvalds1da177e2005-04-16 15:20:36 -07002 * Time of day based timer functions.
3 *
4 * S390 version
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02005 * Copyright IBM Corp. 1999, 2008
Linus Torvalds1da177e2005-04-16 15:20:36 -07006 * Author(s): Hartmut Penner (hp@de.ibm.com),
7 * Martin Schwidefsky (schwidefsky@de.ibm.com),
8 * Denis Joseph Barrow (djbarrow@de.ibm.com,barrow_dj@yahoo.com)
9 *
10 * Derived from "arch/i386/kernel/time.c"
11 * Copyright (C) 1991, 1992, 1995 Linus Torvalds
12 */
13
Martin Schwidefskyfeab6502008-12-25 13:39:38 +010014#define KMSG_COMPONENT "time"
15#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
16
Heiko Carstens052ff462011-01-05 12:47:28 +010017#include <linux/kernel_stat.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070018#include <linux/errno.h>
19#include <linux/module.h>
20#include <linux/sched.h>
21#include <linux/kernel.h>
22#include <linux/param.h>
23#include <linux/string.h>
24#include <linux/mm.h>
25#include <linux/interrupt.h>
Heiko Carstens750887d2008-12-25 13:38:37 +010026#include <linux/cpu.h>
27#include <linux/stop_machine.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070028#include <linux/time.h>
Kay Sievers3fbacff2011-12-21 15:09:50 -080029#include <linux/device.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070030#include <linux/delay.h>
31#include <linux/init.h>
32#include <linux/smp.h>
33#include <linux/types.h>
34#include <linux/profile.h>
35#include <linux/timex.h>
36#include <linux/notifier.h>
John Stultz189374a2012-09-04 15:27:48 -040037#include <linux/timekeeper_internal.h>
Heiko Carstens5a62b192008-04-17 07:46:25 +020038#include <linux/clockchips.h>
Tejun Heo5a0e3ad2010-03-24 17:04:11 +090039#include <linux/gfp.h>
Martin Schwidefsky860dba42011-01-05 12:47:25 +010040#include <linux/kprobes.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070041#include <asm/uaccess.h>
42#include <asm/delay.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070043#include <asm/div64.h>
Martin Schwidefskyb0206322008-12-25 13:38:36 +010044#include <asm/vdso.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070045#include <asm/irq.h>
Heiko Carstens5a489b982006-10-06 16:38:35 +020046#include <asm/irq_regs.h>
Martin Schwidefsky27f6b412012-07-20 11:15:08 +020047#include <asm/vtimer.h>
Martin Schwidefskyd54853e2007-02-05 21:18:19 +010048#include <asm/etr.h>
Heiko Carstensa8061702008-04-17 07:46:26 +020049#include <asm/cio.h>
Martin Schwidefsky638ad342011-10-30 15:17:13 +010050#include "entry.h"
Linus Torvalds1da177e2005-04-16 15:20:36 -070051
52/* change this if you have some constant time drift */
53#define USECS_PER_JIFFY ((unsigned long) 1000000/HZ)
54#define CLK_TICKS_PER_JIFFY ((unsigned long) USECS_PER_JIFFY << 12)
55
Martin Schwidefskyb6112cc2009-04-14 15:36:28 +020056u64 sched_clock_base_cc = -1; /* Force to data section. */
Heiko Carstens05e7ff72009-09-11 10:28:31 +020057EXPORT_SYMBOL_GPL(sched_clock_base_cc);
Martin Schwidefskyb6112cc2009-04-14 15:36:28 +020058
Heiko Carstens5a62b192008-04-17 07:46:25 +020059static DEFINE_PER_CPU(struct clock_event_device, comparators);
Linus Torvalds1da177e2005-04-16 15:20:36 -070060
Fan Zhangfdf03652015-05-13 10:58:41 +020061ATOMIC_NOTIFIER_HEAD(s390_epoch_delta_notifier);
62EXPORT_SYMBOL(s390_epoch_delta_notifier);
63
Linus Torvalds1da177e2005-04-16 15:20:36 -070064/*
65 * Scheduler clock - returns current time in nanosec units.
66 */
Heiko Carstens7a5388d2014-10-22 12:42:38 +020067unsigned long long notrace sched_clock(void)
Linus Torvalds1da177e2005-04-16 15:20:36 -070068{
Heiko Carstens1aae0562013-01-30 09:49:40 +010069 return tod_to_ns(get_tod_clock_monotonic());
Linus Torvalds1da177e2005-04-16 15:20:36 -070070}
Heiko Carstens7a5388d2014-10-22 12:42:38 +020071NOKPROBE_SYMBOL(sched_clock);
Linus Torvalds1da177e2005-04-16 15:20:36 -070072
Jan Glauber32f65f22006-02-01 03:06:33 -080073/*
74 * Monotonic_clock - returns # of nanoseconds passed since time_init()
75 */
76unsigned long long monotonic_clock(void)
77{
78 return sched_clock();
79}
80EXPORT_SYMBOL(monotonic_clock);
81
Xunlei Pang689911c2015-04-09 09:04:41 +080082void tod_to_timeval(__u64 todval, struct timespec64 *xt)
Linus Torvalds1da177e2005-04-16 15:20:36 -070083{
84 unsigned long long sec;
85
86 sec = todval >> 12;
87 do_div(sec, 1000000);
John Stultzb1e2ba82010-03-08 12:25:19 +010088 xt->tv_sec = sec;
Linus Torvalds1da177e2005-04-16 15:20:36 -070089 todval -= (sec * 1000000) << 12;
John Stultzb1e2ba82010-03-08 12:25:19 +010090 xt->tv_nsec = ((todval * 1000) >> 12);
Linus Torvalds1da177e2005-04-16 15:20:36 -070091}
Christof Schmittb592e892009-08-18 15:43:31 +020092EXPORT_SYMBOL(tod_to_timeval);
Linus Torvalds1da177e2005-04-16 15:20:36 -070093
Heiko Carstens5a62b192008-04-17 07:46:25 +020094void clock_comparator_work(void)
Linus Torvalds1da177e2005-04-16 15:20:36 -070095{
Heiko Carstens5a62b192008-04-17 07:46:25 +020096 struct clock_event_device *cd;
Linus Torvalds1da177e2005-04-16 15:20:36 -070097
Heiko Carstens5a62b192008-04-17 07:46:25 +020098 S390_lowcore.clock_comparator = -1ULL;
Christoph Lametereb7e7d72014-08-17 12:30:45 -050099 cd = this_cpu_ptr(&comparators);
Heiko Carstens5a62b192008-04-17 07:46:25 +0200100 cd->event_handler(cd);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700101}
102
Linus Torvalds1da177e2005-04-16 15:20:36 -0700103/*
Heiko Carstens5a62b192008-04-17 07:46:25 +0200104 * Fixup the clock comparator.
Linus Torvalds1da177e2005-04-16 15:20:36 -0700105 */
Heiko Carstens5a62b192008-04-17 07:46:25 +0200106static void fixup_clock_comparator(unsigned long long delta)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700107{
Heiko Carstens5a62b192008-04-17 07:46:25 +0200108 /* If nobody is waiting there's nothing to fix. */
109 if (S390_lowcore.clock_comparator == -1ULL)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700110 return;
Heiko Carstens5a62b192008-04-17 07:46:25 +0200111 S390_lowcore.clock_comparator += delta;
112 set_clock_comparator(S390_lowcore.clock_comparator);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700113}
114
Martin Schwidefsky8adbf782013-11-22 12:04:18 +0100115static int s390_next_event(unsigned long delta,
Heiko Carstens5a62b192008-04-17 07:46:25 +0200116 struct clock_event_device *evt)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700117{
Martin Schwidefsky8adbf782013-11-22 12:04:18 +0100118 S390_lowcore.clock_comparator = get_tod_clock() + delta;
Heiko Carstens5a62b192008-04-17 07:46:25 +0200119 set_clock_comparator(S390_lowcore.clock_comparator);
120 return 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700121}
122
Heiko Carstens5a62b192008-04-17 07:46:25 +0200123static void s390_set_mode(enum clock_event_mode mode,
124 struct clock_event_device *evt)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700125{
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100126}
127
128/*
129 * Set up lowcore and control register of the current cpu to
130 * enable TOD clock and clock comparator interrupts.
Linus Torvalds1da177e2005-04-16 15:20:36 -0700131 */
132void init_cpu_timer(void)
133{
Heiko Carstens5a62b192008-04-17 07:46:25 +0200134 struct clock_event_device *cd;
135 int cpu;
136
137 S390_lowcore.clock_comparator = -1ULL;
138 set_clock_comparator(S390_lowcore.clock_comparator);
139
140 cpu = smp_processor_id();
141 cd = &per_cpu(comparators, cpu);
142 cd->name = "comparator";
Martin Schwidefsky8adbf782013-11-22 12:04:18 +0100143 cd->features = CLOCK_EVT_FEAT_ONESHOT;
Heiko Carstens5a62b192008-04-17 07:46:25 +0200144 cd->mult = 16777;
145 cd->shift = 12;
146 cd->min_delta_ns = 1;
147 cd->max_delta_ns = LONG_MAX;
148 cd->rating = 400;
Rusty Russell320ab2b2008-12-13 21:20:26 +1030149 cd->cpumask = cpumask_of(cpu);
Martin Schwidefsky8adbf782013-11-22 12:04:18 +0100150 cd->set_next_event = s390_next_event;
Heiko Carstens5a62b192008-04-17 07:46:25 +0200151 cd->set_mode = s390_set_mode;
152
153 clockevents_register_device(cd);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700154
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100155 /* Enable clock comparator timer interrupt. */
156 __ctl_set_bit(0,11);
157
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200158 /* Always allow the timing alert external interrupt. */
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100159 __ctl_set_bit(0, 4);
160}
161
Heiko Carstensfde15c32012-03-11 11:59:31 -0400162static void clock_comparator_interrupt(struct ext_code ext_code,
Martin Schwidefskyf6649a72010-10-25 16:10:38 +0200163 unsigned int param32,
164 unsigned long param64)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100165{
Heiko Carstens420f42e2013-01-02 15:18:18 +0100166 inc_irq_stat(IRQEXT_CLK);
Heiko Carstensd3d238c2008-10-03 21:54:59 +0200167 if (S390_lowcore.clock_comparator == -1ULL)
168 set_clock_comparator(S390_lowcore.clock_comparator);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100169}
170
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200171static void etr_timing_alert(struct etr_irq_parm *);
172static void stp_timing_alert(struct stp_irq_parm *);
173
Heiko Carstensfde15c32012-03-11 11:59:31 -0400174static void timing_alert_interrupt(struct ext_code ext_code,
Martin Schwidefskyf6649a72010-10-25 16:10:38 +0200175 unsigned int param32, unsigned long param64)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200176{
Heiko Carstens420f42e2013-01-02 15:18:18 +0100177 inc_irq_stat(IRQEXT_TLA);
Martin Schwidefskyf6649a72010-10-25 16:10:38 +0200178 if (param32 & 0x00c40000)
179 etr_timing_alert((struct etr_irq_parm *) &param32);
180 if (param32 & 0x00038000)
181 stp_timing_alert((struct stp_irq_parm *) &param32);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200182}
183
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100184static void etr_reset(void);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200185static void stp_reset(void);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100186
Xunlei Pang689911c2015-04-09 09:04:41 +0800187void read_persistent_clock64(struct timespec64 *ts)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100188{
Heiko Carstens1aae0562013-01-30 09:49:40 +0100189 tod_to_timeval(get_tod_clock() - TOD_UNIX_EPOCH, ts);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700190}
Linus Torvalds1da177e2005-04-16 15:20:36 -0700191
Xunlei Pang689911c2015-04-09 09:04:41 +0800192void read_boot_clock64(struct timespec64 *ts)
Martin Schwidefsky23970e32009-08-14 15:47:32 +0200193{
194 tod_to_timeval(sched_clock_base_cc - TOD_UNIX_EPOCH, ts);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700195}
196
Magnus Damm8e196082009-04-21 12:24:00 -0700197static cycle_t read_tod_clock(struct clocksource *cs)
Martin Schwidefskydc64bef2006-10-06 16:38:48 +0200198{
Heiko Carstens1aae0562013-01-30 09:49:40 +0100199 return get_tod_clock();
Martin Schwidefskydc64bef2006-10-06 16:38:48 +0200200}
201
202static struct clocksource clocksource_tod = {
203 .name = "tod",
Christian Borntraegerd2cb0e62007-11-05 11:10:14 +0100204 .rating = 400,
Martin Schwidefskydc64bef2006-10-06 16:38:48 +0200205 .read = read_tod_clock,
206 .mask = -1ULL,
207 .mult = 1000,
208 .shift = 12,
Thomas Gleixnercc02d802007-02-16 01:27:39 -0800209 .flags = CLOCK_SOURCE_IS_CONTINUOUS,
Martin Schwidefskydc64bef2006-10-06 16:38:48 +0200210};
211
Martin Schwidefskyf1b82742009-08-14 15:47:21 +0200212struct clocksource * __init clocksource_default_clock(void)
213{
214 return &clocksource_tod;
215}
Martin Schwidefskydc64bef2006-10-06 16:38:48 +0200216
Martin Schwidefsky79c74ec2013-11-22 10:04:53 +0100217void update_vsyscall(struct timekeeper *tk)
Martin Schwidefskyb0206322008-12-25 13:38:36 +0100218{
Martin Schwidefsky79c74ec2013-11-22 10:04:53 +0100219 u64 nsecps;
220
Peter Zijlstra876e7882015-03-19 10:09:06 +0100221 if (tk->tkr_mono.clock != &clocksource_tod)
Martin Schwidefskyb0206322008-12-25 13:38:36 +0100222 return;
223
224 /* Make userspace gettimeofday spin until we're done. */
225 ++vdso_data->tb_update_count;
226 smp_wmb();
Peter Zijlstra876e7882015-03-19 10:09:06 +0100227 vdso_data->xtime_tod_stamp = tk->tkr_mono.cycle_last;
Martin Schwidefsky79c74ec2013-11-22 10:04:53 +0100228 vdso_data->xtime_clock_sec = tk->xtime_sec;
Peter Zijlstra876e7882015-03-19 10:09:06 +0100229 vdso_data->xtime_clock_nsec = tk->tkr_mono.xtime_nsec;
Martin Schwidefsky79c74ec2013-11-22 10:04:53 +0100230 vdso_data->wtom_clock_sec =
231 tk->xtime_sec + tk->wall_to_monotonic.tv_sec;
Peter Zijlstra876e7882015-03-19 10:09:06 +0100232 vdso_data->wtom_clock_nsec = tk->tkr_mono.xtime_nsec +
233 + ((u64) tk->wall_to_monotonic.tv_nsec << tk->tkr_mono.shift);
234 nsecps = (u64) NSEC_PER_SEC << tk->tkr_mono.shift;
Martin Schwidefsky79c74ec2013-11-22 10:04:53 +0100235 while (vdso_data->wtom_clock_nsec >= nsecps) {
236 vdso_data->wtom_clock_nsec -= nsecps;
237 vdso_data->wtom_clock_sec++;
238 }
Martin Schwidefskyb7eacb52014-08-29 12:31:45 +0200239
240 vdso_data->xtime_coarse_sec = tk->xtime_sec;
241 vdso_data->xtime_coarse_nsec =
Peter Zijlstra876e7882015-03-19 10:09:06 +0100242 (long)(tk->tkr_mono.xtime_nsec >> tk->tkr_mono.shift);
Martin Schwidefskyb7eacb52014-08-29 12:31:45 +0200243 vdso_data->wtom_coarse_sec =
244 vdso_data->xtime_coarse_sec + tk->wall_to_monotonic.tv_sec;
245 vdso_data->wtom_coarse_nsec =
246 vdso_data->xtime_coarse_nsec + tk->wall_to_monotonic.tv_nsec;
247 while (vdso_data->wtom_coarse_nsec >= NSEC_PER_SEC) {
248 vdso_data->wtom_coarse_nsec -= NSEC_PER_SEC;
249 vdso_data->wtom_coarse_sec++;
250 }
251
Peter Zijlstra876e7882015-03-19 10:09:06 +0100252 vdso_data->tk_mult = tk->tkr_mono.mult;
253 vdso_data->tk_shift = tk->tkr_mono.shift;
Martin Schwidefskyb0206322008-12-25 13:38:36 +0100254 smp_wmb();
255 ++vdso_data->tb_update_count;
256}
257
258extern struct timezone sys_tz;
259
260void update_vsyscall_tz(void)
261{
262 /* Make userspace gettimeofday spin until we're done. */
263 ++vdso_data->tb_update_count;
264 smp_wmb();
265 vdso_data->tz_minuteswest = sys_tz.tz_minuteswest;
266 vdso_data->tz_dsttime = sys_tz.tz_dsttime;
267 smp_wmb();
268 ++vdso_data->tb_update_count;
269}
270
Linus Torvalds1da177e2005-04-16 15:20:36 -0700271/*
272 * Initialize the TOD clock and the CPU timer of
273 * the boot cpu.
274 */
275void __init time_init(void)
276{
Martin Schwidefskyb6112cc2009-04-14 15:36:28 +0200277 /* Reset time synchronization interfaces. */
278 etr_reset();
279 stp_reset();
Linus Torvalds1da177e2005-04-16 15:20:36 -0700280
Linus Torvalds1da177e2005-04-16 15:20:36 -0700281 /* request the clock comparator external interrupt */
Thomas Huth1dad0932014-03-31 15:24:08 +0200282 if (register_external_irq(EXT_IRQ_CLK_COMP, clock_comparator_interrupt))
283 panic("Couldn't request external interrupt 0x1004");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700284
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200285 /* request the timing alert external interrupt */
Thomas Huth1dad0932014-03-31 15:24:08 +0200286 if (register_external_irq(EXT_IRQ_TIMING_ALERT, timing_alert_interrupt))
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100287 panic("Couldn't request external interrupt 0x1406");
288
John Stultzf8935982015-03-11 21:16:37 -0700289 if (__clocksource_register(&clocksource_tod) != 0)
Martin Schwidefskyab96e792009-04-14 15:36:29 +0200290 panic("Could not register TOD clock source");
291
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100292 /* Enable TOD clock interrupts on the boot cpu. */
293 init_cpu_timer();
Martin Schwidefskyab96e792009-04-14 15:36:29 +0200294
Martin Schwidefskyc185b782008-12-25 13:39:25 +0100295 /* Enable cpu timer interrupts on the boot cpu. */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700296 vtime_init();
Linus Torvalds1da177e2005-04-16 15:20:36 -0700297}
298
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100299/*
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200300 * The time is "clock". old is what we think the time is.
301 * Adjust the value by a multiple of jiffies and add the delta to ntp.
302 * "delay" is an approximation how long the synchronization took. If
303 * the time correction is positive, then "delay" is subtracted from
304 * the time difference and only the remaining part is passed to ntp.
305 */
306static unsigned long long adjust_time(unsigned long long old,
307 unsigned long long clock,
308 unsigned long long delay)
309{
310 unsigned long long delta, ticks;
311 struct timex adjust;
312
313 if (clock > old) {
314 /* It is later than we thought. */
315 delta = ticks = clock - old;
316 delta = ticks = (delta < delay) ? 0 : delta - delay;
317 delta -= do_div(ticks, CLK_TICKS_PER_JIFFY);
318 adjust.offset = ticks * (1000000 / HZ);
319 } else {
320 /* It is earlier than we thought. */
321 delta = ticks = old - clock;
322 delta -= do_div(ticks, CLK_TICKS_PER_JIFFY);
323 delta = -delta;
324 adjust.offset = -ticks * (1000000 / HZ);
325 }
Christian Borntraeger8107d822008-11-27 11:05:56 +0100326 sched_clock_base_cc += delta;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200327 if (adjust.offset != 0) {
Martin Schwidefskyfeab6502008-12-25 13:39:38 +0100328 pr_notice("The ETR interface has adjusted the clock "
329 "by %li microseconds\n", adjust.offset);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200330 adjust.modes = ADJ_OFFSET_SINGLESHOT;
331 do_adjtimex(&adjust);
332 }
333 return delta;
334}
335
336static DEFINE_PER_CPU(atomic_t, clock_sync_word);
Martin Schwidefsky8283cb42009-03-26 15:24:21 +0100337static DEFINE_MUTEX(clock_sync_mutex);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200338static unsigned long clock_sync_flags;
339
340#define CLOCK_SYNC_HAS_ETR 0
341#define CLOCK_SYNC_HAS_STP 1
342#define CLOCK_SYNC_ETR 2
343#define CLOCK_SYNC_STP 3
344
345/*
346 * The synchronous get_clock function. It will write the current clock
347 * value to the clock pointer and return 0 if the clock is in sync with
348 * the external time source. If the clock mode is local it will return
Heiko Carstensa8f6db42012-09-06 15:13:34 +0200349 * -EOPNOTSUPP and -EAGAIN if the clock is not in sync with the external
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200350 * reference.
351 */
352int get_sync_clock(unsigned long long *clock)
353{
354 atomic_t *sw_ptr;
355 unsigned int sw0, sw1;
356
357 sw_ptr = &get_cpu_var(clock_sync_word);
358 sw0 = atomic_read(sw_ptr);
Heiko Carstens1aae0562013-01-30 09:49:40 +0100359 *clock = get_tod_clock();
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200360 sw1 = atomic_read(sw_ptr);
Heiko Carstensbd119ee2009-12-07 12:52:14 +0100361 put_cpu_var(clock_sync_word);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200362 if (sw0 == sw1 && (sw0 & 0x80000000U))
363 /* Success: time is in sync. */
364 return 0;
365 if (!test_bit(CLOCK_SYNC_HAS_ETR, &clock_sync_flags) &&
366 !test_bit(CLOCK_SYNC_HAS_STP, &clock_sync_flags))
Heiko Carstensa8f6db42012-09-06 15:13:34 +0200367 return -EOPNOTSUPP;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200368 if (!test_bit(CLOCK_SYNC_ETR, &clock_sync_flags) &&
369 !test_bit(CLOCK_SYNC_STP, &clock_sync_flags))
370 return -EACCES;
371 return -EAGAIN;
372}
373EXPORT_SYMBOL(get_sync_clock);
374
375/*
376 * Make get_sync_clock return -EAGAIN.
377 */
378static void disable_sync_clock(void *dummy)
379{
Christoph Lametereb7e7d72014-08-17 12:30:45 -0500380 atomic_t *sw_ptr = this_cpu_ptr(&clock_sync_word);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200381 /*
382 * Clear the in-sync bit 2^31. All get_sync_clock calls will
383 * fail until the sync bit is turned back on. In addition
384 * increase the "sequence" counter to avoid the race of an
385 * etr event and the complete recovery against get_sync_clock.
386 */
387 atomic_clear_mask(0x80000000, sw_ptr);
388 atomic_inc(sw_ptr);
389}
390
391/*
392 * Make get_sync_clock return 0 again.
393 * Needs to be called from a context disabled for preemption.
394 */
395static void enable_sync_clock(void)
396{
Christoph Lametereb7e7d72014-08-17 12:30:45 -0500397 atomic_t *sw_ptr = this_cpu_ptr(&clock_sync_word);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200398 atomic_set_mask(0x80000000, sw_ptr);
399}
400
Martin Schwidefsky8283cb42009-03-26 15:24:21 +0100401/*
402 * Function to check if the clock is in sync.
403 */
404static inline int check_sync_clock(void)
405{
406 atomic_t *sw_ptr;
407 int rc;
408
409 sw_ptr = &get_cpu_var(clock_sync_word);
410 rc = (atomic_read(sw_ptr) & 0x80000000U) != 0;
Heiko Carstensbd119ee2009-12-07 12:52:14 +0100411 put_cpu_var(clock_sync_word);
Martin Schwidefsky8283cb42009-03-26 15:24:21 +0100412 return rc;
413}
414
Heiko Carstens750887d2008-12-25 13:38:37 +0100415/* Single threaded workqueue used for etr and stp sync events */
416static struct workqueue_struct *time_sync_wq;
417
418static void __init time_init_wq(void)
419{
Heiko Carstens179cb812009-01-23 16:40:26 +0100420 if (time_sync_wq)
421 return;
422 time_sync_wq = create_singlethread_workqueue("timesync");
Heiko Carstens750887d2008-12-25 13:38:37 +0100423}
424
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200425/*
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100426 * External Time Reference (ETR) code.
427 */
428static int etr_port0_online;
429static int etr_port1_online;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200430static int etr_steai_available;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100431
432static int __init early_parse_etr(char *p)
433{
434 if (strncmp(p, "off", 3) == 0)
435 etr_port0_online = etr_port1_online = 0;
436 else if (strncmp(p, "port0", 5) == 0)
437 etr_port0_online = 1;
438 else if (strncmp(p, "port1", 5) == 0)
439 etr_port1_online = 1;
440 else if (strncmp(p, "on", 2) == 0)
441 etr_port0_online = etr_port1_online = 1;
442 return 0;
443}
444early_param("etr", early_parse_etr);
445
446enum etr_event {
447 ETR_EVENT_PORT0_CHANGE,
448 ETR_EVENT_PORT1_CHANGE,
449 ETR_EVENT_PORT_ALERT,
450 ETR_EVENT_SYNC_CHECK,
451 ETR_EVENT_SWITCH_LOCAL,
452 ETR_EVENT_UPDATE,
453};
454
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100455/*
456 * Valid bit combinations of the eacr register are (x = don't care):
457 * e0 e1 dp p0 p1 ea es sl
458 * 0 0 x 0 0 0 0 0 initial, disabled state
459 * 0 0 x 0 1 1 0 0 port 1 online
460 * 0 0 x 1 0 1 0 0 port 0 online
461 * 0 0 x 1 1 1 0 0 both ports online
462 * 0 1 x 0 1 1 0 0 port 1 online and usable, ETR or PPS mode
463 * 0 1 x 0 1 1 0 1 port 1 online, usable and ETR mode
464 * 0 1 x 0 1 1 1 0 port 1 online, usable, PPS mode, in-sync
465 * 0 1 x 0 1 1 1 1 port 1 online, usable, ETR mode, in-sync
466 * 0 1 x 1 1 1 0 0 both ports online, port 1 usable
467 * 0 1 x 1 1 1 1 0 both ports online, port 1 usable, PPS mode, in-sync
468 * 0 1 x 1 1 1 1 1 both ports online, port 1 usable, ETR mode, in-sync
469 * 1 0 x 1 0 1 0 0 port 0 online and usable, ETR or PPS mode
470 * 1 0 x 1 0 1 0 1 port 0 online, usable and ETR mode
471 * 1 0 x 1 0 1 1 0 port 0 online, usable, PPS mode, in-sync
472 * 1 0 x 1 0 1 1 1 port 0 online, usable, ETR mode, in-sync
473 * 1 0 x 1 1 1 0 0 both ports online, port 0 usable
474 * 1 0 x 1 1 1 1 0 both ports online, port 0 usable, PPS mode, in-sync
475 * 1 0 x 1 1 1 1 1 both ports online, port 0 usable, ETR mode, in-sync
476 * 1 1 x 1 1 1 1 0 both ports online & usable, ETR, in-sync
477 * 1 1 x 1 1 1 1 1 both ports online & usable, ETR, in-sync
478 */
479static struct etr_eacr etr_eacr;
480static u64 etr_tolec; /* time of last eacr update */
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100481static struct etr_aib etr_port0;
482static int etr_port0_uptodate;
483static struct etr_aib etr_port1;
484static int etr_port1_uptodate;
485static unsigned long etr_events;
486static struct timer_list etr_timer;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100487
488static void etr_timeout(unsigned long dummy);
Martin Schwidefskyecdcc022007-04-27 16:01:58 +0200489static void etr_work_fn(struct work_struct *work);
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +0100490static DEFINE_MUTEX(etr_work_mutex);
Martin Schwidefskyecdcc022007-04-27 16:01:58 +0200491static DECLARE_WORK(etr_work, etr_work_fn);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100492
493/*
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100494 * Reset ETR attachment.
495 */
496static void etr_reset(void)
497{
498 etr_eacr = (struct etr_eacr) {
499 .e0 = 0, .e1 = 0, ._pad0 = 4, .dp = 0,
500 .p0 = 0, .p1 = 0, ._pad1 = 0, .ea = 0,
501 .es = 0, .sl = 0 };
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200502 if (etr_setr(&etr_eacr) == 0) {
Heiko Carstens1aae0562013-01-30 09:49:40 +0100503 etr_tolec = get_tod_clock();
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200504 set_bit(CLOCK_SYNC_HAS_ETR, &clock_sync_flags);
Martin Schwidefsky8283cb42009-03-26 15:24:21 +0100505 if (etr_port0_online && etr_port1_online)
506 set_bit(CLOCK_SYNC_ETR, &clock_sync_flags);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200507 } else if (etr_port0_online || etr_port1_online) {
Martin Schwidefskyfeab6502008-12-25 13:39:38 +0100508 pr_warning("The real or virtual hardware system does "
509 "not provide an ETR interface\n");
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200510 etr_port0_online = etr_port1_online = 0;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100511 }
512}
513
Martin Schwidefskyecdcc022007-04-27 16:01:58 +0200514static int __init etr_init(void)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100515{
516 struct etr_aib aib;
517
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200518 if (!test_bit(CLOCK_SYNC_HAS_ETR, &clock_sync_flags))
Martin Schwidefskyecdcc022007-04-27 16:01:58 +0200519 return 0;
Heiko Carstens750887d2008-12-25 13:38:37 +0100520 time_init_wq();
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100521 /* Check if this machine has the steai instruction. */
522 if (etr_steai(&aib, ETR_STEAI_STEPPING_PORT) == 0)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200523 etr_steai_available = 1;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100524 setup_timer(&etr_timer, etr_timeout, 0UL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100525 if (etr_port0_online) {
526 set_bit(ETR_EVENT_PORT0_CHANGE, &etr_events);
Heiko Carstens750887d2008-12-25 13:38:37 +0100527 queue_work(time_sync_wq, &etr_work);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100528 }
529 if (etr_port1_online) {
530 set_bit(ETR_EVENT_PORT1_CHANGE, &etr_events);
Heiko Carstens750887d2008-12-25 13:38:37 +0100531 queue_work(time_sync_wq, &etr_work);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100532 }
Martin Schwidefskyecdcc022007-04-27 16:01:58 +0200533 return 0;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100534}
535
Martin Schwidefskyecdcc022007-04-27 16:01:58 +0200536arch_initcall(etr_init);
537
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100538/*
539 * Two sorts of ETR machine checks. The architecture reads:
540 * "When a machine-check niterruption occurs and if a switch-to-local or
541 * ETR-sync-check interrupt request is pending but disabled, this pending
542 * disabled interruption request is indicated and is cleared".
543 * Which means that we can get etr_switch_to_local events from the machine
544 * check handler although the interruption condition is disabled. Lovely..
545 */
546
547/*
548 * Switch to local machine check. This is called when the last usable
549 * ETR port goes inactive. After switch to local the clock is not in sync.
550 */
551void etr_switch_to_local(void)
552{
553 if (!etr_eacr.sl)
554 return;
Martin Schwidefsky8283cb42009-03-26 15:24:21 +0100555 disable_sync_clock(NULL);
Martin Schwidefsky33fea792010-07-27 19:29:38 +0200556 if (!test_and_set_bit(ETR_EVENT_SWITCH_LOCAL, &etr_events)) {
557 etr_eacr.es = etr_eacr.sl = 0;
558 etr_setr(&etr_eacr);
559 queue_work(time_sync_wq, &etr_work);
560 }
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100561}
562
563/*
564 * ETR sync check machine check. This is called when the ETR OTE and the
565 * local clock OTE are farther apart than the ETR sync check tolerance.
566 * After a ETR sync check the clock is not in sync. The machine check
567 * is broadcasted to all cpus at the same time.
568 */
569void etr_sync_check(void)
570{
571 if (!etr_eacr.es)
572 return;
Martin Schwidefsky8283cb42009-03-26 15:24:21 +0100573 disable_sync_clock(NULL);
Martin Schwidefsky33fea792010-07-27 19:29:38 +0200574 if (!test_and_set_bit(ETR_EVENT_SYNC_CHECK, &etr_events)) {
575 etr_eacr.es = 0;
576 etr_setr(&etr_eacr);
577 queue_work(time_sync_wq, &etr_work);
578 }
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100579}
580
581/*
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200582 * ETR timing alert. There are two causes:
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100583 * 1) port state change, check the usability of the port
584 * 2) port alert, one of the ETR-data-validity bits (v1-v2 bits of the
585 * sldr-status word) or ETR-data word 1 (edf1) or ETR-data word 3 (edf3)
586 * or ETR-data word 4 (edf4) has changed.
587 */
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200588static void etr_timing_alert(struct etr_irq_parm *intparm)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100589{
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100590 if (intparm->pc0)
591 /* ETR port 0 state change. */
592 set_bit(ETR_EVENT_PORT0_CHANGE, &etr_events);
593 if (intparm->pc1)
594 /* ETR port 1 state change. */
595 set_bit(ETR_EVENT_PORT1_CHANGE, &etr_events);
596 if (intparm->eai)
597 /*
598 * ETR port alert on either port 0, 1 or both.
599 * Both ports are not up-to-date now.
600 */
601 set_bit(ETR_EVENT_PORT_ALERT, &etr_events);
Heiko Carstens750887d2008-12-25 13:38:37 +0100602 queue_work(time_sync_wq, &etr_work);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100603}
604
605static void etr_timeout(unsigned long dummy)
606{
607 set_bit(ETR_EVENT_UPDATE, &etr_events);
Heiko Carstens750887d2008-12-25 13:38:37 +0100608 queue_work(time_sync_wq, &etr_work);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100609}
610
611/*
612 * Check if the etr mode is pss.
613 */
614static inline int etr_mode_is_pps(struct etr_eacr eacr)
615{
616 return eacr.es && !eacr.sl;
617}
618
619/*
620 * Check if the etr mode is etr.
621 */
622static inline int etr_mode_is_etr(struct etr_eacr eacr)
623{
624 return eacr.es && eacr.sl;
625}
626
627/*
628 * Check if the port can be used for TOD synchronization.
629 * For PPS mode the port has to receive OTEs. For ETR mode
630 * the port has to receive OTEs, the ETR stepping bit has to
631 * be zero and the validity bits for data frame 1, 2, and 3
632 * have to be 1.
633 */
634static int etr_port_valid(struct etr_aib *aib, int port)
635{
636 unsigned int psc;
637
638 /* Check that this port is receiving OTEs. */
639 if (aib->tsp == 0)
640 return 0;
641
642 psc = port ? aib->esw.psc1 : aib->esw.psc0;
643 if (psc == etr_lpsc_pps_mode)
644 return 1;
645 if (psc == etr_lpsc_operational_step)
646 return !aib->esw.y && aib->slsw.v1 &&
647 aib->slsw.v2 && aib->slsw.v3;
648 return 0;
649}
650
651/*
652 * Check if two ports are on the same network.
653 */
654static int etr_compare_network(struct etr_aib *aib1, struct etr_aib *aib2)
655{
656 // FIXME: any other fields we have to compare?
657 return aib1->edf1.net_id == aib2->edf1.net_id;
658}
659
660/*
661 * Wrapper for etr_stei that converts physical port states
662 * to logical port states to be consistent with the output
663 * of stetr (see etr_psc vs. etr_lpsc).
664 */
665static void etr_steai_cv(struct etr_aib *aib, unsigned int func)
666{
667 BUG_ON(etr_steai(aib, func) != 0);
668 /* Convert port state to logical port state. */
669 if (aib->esw.psc0 == 1)
670 aib->esw.psc0 = 2;
671 else if (aib->esw.psc0 == 0 && aib->esw.p == 0)
672 aib->esw.psc0 = 1;
673 if (aib->esw.psc1 == 1)
674 aib->esw.psc1 = 2;
675 else if (aib->esw.psc1 == 0 && aib->esw.p == 1)
676 aib->esw.psc1 = 1;
677}
678
679/*
680 * Check if the aib a2 is still connected to the same attachment as
681 * aib a1, the etv values differ by one and a2 is valid.
682 */
683static int etr_aib_follows(struct etr_aib *a1, struct etr_aib *a2, int p)
684{
685 int state_a1, state_a2;
686
687 /* Paranoia check: e0/e1 should better be the same. */
688 if (a1->esw.eacr.e0 != a2->esw.eacr.e0 ||
689 a1->esw.eacr.e1 != a2->esw.eacr.e1)
690 return 0;
691
692 /* Still connected to the same etr ? */
693 state_a1 = p ? a1->esw.psc1 : a1->esw.psc0;
694 state_a2 = p ? a2->esw.psc1 : a2->esw.psc0;
695 if (state_a1 == etr_lpsc_operational_step) {
696 if (state_a2 != etr_lpsc_operational_step ||
697 a1->edf1.net_id != a2->edf1.net_id ||
698 a1->edf1.etr_id != a2->edf1.etr_id ||
699 a1->edf1.etr_pn != a2->edf1.etr_pn)
700 return 0;
701 } else if (state_a2 != etr_lpsc_pps_mode)
702 return 0;
703
704 /* The ETV value of a2 needs to be ETV of a1 + 1. */
705 if (a1->edf2.etv + 1 != a2->edf2.etv)
706 return 0;
707
708 if (!etr_port_valid(a2, p))
709 return 0;
710
711 return 1;
712}
713
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200714struct clock_sync_data {
Heiko Carstens750887d2008-12-25 13:38:37 +0100715 atomic_t cpus;
Heiko Carstens5a62b192008-04-17 07:46:25 +0200716 int in_sync;
717 unsigned long long fixup_cc;
Heiko Carstens750887d2008-12-25 13:38:37 +0100718 int etr_port;
719 struct etr_aib *etr_aib;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200720};
Heiko Carstens5a62b192008-04-17 07:46:25 +0200721
Heiko Carstens750887d2008-12-25 13:38:37 +0100722static void clock_sync_cpu(struct clock_sync_data *sync)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100723{
Heiko Carstens750887d2008-12-25 13:38:37 +0100724 atomic_dec(&sync->cpus);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200725 enable_sync_clock();
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100726 /*
727 * This looks like a busy wait loop but it isn't. etr_sync_cpus
728 * is called on all other cpus while the TOD clocks is stopped.
729 * __udelay will stop the cpu on an enabled wait psw until the
730 * TOD is running again.
731 */
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200732 while (sync->in_sync == 0) {
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100733 __udelay(1);
Heiko Carstens6c732de2007-02-21 10:55:15 +0100734 /*
735 * A different cpu changes *in_sync. Therefore use
736 * barrier() to force memory access.
737 */
738 barrier();
739 }
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200740 if (sync->in_sync != 1)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100741 /* Didn't work. Clear per-cpu in sync bit again. */
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200742 disable_sync_clock(NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100743 /*
744 * This round of TOD syncing is done. Set the clock comparator
745 * to the next tick and let the processor continue.
746 */
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200747 fixup_clock_comparator(sync->fixup_cc);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100748}
749
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100750/*
Lucas De Marchi25985ed2011-03-30 22:57:33 -0300751 * Sync the TOD clock using the port referred to by aibp. This port
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100752 * has to be enabled and the other port has to be disabled. The
753 * last eacr update has to be more than 1.6 seconds in the past.
754 */
Heiko Carstens750887d2008-12-25 13:38:37 +0100755static int etr_sync_clock(void *data)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100756{
Heiko Carstens750887d2008-12-25 13:38:37 +0100757 static int first;
Fan Zhangfdf03652015-05-13 10:58:41 +0200758 unsigned long long clock, old_clock, clock_delta, delay, delta;
Heiko Carstens750887d2008-12-25 13:38:37 +0100759 struct clock_sync_data *etr_sync;
760 struct etr_aib *sync_port, *aib;
761 int port;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100762 int rc;
763
Heiko Carstens750887d2008-12-25 13:38:37 +0100764 etr_sync = data;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100765
Heiko Carstens750887d2008-12-25 13:38:37 +0100766 if (xchg(&first, 1) == 1) {
767 /* Slave */
768 clock_sync_cpu(etr_sync);
769 return 0;
770 }
771
772 /* Wait until all other cpus entered the sync function. */
773 while (atomic_read(&etr_sync->cpus) != 0)
774 cpu_relax();
775
776 port = etr_sync->etr_port;
777 aib = etr_sync->etr_aib;
778 sync_port = (port == 0) ? &etr_port0 : &etr_port1;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200779 enable_sync_clock();
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100780
781 /* Set clock to next OTE. */
782 __ctl_set_bit(14, 21);
783 __ctl_set_bit(0, 29);
784 clock = ((unsigned long long) (aib->edf2.etv + 1)) << 32;
Heiko Carstens1aae0562013-01-30 09:49:40 +0100785 old_clock = get_tod_clock();
786 if (set_tod_clock(clock) == 0) {
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100787 __udelay(1); /* Wait for the clock to start. */
788 __ctl_clear_bit(0, 29);
789 __ctl_clear_bit(14, 21);
790 etr_stetr(aib);
791 /* Adjust Linux timing variables. */
792 delay = (unsigned long long)
793 (aib->edf2.etv - sync_port->edf2.etv) << 32;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200794 delta = adjust_time(old_clock, clock, delay);
Fan Zhangfdf03652015-05-13 10:58:41 +0200795 clock_delta = clock - old_clock;
796 atomic_notifier_call_chain(&s390_epoch_delta_notifier, 0,
797 &clock_delta);
Heiko Carstens750887d2008-12-25 13:38:37 +0100798 etr_sync->fixup_cc = delta;
Heiko Carstens5a62b192008-04-17 07:46:25 +0200799 fixup_clock_comparator(delta);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100800 /* Verify that the clock is properly set. */
801 if (!etr_aib_follows(sync_port, aib, port)) {
802 /* Didn't work. */
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200803 disable_sync_clock(NULL);
Heiko Carstens750887d2008-12-25 13:38:37 +0100804 etr_sync->in_sync = -EAGAIN;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100805 rc = -EAGAIN;
806 } else {
Heiko Carstens750887d2008-12-25 13:38:37 +0100807 etr_sync->in_sync = 1;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100808 rc = 0;
809 }
810 } else {
811 /* Could not set the clock ?!? */
812 __ctl_clear_bit(0, 29);
813 __ctl_clear_bit(14, 21);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200814 disable_sync_clock(NULL);
Heiko Carstens750887d2008-12-25 13:38:37 +0100815 etr_sync->in_sync = -EAGAIN;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100816 rc = -EAGAIN;
817 }
Heiko Carstens750887d2008-12-25 13:38:37 +0100818 xchg(&first, 0);
819 return rc;
820}
821
822static int etr_sync_clock_stop(struct etr_aib *aib, int port)
823{
824 struct clock_sync_data etr_sync;
825 struct etr_aib *sync_port;
826 int follows;
827 int rc;
828
829 /* Check if the current aib is adjacent to the sync port aib. */
830 sync_port = (port == 0) ? &etr_port0 : &etr_port1;
831 follows = etr_aib_follows(sync_port, aib, port);
832 memcpy(sync_port, aib, sizeof(*aib));
833 if (!follows)
834 return -EAGAIN;
835 memset(&etr_sync, 0, sizeof(etr_sync));
836 etr_sync.etr_aib = aib;
837 etr_sync.etr_port = port;
838 get_online_cpus();
839 atomic_set(&etr_sync.cpus, num_online_cpus() - 1);
KOSAKI Motohiro0f1959f2011-05-23 10:24:36 +0200840 rc = stop_machine(etr_sync_clock, &etr_sync, cpu_online_mask);
Heiko Carstens750887d2008-12-25 13:38:37 +0100841 put_online_cpus();
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100842 return rc;
843}
844
845/*
846 * Handle the immediate effects of the different events.
847 * The port change event is used for online/offline changes.
848 */
849static struct etr_eacr etr_handle_events(struct etr_eacr eacr)
850{
851 if (test_and_clear_bit(ETR_EVENT_SYNC_CHECK, &etr_events))
852 eacr.es = 0;
853 if (test_and_clear_bit(ETR_EVENT_SWITCH_LOCAL, &etr_events))
854 eacr.es = eacr.sl = 0;
855 if (test_and_clear_bit(ETR_EVENT_PORT_ALERT, &etr_events))
856 etr_port0_uptodate = etr_port1_uptodate = 0;
857
858 if (test_and_clear_bit(ETR_EVENT_PORT0_CHANGE, &etr_events)) {
859 if (eacr.e0)
860 /*
861 * Port change of an enabled port. We have to
862 * assume that this can have caused an stepping
863 * port switch.
864 */
Heiko Carstens1aae0562013-01-30 09:49:40 +0100865 etr_tolec = get_tod_clock();
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100866 eacr.p0 = etr_port0_online;
867 if (!eacr.p0)
868 eacr.e0 = 0;
869 etr_port0_uptodate = 0;
870 }
871 if (test_and_clear_bit(ETR_EVENT_PORT1_CHANGE, &etr_events)) {
872 if (eacr.e1)
873 /*
874 * Port change of an enabled port. We have to
875 * assume that this can have caused an stepping
876 * port switch.
877 */
Heiko Carstens1aae0562013-01-30 09:49:40 +0100878 etr_tolec = get_tod_clock();
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100879 eacr.p1 = etr_port1_online;
880 if (!eacr.p1)
881 eacr.e1 = 0;
882 etr_port1_uptodate = 0;
883 }
884 clear_bit(ETR_EVENT_UPDATE, &etr_events);
885 return eacr;
886}
887
888/*
889 * Set up a timer that expires after the etr_tolec + 1.6 seconds if
890 * one of the ports needs an update.
891 */
892static void etr_set_tolec_timeout(unsigned long long now)
893{
894 unsigned long micros;
895
896 if ((!etr_eacr.p0 || etr_port0_uptodate) &&
897 (!etr_eacr.p1 || etr_port1_uptodate))
898 return;
899 micros = (now > etr_tolec) ? ((now - etr_tolec) >> 12) : 0;
900 micros = (micros > 1600000) ? 0 : 1600000 - micros;
901 mod_timer(&etr_timer, jiffies + (micros * HZ) / 1000000 + 1);
902}
903
904/*
905 * Set up a time that expires after 1/2 second.
906 */
907static void etr_set_sync_timeout(void)
908{
909 mod_timer(&etr_timer, jiffies + HZ/2);
910}
911
912/*
913 * Update the aib information for one or both ports.
914 */
915static struct etr_eacr etr_handle_update(struct etr_aib *aib,
916 struct etr_eacr eacr)
917{
918 /* With both ports disabled the aib information is useless. */
919 if (!eacr.e0 && !eacr.e1)
920 return eacr;
921
Martin Schwidefskyecdcc022007-04-27 16:01:58 +0200922 /* Update port0 or port1 with aib stored in etr_work_fn. */
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100923 if (aib->esw.q == 0) {
924 /* Information for port 0 stored. */
925 if (eacr.p0 && !etr_port0_uptodate) {
926 etr_port0 = *aib;
927 if (etr_port0_online)
928 etr_port0_uptodate = 1;
929 }
930 } else {
931 /* Information for port 1 stored. */
932 if (eacr.p1 && !etr_port1_uptodate) {
933 etr_port1 = *aib;
934 if (etr_port0_online)
935 etr_port1_uptodate = 1;
936 }
937 }
938
939 /*
940 * Do not try to get the alternate port aib if the clock
941 * is not in sync yet.
942 */
Martin Schwidefsky33fea792010-07-27 19:29:38 +0200943 if (!eacr.es || !check_sync_clock())
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100944 return eacr;
945
946 /*
947 * If steai is available we can get the information about
948 * the other port immediately. If only stetr is available the
949 * data-port bit toggle has to be used.
950 */
Martin Schwidefskyd2fec592008-07-14 09:58:56 +0200951 if (etr_steai_available) {
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100952 if (eacr.p0 && !etr_port0_uptodate) {
953 etr_steai_cv(&etr_port0, ETR_STEAI_PORT_0);
954 etr_port0_uptodate = 1;
955 }
956 if (eacr.p1 && !etr_port1_uptodate) {
957 etr_steai_cv(&etr_port1, ETR_STEAI_PORT_1);
958 etr_port1_uptodate = 1;
959 }
960 } else {
961 /*
962 * One port was updated above, if the other
963 * port is not uptodate toggle dp bit.
964 */
965 if ((eacr.p0 && !etr_port0_uptodate) ||
966 (eacr.p1 && !etr_port1_uptodate))
967 eacr.dp ^= 1;
968 else
969 eacr.dp = 0;
970 }
971 return eacr;
972}
973
974/*
975 * Write new etr control register if it differs from the current one.
976 * Return 1 if etr_tolec has been updated as well.
977 */
978static void etr_update_eacr(struct etr_eacr eacr)
979{
980 int dp_changed;
981
982 if (memcmp(&etr_eacr, &eacr, sizeof(eacr)) == 0)
983 /* No change, return. */
984 return;
985 /*
986 * The disable of an active port of the change of the data port
987 * bit can/will cause a change in the data port.
988 */
989 dp_changed = etr_eacr.e0 > eacr.e0 || etr_eacr.e1 > eacr.e1 ||
990 (etr_eacr.dp ^ eacr.dp) != 0;
991 etr_eacr = eacr;
992 etr_setr(&etr_eacr);
993 if (dp_changed)
Heiko Carstens1aae0562013-01-30 09:49:40 +0100994 etr_tolec = get_tod_clock();
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100995}
996
997/*
Heiko Carstens750887d2008-12-25 13:38:37 +0100998 * ETR work. In this function you'll find the main logic. In
Martin Schwidefskyd54853e2007-02-05 21:18:19 +0100999 * particular this is the only function that calls etr_update_eacr(),
1000 * it "controls" the etr control register.
1001 */
Martin Schwidefskyecdcc022007-04-27 16:01:58 +02001002static void etr_work_fn(struct work_struct *work)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001003{
1004 unsigned long long now;
1005 struct etr_eacr eacr;
1006 struct etr_aib aib;
1007 int sync_port;
1008
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001009 /* prevent multiple execution. */
1010 mutex_lock(&etr_work_mutex);
1011
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001012 /* Create working copy of etr_eacr. */
1013 eacr = etr_eacr;
1014
1015 /* Check for the different events and their immediate effects. */
1016 eacr = etr_handle_events(eacr);
1017
1018 /* Check if ETR is supposed to be active. */
1019 eacr.ea = eacr.p0 || eacr.p1;
1020 if (!eacr.ea) {
1021 /* Both ports offline. Reset everything. */
1022 eacr.dp = eacr.es = eacr.sl = 0;
Ingo Molnar1a781a72008-07-15 21:55:59 +02001023 on_each_cpu(disable_sync_clock, NULL, 1);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001024 del_timer_sync(&etr_timer);
1025 etr_update_eacr(eacr);
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001026 goto out_unlock;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001027 }
1028
1029 /* Store aib to get the current ETR status word. */
1030 BUG_ON(etr_stetr(&aib) != 0);
1031 etr_port0.esw = etr_port1.esw = aib.esw; /* Copy status word. */
Heiko Carstens1aae0562013-01-30 09:49:40 +01001032 now = get_tod_clock();
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001033
1034 /*
1035 * Update the port information if the last stepping port change
1036 * or data port change is older than 1.6 seconds.
1037 */
1038 if (now >= etr_tolec + (1600000 << 12))
1039 eacr = etr_handle_update(&aib, eacr);
1040
1041 /*
Lucas De Marchi25985ed2011-03-30 22:57:33 -03001042 * Select ports to enable. The preferred synchronization mode is PPS.
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001043 * If a port can be enabled depends on a number of things:
1044 * 1) The port needs to be online and uptodate. A port is not
1045 * disabled just because it is not uptodate, but it is only
1046 * enabled if it is uptodate.
1047 * 2) The port needs to have the same mode (pps / etr).
1048 * 3) The port needs to be usable -> etr_port_valid() == 1
1049 * 4) To enable the second port the clock needs to be in sync.
1050 * 5) If both ports are useable and are ETR ports, the network id
1051 * has to be the same.
1052 * The eacr.sl bit is used to indicate etr mode vs. pps mode.
1053 */
1054 if (eacr.p0 && aib.esw.psc0 == etr_lpsc_pps_mode) {
1055 eacr.sl = 0;
1056 eacr.e0 = 1;
1057 if (!etr_mode_is_pps(etr_eacr))
1058 eacr.es = 0;
1059 if (!eacr.es || !eacr.p1 || aib.esw.psc1 != etr_lpsc_pps_mode)
1060 eacr.e1 = 0;
1061 // FIXME: uptodate checks ?
1062 else if (etr_port0_uptodate && etr_port1_uptodate)
1063 eacr.e1 = 1;
1064 sync_port = (etr_port0_uptodate &&
1065 etr_port_valid(&etr_port0, 0)) ? 0 : -1;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001066 } else if (eacr.p1 && aib.esw.psc1 == etr_lpsc_pps_mode) {
1067 eacr.sl = 0;
1068 eacr.e0 = 0;
1069 eacr.e1 = 1;
1070 if (!etr_mode_is_pps(etr_eacr))
1071 eacr.es = 0;
1072 sync_port = (etr_port1_uptodate &&
1073 etr_port_valid(&etr_port1, 1)) ? 1 : -1;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001074 } else if (eacr.p0 && aib.esw.psc0 == etr_lpsc_operational_step) {
1075 eacr.sl = 1;
1076 eacr.e0 = 1;
1077 if (!etr_mode_is_etr(etr_eacr))
1078 eacr.es = 0;
1079 if (!eacr.es || !eacr.p1 ||
1080 aib.esw.psc1 != etr_lpsc_operational_alt)
1081 eacr.e1 = 0;
1082 else if (etr_port0_uptodate && etr_port1_uptodate &&
1083 etr_compare_network(&etr_port0, &etr_port1))
1084 eacr.e1 = 1;
1085 sync_port = (etr_port0_uptodate &&
1086 etr_port_valid(&etr_port0, 0)) ? 0 : -1;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001087 } else if (eacr.p1 && aib.esw.psc1 == etr_lpsc_operational_step) {
1088 eacr.sl = 1;
1089 eacr.e0 = 0;
1090 eacr.e1 = 1;
1091 if (!etr_mode_is_etr(etr_eacr))
1092 eacr.es = 0;
1093 sync_port = (etr_port1_uptodate &&
1094 etr_port_valid(&etr_port1, 1)) ? 1 : -1;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001095 } else {
1096 /* Both ports not usable. */
1097 eacr.es = eacr.sl = 0;
1098 sync_port = -1;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001099 }
1100
1101 /*
1102 * If the clock is in sync just update the eacr and return.
1103 * If there is no valid sync port wait for a port update.
1104 */
Martin Schwidefsky33fea792010-07-27 19:29:38 +02001105 if ((eacr.es && check_sync_clock()) || sync_port < 0) {
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001106 etr_update_eacr(eacr);
1107 etr_set_tolec_timeout(now);
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001108 goto out_unlock;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001109 }
1110
1111 /*
1112 * Prepare control register for clock syncing
1113 * (reset data port bit, set sync check control.
1114 */
1115 eacr.dp = 0;
1116 eacr.es = 1;
1117
1118 /*
1119 * Update eacr and try to synchronize the clock. If the update
1120 * of eacr caused a stepping port switch (or if we have to
Lucas De Marchi25985ed2011-03-30 22:57:33 -03001121 * assume that a stepping port switch has occurred) or the
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001122 * clock syncing failed, reset the sync check control bit
1123 * and set up a timer to try again after 0.5 seconds
1124 */
1125 etr_update_eacr(eacr);
1126 if (now < etr_tolec + (1600000 << 12) ||
Heiko Carstens750887d2008-12-25 13:38:37 +01001127 etr_sync_clock_stop(&aib, sync_port) != 0) {
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001128 /* Sync failed. Try again in 1/2 second. */
1129 eacr.es = 0;
1130 etr_update_eacr(eacr);
1131 etr_set_sync_timeout();
1132 } else
1133 etr_set_tolec_timeout(now);
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001134out_unlock:
1135 mutex_unlock(&etr_work_mutex);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001136}
1137
1138/*
1139 * Sysfs interface functions
1140 */
Kay Sievers3fbacff2011-12-21 15:09:50 -08001141static struct bus_type etr_subsys = {
1142 .name = "etr",
1143 .dev_name = "etr",
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001144};
1145
Kay Sievers3fbacff2011-12-21 15:09:50 -08001146static struct device etr_port0_dev = {
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001147 .id = 0,
Kay Sievers3fbacff2011-12-21 15:09:50 -08001148 .bus = &etr_subsys,
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001149};
1150
Kay Sievers3fbacff2011-12-21 15:09:50 -08001151static struct device etr_port1_dev = {
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001152 .id = 1,
Kay Sievers3fbacff2011-12-21 15:09:50 -08001153 .bus = &etr_subsys,
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001154};
1155
1156/*
Kay Sievers3fbacff2011-12-21 15:09:50 -08001157 * ETR subsys attributes
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001158 */
Kay Sievers3fbacff2011-12-21 15:09:50 -08001159static ssize_t etr_stepping_port_show(struct device *dev,
1160 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001161 char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001162{
1163 return sprintf(buf, "%i\n", etr_port0.esw.p);
1164}
1165
Kay Sievers3fbacff2011-12-21 15:09:50 -08001166static DEVICE_ATTR(stepping_port, 0400, etr_stepping_port_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001167
Kay Sievers3fbacff2011-12-21 15:09:50 -08001168static ssize_t etr_stepping_mode_show(struct device *dev,
1169 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001170 char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001171{
1172 char *mode_str;
1173
1174 if (etr_mode_is_pps(etr_eacr))
1175 mode_str = "pps";
1176 else if (etr_mode_is_etr(etr_eacr))
1177 mode_str = "etr";
1178 else
1179 mode_str = "local";
1180 return sprintf(buf, "%s\n", mode_str);
1181}
1182
Kay Sievers3fbacff2011-12-21 15:09:50 -08001183static DEVICE_ATTR(stepping_mode, 0400, etr_stepping_mode_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001184
1185/*
1186 * ETR port attributes
1187 */
Kay Sievers3fbacff2011-12-21 15:09:50 -08001188static inline struct etr_aib *etr_aib_from_dev(struct device *dev)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001189{
1190 if (dev == &etr_port0_dev)
1191 return etr_port0_online ? &etr_port0 : NULL;
1192 else
1193 return etr_port1_online ? &etr_port1 : NULL;
1194}
1195
Kay Sievers3fbacff2011-12-21 15:09:50 -08001196static ssize_t etr_online_show(struct device *dev,
1197 struct device_attribute *attr,
Andi Kleen4a0b2b42008-07-01 18:48:41 +02001198 char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001199{
1200 unsigned int online;
1201
1202 online = (dev == &etr_port0_dev) ? etr_port0_online : etr_port1_online;
1203 return sprintf(buf, "%i\n", online);
1204}
1205
Kay Sievers3fbacff2011-12-21 15:09:50 -08001206static ssize_t etr_online_store(struct device *dev,
1207 struct device_attribute *attr,
Andi Kleen4a0b2b42008-07-01 18:48:41 +02001208 const char *buf, size_t count)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001209{
1210 unsigned int value;
1211
1212 value = simple_strtoul(buf, NULL, 0);
1213 if (value != 0 && value != 1)
1214 return -EINVAL;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001215 if (!test_bit(CLOCK_SYNC_HAS_ETR, &clock_sync_flags))
1216 return -EOPNOTSUPP;
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001217 mutex_lock(&clock_sync_mutex);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001218 if (dev == &etr_port0_dev) {
1219 if (etr_port0_online == value)
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001220 goto out; /* Nothing to do. */
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001221 etr_port0_online = value;
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001222 if (etr_port0_online && etr_port1_online)
1223 set_bit(CLOCK_SYNC_ETR, &clock_sync_flags);
1224 else
1225 clear_bit(CLOCK_SYNC_ETR, &clock_sync_flags);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001226 set_bit(ETR_EVENT_PORT0_CHANGE, &etr_events);
Heiko Carstens750887d2008-12-25 13:38:37 +01001227 queue_work(time_sync_wq, &etr_work);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001228 } else {
1229 if (etr_port1_online == value)
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001230 goto out; /* Nothing to do. */
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001231 etr_port1_online = value;
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001232 if (etr_port0_online && etr_port1_online)
1233 set_bit(CLOCK_SYNC_ETR, &clock_sync_flags);
1234 else
1235 clear_bit(CLOCK_SYNC_ETR, &clock_sync_flags);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001236 set_bit(ETR_EVENT_PORT1_CHANGE, &etr_events);
Heiko Carstens750887d2008-12-25 13:38:37 +01001237 queue_work(time_sync_wq, &etr_work);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001238 }
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001239out:
1240 mutex_unlock(&clock_sync_mutex);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001241 return count;
1242}
1243
Kay Sievers3fbacff2011-12-21 15:09:50 -08001244static DEVICE_ATTR(online, 0600, etr_online_show, etr_online_store);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001245
Kay Sievers3fbacff2011-12-21 15:09:50 -08001246static ssize_t etr_stepping_control_show(struct device *dev,
1247 struct device_attribute *attr,
Andi Kleen4a0b2b42008-07-01 18:48:41 +02001248 char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001249{
1250 return sprintf(buf, "%i\n", (dev == &etr_port0_dev) ?
1251 etr_eacr.e0 : etr_eacr.e1);
1252}
1253
Kay Sievers3fbacff2011-12-21 15:09:50 -08001254static DEVICE_ATTR(stepping_control, 0400, etr_stepping_control_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001255
Kay Sievers3fbacff2011-12-21 15:09:50 -08001256static ssize_t etr_mode_code_show(struct device *dev,
1257 struct device_attribute *attr, char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001258{
1259 if (!etr_port0_online && !etr_port1_online)
1260 /* Status word is not uptodate if both ports are offline. */
1261 return -ENODATA;
1262 return sprintf(buf, "%i\n", (dev == &etr_port0_dev) ?
1263 etr_port0.esw.psc0 : etr_port0.esw.psc1);
1264}
1265
Kay Sievers3fbacff2011-12-21 15:09:50 -08001266static DEVICE_ATTR(state_code, 0400, etr_mode_code_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001267
Kay Sievers3fbacff2011-12-21 15:09:50 -08001268static ssize_t etr_untuned_show(struct device *dev,
1269 struct device_attribute *attr, char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001270{
1271 struct etr_aib *aib = etr_aib_from_dev(dev);
1272
1273 if (!aib || !aib->slsw.v1)
1274 return -ENODATA;
1275 return sprintf(buf, "%i\n", aib->edf1.u);
1276}
1277
Kay Sievers3fbacff2011-12-21 15:09:50 -08001278static DEVICE_ATTR(untuned, 0400, etr_untuned_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001279
Kay Sievers3fbacff2011-12-21 15:09:50 -08001280static ssize_t etr_network_id_show(struct device *dev,
1281 struct device_attribute *attr, char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001282{
1283 struct etr_aib *aib = etr_aib_from_dev(dev);
1284
1285 if (!aib || !aib->slsw.v1)
1286 return -ENODATA;
1287 return sprintf(buf, "%i\n", aib->edf1.net_id);
1288}
1289
Kay Sievers3fbacff2011-12-21 15:09:50 -08001290static DEVICE_ATTR(network, 0400, etr_network_id_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001291
Kay Sievers3fbacff2011-12-21 15:09:50 -08001292static ssize_t etr_id_show(struct device *dev,
1293 struct device_attribute *attr, char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001294{
1295 struct etr_aib *aib = etr_aib_from_dev(dev);
1296
1297 if (!aib || !aib->slsw.v1)
1298 return -ENODATA;
1299 return sprintf(buf, "%i\n", aib->edf1.etr_id);
1300}
1301
Kay Sievers3fbacff2011-12-21 15:09:50 -08001302static DEVICE_ATTR(id, 0400, etr_id_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001303
Kay Sievers3fbacff2011-12-21 15:09:50 -08001304static ssize_t etr_port_number_show(struct device *dev,
1305 struct device_attribute *attr, char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001306{
1307 struct etr_aib *aib = etr_aib_from_dev(dev);
1308
1309 if (!aib || !aib->slsw.v1)
1310 return -ENODATA;
1311 return sprintf(buf, "%i\n", aib->edf1.etr_pn);
1312}
1313
Kay Sievers3fbacff2011-12-21 15:09:50 -08001314static DEVICE_ATTR(port, 0400, etr_port_number_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001315
Kay Sievers3fbacff2011-12-21 15:09:50 -08001316static ssize_t etr_coupled_show(struct device *dev,
1317 struct device_attribute *attr, char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001318{
1319 struct etr_aib *aib = etr_aib_from_dev(dev);
1320
1321 if (!aib || !aib->slsw.v3)
1322 return -ENODATA;
1323 return sprintf(buf, "%i\n", aib->edf3.c);
1324}
1325
Kay Sievers3fbacff2011-12-21 15:09:50 -08001326static DEVICE_ATTR(coupled, 0400, etr_coupled_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001327
Kay Sievers3fbacff2011-12-21 15:09:50 -08001328static ssize_t etr_local_time_show(struct device *dev,
1329 struct device_attribute *attr, char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001330{
1331 struct etr_aib *aib = etr_aib_from_dev(dev);
1332
1333 if (!aib || !aib->slsw.v3)
1334 return -ENODATA;
1335 return sprintf(buf, "%i\n", aib->edf3.blto);
1336}
1337
Kay Sievers3fbacff2011-12-21 15:09:50 -08001338static DEVICE_ATTR(local_time, 0400, etr_local_time_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001339
Kay Sievers3fbacff2011-12-21 15:09:50 -08001340static ssize_t etr_utc_offset_show(struct device *dev,
1341 struct device_attribute *attr, char *buf)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001342{
1343 struct etr_aib *aib = etr_aib_from_dev(dev);
1344
1345 if (!aib || !aib->slsw.v3)
1346 return -ENODATA;
1347 return sprintf(buf, "%i\n", aib->edf3.buo);
1348}
1349
Kay Sievers3fbacff2011-12-21 15:09:50 -08001350static DEVICE_ATTR(utc_offset, 0400, etr_utc_offset_show, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001351
Kay Sievers3fbacff2011-12-21 15:09:50 -08001352static struct device_attribute *etr_port_attributes[] = {
1353 &dev_attr_online,
1354 &dev_attr_stepping_control,
1355 &dev_attr_state_code,
1356 &dev_attr_untuned,
1357 &dev_attr_network,
1358 &dev_attr_id,
1359 &dev_attr_port,
1360 &dev_attr_coupled,
1361 &dev_attr_local_time,
1362 &dev_attr_utc_offset,
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001363 NULL
1364};
1365
Kay Sievers3fbacff2011-12-21 15:09:50 -08001366static int __init etr_register_port(struct device *dev)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001367{
Kay Sievers3fbacff2011-12-21 15:09:50 -08001368 struct device_attribute **attr;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001369 int rc;
1370
Kay Sievers3fbacff2011-12-21 15:09:50 -08001371 rc = device_register(dev);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001372 if (rc)
1373 goto out;
1374 for (attr = etr_port_attributes; *attr; attr++) {
Kay Sievers3fbacff2011-12-21 15:09:50 -08001375 rc = device_create_file(dev, *attr);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001376 if (rc)
1377 goto out_unreg;
1378 }
1379 return 0;
1380out_unreg:
1381 for (; attr >= etr_port_attributes; attr--)
Kay Sievers3fbacff2011-12-21 15:09:50 -08001382 device_remove_file(dev, *attr);
1383 device_unregister(dev);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001384out:
1385 return rc;
1386}
1387
Kay Sievers3fbacff2011-12-21 15:09:50 -08001388static void __init etr_unregister_port(struct device *dev)
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001389{
Kay Sievers3fbacff2011-12-21 15:09:50 -08001390 struct device_attribute **attr;
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001391
1392 for (attr = etr_port_attributes; *attr; attr++)
Kay Sievers3fbacff2011-12-21 15:09:50 -08001393 device_remove_file(dev, *attr);
1394 device_unregister(dev);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001395}
1396
1397static int __init etr_init_sysfs(void)
1398{
1399 int rc;
1400
Kay Sievers3fbacff2011-12-21 15:09:50 -08001401 rc = subsys_system_register(&etr_subsys, NULL);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001402 if (rc)
1403 goto out;
Kay Sievers3fbacff2011-12-21 15:09:50 -08001404 rc = device_create_file(etr_subsys.dev_root, &dev_attr_stepping_port);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001405 if (rc)
Kay Sievers3fbacff2011-12-21 15:09:50 -08001406 goto out_unreg_subsys;
1407 rc = device_create_file(etr_subsys.dev_root, &dev_attr_stepping_mode);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001408 if (rc)
1409 goto out_remove_stepping_port;
1410 rc = etr_register_port(&etr_port0_dev);
1411 if (rc)
1412 goto out_remove_stepping_mode;
1413 rc = etr_register_port(&etr_port1_dev);
1414 if (rc)
1415 goto out_remove_port0;
1416 return 0;
1417
1418out_remove_port0:
1419 etr_unregister_port(&etr_port0_dev);
1420out_remove_stepping_mode:
Kay Sievers3fbacff2011-12-21 15:09:50 -08001421 device_remove_file(etr_subsys.dev_root, &dev_attr_stepping_mode);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001422out_remove_stepping_port:
Kay Sievers3fbacff2011-12-21 15:09:50 -08001423 device_remove_file(etr_subsys.dev_root, &dev_attr_stepping_port);
1424out_unreg_subsys:
1425 bus_unregister(&etr_subsys);
Martin Schwidefskyd54853e2007-02-05 21:18:19 +01001426out:
1427 return rc;
1428}
1429
1430device_initcall(etr_init_sysfs);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001431
1432/*
1433 * Server Time Protocol (STP) code.
1434 */
1435static int stp_online;
1436static struct stp_sstpi stp_info;
1437static void *stp_page;
1438
1439static void stp_work_fn(struct work_struct *work);
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001440static DEFINE_MUTEX(stp_work_mutex);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001441static DECLARE_WORK(stp_work, stp_work_fn);
Martin Schwidefsky04362302009-04-14 15:36:19 +02001442static struct timer_list stp_timer;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001443
1444static int __init early_parse_stp(char *p)
1445{
1446 if (strncmp(p, "off", 3) == 0)
1447 stp_online = 0;
1448 else if (strncmp(p, "on", 2) == 0)
1449 stp_online = 1;
1450 return 0;
1451}
1452early_param("stp", early_parse_stp);
1453
1454/*
1455 * Reset STP attachment.
1456 */
Heiko Carstens8f847002008-08-01 16:39:19 +02001457static void __init stp_reset(void)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001458{
1459 int rc;
1460
Heiko Carstensd7d11042009-06-22 12:08:03 +02001461 stp_page = (void *) get_zeroed_page(GFP_ATOMIC);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001462 rc = chsc_sstpc(stp_page, STP_OP_CTRL, 0x0000);
Martin Schwidefsky4a672cf2008-10-10 21:33:29 +02001463 if (rc == 0)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001464 set_bit(CLOCK_SYNC_HAS_STP, &clock_sync_flags);
1465 else if (stp_online) {
Martin Schwidefskyfeab6502008-12-25 13:39:38 +01001466 pr_warning("The real or virtual hardware system does "
1467 "not provide an STP interface\n");
Heiko Carstensd7d11042009-06-22 12:08:03 +02001468 free_page((unsigned long) stp_page);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001469 stp_page = NULL;
1470 stp_online = 0;
1471 }
1472}
1473
Martin Schwidefsky04362302009-04-14 15:36:19 +02001474static void stp_timeout(unsigned long dummy)
1475{
1476 queue_work(time_sync_wq, &stp_work);
1477}
1478
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001479static int __init stp_init(void)
1480{
Heiko Carstens750887d2008-12-25 13:38:37 +01001481 if (!test_bit(CLOCK_SYNC_HAS_STP, &clock_sync_flags))
1482 return 0;
Martin Schwidefsky04362302009-04-14 15:36:19 +02001483 setup_timer(&stp_timer, stp_timeout, 0UL);
Heiko Carstens750887d2008-12-25 13:38:37 +01001484 time_init_wq();
1485 if (!stp_online)
1486 return 0;
1487 queue_work(time_sync_wq, &stp_work);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001488 return 0;
1489}
1490
1491arch_initcall(stp_init);
1492
1493/*
1494 * STP timing alert. There are three causes:
1495 * 1) timing status change
1496 * 2) link availability change
1497 * 3) time control parameter change
1498 * In all three cases we are only interested in the clock source state.
1499 * If a STP clock source is now available use it.
1500 */
1501static void stp_timing_alert(struct stp_irq_parm *intparm)
1502{
1503 if (intparm->tsc || intparm->lac || intparm->tcpc)
Heiko Carstens750887d2008-12-25 13:38:37 +01001504 queue_work(time_sync_wq, &stp_work);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001505}
1506
1507/*
1508 * STP sync check machine check. This is called when the timing state
1509 * changes from the synchronized state to the unsynchronized state.
1510 * After a STP sync check the clock is not in sync. The machine check
1511 * is broadcasted to all cpus at the same time.
1512 */
1513void stp_sync_check(void)
1514{
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001515 disable_sync_clock(NULL);
Heiko Carstens750887d2008-12-25 13:38:37 +01001516 queue_work(time_sync_wq, &stp_work);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001517}
1518
1519/*
1520 * STP island condition machine check. This is called when an attached
1521 * server attempts to communicate over an STP link and the servers
1522 * have matching CTN ids and have a valid stratum-1 configuration
1523 * but the configurations do not match.
1524 */
1525void stp_island_check(void)
1526{
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001527 disable_sync_clock(NULL);
Heiko Carstens750887d2008-12-25 13:38:37 +01001528 queue_work(time_sync_wq, &stp_work);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001529}
1530
Heiko Carstens750887d2008-12-25 13:38:37 +01001531
1532static int stp_sync_clock(void *data)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001533{
Heiko Carstens750887d2008-12-25 13:38:37 +01001534 static int first;
Fan Zhangfdf03652015-05-13 10:58:41 +02001535 unsigned long long old_clock, delta, new_clock, clock_delta;
Heiko Carstens750887d2008-12-25 13:38:37 +01001536 struct clock_sync_data *stp_sync;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001537 int rc;
1538
Heiko Carstens750887d2008-12-25 13:38:37 +01001539 stp_sync = data;
1540
1541 if (xchg(&first, 1) == 1) {
1542 /* Slave */
1543 clock_sync_cpu(stp_sync);
1544 return 0;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001545 }
1546
Heiko Carstens750887d2008-12-25 13:38:37 +01001547 /* Wait until all other cpus entered the sync function. */
1548 while (atomic_read(&stp_sync->cpus) != 0)
1549 cpu_relax();
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001550
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001551 enable_sync_clock();
1552
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001553 rc = 0;
1554 if (stp_info.todoff[0] || stp_info.todoff[1] ||
1555 stp_info.todoff[2] || stp_info.todoff[3] ||
1556 stp_info.tmd != 2) {
Heiko Carstens1aae0562013-01-30 09:49:40 +01001557 old_clock = get_tod_clock();
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001558 rc = chsc_sstpc(stp_page, STP_OP_SYNC, 0);
1559 if (rc == 0) {
Fan Zhangfdf03652015-05-13 10:58:41 +02001560 new_clock = get_tod_clock();
1561 delta = adjust_time(old_clock, new_clock, 0);
1562 clock_delta = new_clock - old_clock;
1563 atomic_notifier_call_chain(&s390_epoch_delta_notifier,
1564 0, &clock_delta);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001565 fixup_clock_comparator(delta);
1566 rc = chsc_sstpi(stp_page, &stp_info,
1567 sizeof(struct stp_sstpi));
1568 if (rc == 0 && stp_info.tmd != 2)
1569 rc = -EAGAIN;
1570 }
1571 }
1572 if (rc) {
1573 disable_sync_clock(NULL);
Heiko Carstens750887d2008-12-25 13:38:37 +01001574 stp_sync->in_sync = -EAGAIN;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001575 } else
Heiko Carstens750887d2008-12-25 13:38:37 +01001576 stp_sync->in_sync = 1;
1577 xchg(&first, 0);
1578 return 0;
1579}
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001580
Heiko Carstens750887d2008-12-25 13:38:37 +01001581/*
1582 * STP work. Check for the STP state and take over the clock
1583 * synchronization if the STP clock source is usable.
1584 */
1585static void stp_work_fn(struct work_struct *work)
1586{
1587 struct clock_sync_data stp_sync;
1588 int rc;
1589
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001590 /* prevent multiple execution. */
1591 mutex_lock(&stp_work_mutex);
1592
Heiko Carstens750887d2008-12-25 13:38:37 +01001593 if (!stp_online) {
1594 chsc_sstpc(stp_page, STP_OP_CTRL, 0x0000);
Martin Schwidefsky04362302009-04-14 15:36:19 +02001595 del_timer_sync(&stp_timer);
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001596 goto out_unlock;
Heiko Carstens750887d2008-12-25 13:38:37 +01001597 }
1598
1599 rc = chsc_sstpc(stp_page, STP_OP_CTRL, 0xb0e0);
1600 if (rc)
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001601 goto out_unlock;
Heiko Carstens750887d2008-12-25 13:38:37 +01001602
1603 rc = chsc_sstpi(stp_page, &stp_info, sizeof(struct stp_sstpi));
1604 if (rc || stp_info.c == 0)
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001605 goto out_unlock;
Heiko Carstens750887d2008-12-25 13:38:37 +01001606
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001607 /* Skip synchronization if the clock is already in sync. */
1608 if (check_sync_clock())
1609 goto out_unlock;
1610
Heiko Carstens750887d2008-12-25 13:38:37 +01001611 memset(&stp_sync, 0, sizeof(stp_sync));
1612 get_online_cpus();
1613 atomic_set(&stp_sync.cpus, num_online_cpus() - 1);
KOSAKI Motohiro0f1959f2011-05-23 10:24:36 +02001614 stop_machine(stp_sync_clock, &stp_sync, cpu_online_mask);
Heiko Carstens750887d2008-12-25 13:38:37 +01001615 put_online_cpus();
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001616
Martin Schwidefsky04362302009-04-14 15:36:19 +02001617 if (!check_sync_clock())
1618 /*
1619 * There is a usable clock but the synchonization failed.
1620 * Retry after a second.
1621 */
1622 mod_timer(&stp_timer, jiffies + HZ);
1623
Martin Schwidefsky0b3016b2008-12-25 13:38:38 +01001624out_unlock:
1625 mutex_unlock(&stp_work_mutex);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001626}
1627
1628/*
Kay Sievers3fbacff2011-12-21 15:09:50 -08001629 * STP subsys sysfs interface functions
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001630 */
Kay Sievers3fbacff2011-12-21 15:09:50 -08001631static struct bus_type stp_subsys = {
1632 .name = "stp",
1633 .dev_name = "stp",
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001634};
1635
Kay Sievers3fbacff2011-12-21 15:09:50 -08001636static ssize_t stp_ctn_id_show(struct device *dev,
1637 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001638 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001639{
1640 if (!stp_online)
1641 return -ENODATA;
1642 return sprintf(buf, "%016llx\n",
1643 *(unsigned long long *) stp_info.ctnid);
1644}
1645
Kay Sievers3fbacff2011-12-21 15:09:50 -08001646static DEVICE_ATTR(ctn_id, 0400, stp_ctn_id_show, NULL);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001647
Kay Sievers3fbacff2011-12-21 15:09:50 -08001648static ssize_t stp_ctn_type_show(struct device *dev,
1649 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001650 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001651{
1652 if (!stp_online)
1653 return -ENODATA;
1654 return sprintf(buf, "%i\n", stp_info.ctn);
1655}
1656
Kay Sievers3fbacff2011-12-21 15:09:50 -08001657static DEVICE_ATTR(ctn_type, 0400, stp_ctn_type_show, NULL);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001658
Kay Sievers3fbacff2011-12-21 15:09:50 -08001659static ssize_t stp_dst_offset_show(struct device *dev,
1660 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001661 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001662{
1663 if (!stp_online || !(stp_info.vbits & 0x2000))
1664 return -ENODATA;
1665 return sprintf(buf, "%i\n", (int)(s16) stp_info.dsto);
1666}
1667
Kay Sievers3fbacff2011-12-21 15:09:50 -08001668static DEVICE_ATTR(dst_offset, 0400, stp_dst_offset_show, NULL);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001669
Kay Sievers3fbacff2011-12-21 15:09:50 -08001670static ssize_t stp_leap_seconds_show(struct device *dev,
1671 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001672 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001673{
1674 if (!stp_online || !(stp_info.vbits & 0x8000))
1675 return -ENODATA;
1676 return sprintf(buf, "%i\n", (int)(s16) stp_info.leaps);
1677}
1678
Kay Sievers3fbacff2011-12-21 15:09:50 -08001679static DEVICE_ATTR(leap_seconds, 0400, stp_leap_seconds_show, NULL);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001680
Kay Sievers3fbacff2011-12-21 15:09:50 -08001681static ssize_t stp_stratum_show(struct device *dev,
1682 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001683 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001684{
1685 if (!stp_online)
1686 return -ENODATA;
1687 return sprintf(buf, "%i\n", (int)(s16) stp_info.stratum);
1688}
1689
Kay Sievers3fbacff2011-12-21 15:09:50 -08001690static DEVICE_ATTR(stratum, 0400, stp_stratum_show, NULL);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001691
Kay Sievers3fbacff2011-12-21 15:09:50 -08001692static ssize_t stp_time_offset_show(struct device *dev,
1693 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001694 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001695{
1696 if (!stp_online || !(stp_info.vbits & 0x0800))
1697 return -ENODATA;
1698 return sprintf(buf, "%i\n", (int) stp_info.tto);
1699}
1700
Kay Sievers3fbacff2011-12-21 15:09:50 -08001701static DEVICE_ATTR(time_offset, 0400, stp_time_offset_show, NULL);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001702
Kay Sievers3fbacff2011-12-21 15:09:50 -08001703static ssize_t stp_time_zone_offset_show(struct device *dev,
1704 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001705 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001706{
1707 if (!stp_online || !(stp_info.vbits & 0x4000))
1708 return -ENODATA;
1709 return sprintf(buf, "%i\n", (int)(s16) stp_info.tzo);
1710}
1711
Kay Sievers3fbacff2011-12-21 15:09:50 -08001712static DEVICE_ATTR(time_zone_offset, 0400,
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001713 stp_time_zone_offset_show, NULL);
1714
Kay Sievers3fbacff2011-12-21 15:09:50 -08001715static ssize_t stp_timing_mode_show(struct device *dev,
1716 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001717 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001718{
1719 if (!stp_online)
1720 return -ENODATA;
1721 return sprintf(buf, "%i\n", stp_info.tmd);
1722}
1723
Kay Sievers3fbacff2011-12-21 15:09:50 -08001724static DEVICE_ATTR(timing_mode, 0400, stp_timing_mode_show, NULL);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001725
Kay Sievers3fbacff2011-12-21 15:09:50 -08001726static ssize_t stp_timing_state_show(struct device *dev,
1727 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001728 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001729{
1730 if (!stp_online)
1731 return -ENODATA;
1732 return sprintf(buf, "%i\n", stp_info.tst);
1733}
1734
Kay Sievers3fbacff2011-12-21 15:09:50 -08001735static DEVICE_ATTR(timing_state, 0400, stp_timing_state_show, NULL);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001736
Kay Sievers3fbacff2011-12-21 15:09:50 -08001737static ssize_t stp_online_show(struct device *dev,
1738 struct device_attribute *attr,
Andi Kleenc9be0a32010-01-05 12:47:58 +01001739 char *buf)
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001740{
1741 return sprintf(buf, "%i\n", stp_online);
1742}
1743
Kay Sievers3fbacff2011-12-21 15:09:50 -08001744static ssize_t stp_online_store(struct device *dev,
1745 struct device_attribute *attr,
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001746 const char *buf, size_t count)
1747{
1748 unsigned int value;
1749
1750 value = simple_strtoul(buf, NULL, 0);
1751 if (value != 0 && value != 1)
1752 return -EINVAL;
1753 if (!test_bit(CLOCK_SYNC_HAS_STP, &clock_sync_flags))
1754 return -EOPNOTSUPP;
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001755 mutex_lock(&clock_sync_mutex);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001756 stp_online = value;
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001757 if (stp_online)
1758 set_bit(CLOCK_SYNC_STP, &clock_sync_flags);
1759 else
1760 clear_bit(CLOCK_SYNC_STP, &clock_sync_flags);
Heiko Carstens750887d2008-12-25 13:38:37 +01001761 queue_work(time_sync_wq, &stp_work);
Martin Schwidefsky8283cb42009-03-26 15:24:21 +01001762 mutex_unlock(&clock_sync_mutex);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001763 return count;
1764}
1765
1766/*
Kay Sievers3fbacff2011-12-21 15:09:50 -08001767 * Can't use DEVICE_ATTR because the attribute should be named
1768 * stp/online but dev_attr_online already exists in this file ..
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001769 */
Kay Sievers3fbacff2011-12-21 15:09:50 -08001770static struct device_attribute dev_attr_stp_online = {
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001771 .attr = { .name = "online", .mode = 0600 },
1772 .show = stp_online_show,
1773 .store = stp_online_store,
1774};
1775
Kay Sievers3fbacff2011-12-21 15:09:50 -08001776static struct device_attribute *stp_attributes[] = {
1777 &dev_attr_ctn_id,
1778 &dev_attr_ctn_type,
1779 &dev_attr_dst_offset,
1780 &dev_attr_leap_seconds,
1781 &dev_attr_stp_online,
1782 &dev_attr_stratum,
1783 &dev_attr_time_offset,
1784 &dev_attr_time_zone_offset,
1785 &dev_attr_timing_mode,
1786 &dev_attr_timing_state,
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001787 NULL
1788};
1789
1790static int __init stp_init_sysfs(void)
1791{
Kay Sievers3fbacff2011-12-21 15:09:50 -08001792 struct device_attribute **attr;
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001793 int rc;
1794
Kay Sievers3fbacff2011-12-21 15:09:50 -08001795 rc = subsys_system_register(&stp_subsys, NULL);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001796 if (rc)
1797 goto out;
1798 for (attr = stp_attributes; *attr; attr++) {
Kay Sievers3fbacff2011-12-21 15:09:50 -08001799 rc = device_create_file(stp_subsys.dev_root, *attr);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001800 if (rc)
1801 goto out_unreg;
1802 }
1803 return 0;
1804out_unreg:
1805 for (; attr >= stp_attributes; attr--)
Kay Sievers3fbacff2011-12-21 15:09:50 -08001806 device_remove_file(stp_subsys.dev_root, *attr);
1807 bus_unregister(&stp_subsys);
Martin Schwidefskyd2fec592008-07-14 09:58:56 +02001808out:
1809 return rc;
1810}
1811
1812device_initcall(stp_init_sysfs);