]> git.proxmox.com Git - mirror_ubuntu-bionic-kernel.git/blame - arch/s390/kernel/time.c
sched/headers: Prepare for new header dependencies before moving code to <linux/sched...
[mirror_ubuntu-bionic-kernel.git] / arch / s390 / kernel / time.c
CommitLineData
1da177e4 1/*
1da177e4
LT
2 * Time of day based timer functions.
3 *
4 * S390 version
d2fec595 5 * Copyright IBM Corp. 1999, 2008
1da177e4
LT
6 * 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
feab6501
MS
14#define KMSG_COMPONENT "time"
15#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
16
052ff461 17#include <linux/kernel_stat.h>
1da177e4 18#include <linux/errno.h>
3994a52b 19#include <linux/export.h>
1da177e4
LT
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>
750887de
HC
26#include <linux/cpu.h>
27#include <linux/stop_machine.h>
1da177e4 28#include <linux/time.h>
3fbacffb 29#include <linux/device.h>
1da177e4
LT
30#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>
189374ae 37#include <linux/timekeeper_internal.h>
5a62b192 38#include <linux/clockchips.h>
5a0e3ad6 39#include <linux/gfp.h>
860dba45 40#include <linux/kprobes.h>
7c0f6ba6 41#include <linux/uaccess.h>
40277891 42#include <asm/facility.h>
1da177e4 43#include <asm/delay.h>
1da177e4 44#include <asm/div64.h>
b020632e 45#include <asm/vdso.h>
1da177e4 46#include <asm/irq.h>
5a489b98 47#include <asm/irq_regs.h>
27f6b416 48#include <asm/vtimer.h>
fd5ada04 49#include <asm/stp.h>
a806170e 50#include <asm/cio.h>
638ad34a 51#include "entry.h"
1da177e4 52
b6112ccb 53u64 sched_clock_base_cc = -1; /* Force to data section. */
05e7ff7d 54EXPORT_SYMBOL_GPL(sched_clock_base_cc);
b6112ccb 55
5a62b192 56static DEFINE_PER_CPU(struct clock_event_device, comparators);
1da177e4 57
fdf03650
FZ
58ATOMIC_NOTIFIER_HEAD(s390_epoch_delta_notifier);
59EXPORT_SYMBOL(s390_epoch_delta_notifier);
60
40277891 61unsigned char ptff_function_mask[16];
b1c0854d
MS
62
63static unsigned long long lpar_offset;
64static unsigned long long initial_leap_seconds;
75c7b6f3 65static unsigned long long tod_steering_end;
191ce9d1 66static long long tod_steering_delta;
40277891
MS
67
68/*
69 * Get time offsets with PTFF
70 */
b1c0854d 71void __init time_early_init(void)
40277891
MS
72{
73 struct ptff_qto qto;
936cc855 74 struct ptff_qui qui;
40277891 75
75c7b6f3
MS
76 /* Initialize TOD steering parameters */
77 tod_steering_end = sched_clock_base_cc;
78 vdso_data->ts_end = tod_steering_end;
79
40277891
MS
80 if (!test_facility(28))
81 return;
75c7b6f3 82
40277891
MS
83 ptff(&ptff_function_mask, sizeof(ptff_function_mask), PTFF_QAF);
84
85 /* get LPAR offset */
86 if (ptff_query(PTFF_QTO) && ptff(&qto, sizeof(qto), PTFF_QTO) == 0)
87 lpar_offset = qto.tod_epoch_difference;
936cc855
MS
88
89 /* get initial leap seconds */
90 if (ptff_query(PTFF_QUI) && ptff(&qui, sizeof(qui), PTFF_QUI) == 0)
b1c0854d 91 initial_leap_seconds = (unsigned long long)
936cc855 92 ((long) qui.old_leap * 4096000000L);
40277891
MS
93}
94
1da177e4
LT
95/*
96 * Scheduler clock - returns current time in nanosec units.
97 */
7a5388de 98unsigned long long notrace sched_clock(void)
1da177e4 99{
1aae0560 100 return tod_to_ns(get_tod_clock_monotonic());
1da177e4 101}
7a5388de 102NOKPROBE_SYMBOL(sched_clock);
1da177e4 103
32f65f27
JG
104/*
105 * Monotonic_clock - returns # of nanoseconds passed since time_init()
106 */
107unsigned long long monotonic_clock(void)
108{
109 return sched_clock();
110}
111EXPORT_SYMBOL(monotonic_clock);
112
ea417aa8 113static void tod_to_timeval(__u64 todval, struct timespec64 *xt)
1da177e4
LT
114{
115 unsigned long long sec;
116
117 sec = todval >> 12;
118 do_div(sec, 1000000);
b1e2ba8d 119 xt->tv_sec = sec;
1da177e4 120 todval -= (sec * 1000000) << 12;
b1e2ba8d 121 xt->tv_nsec = ((todval * 1000) >> 12);
1da177e4
LT
122}
123
5a62b192 124void clock_comparator_work(void)
1da177e4 125{
5a62b192 126 struct clock_event_device *cd;
1da177e4 127
5a62b192 128 S390_lowcore.clock_comparator = -1ULL;
eb7e7d76 129 cd = this_cpu_ptr(&comparators);
5a62b192 130 cd->event_handler(cd);
1da177e4
LT
131}
132
8adbf78e 133static int s390_next_event(unsigned long delta,
5a62b192 134 struct clock_event_device *evt)
1da177e4 135{
8adbf78e 136 S390_lowcore.clock_comparator = get_tod_clock() + delta;
5a62b192
HC
137 set_clock_comparator(S390_lowcore.clock_comparator);
138 return 0;
1da177e4
LT
139}
140
d54853ef
MS
141/*
142 * Set up lowcore and control register of the current cpu to
143 * enable TOD clock and clock comparator interrupts.
1da177e4
LT
144 */
145void init_cpu_timer(void)
146{
5a62b192
HC
147 struct clock_event_device *cd;
148 int cpu;
149
150 S390_lowcore.clock_comparator = -1ULL;
151 set_clock_comparator(S390_lowcore.clock_comparator);
152
153 cpu = smp_processor_id();
154 cd = &per_cpu(comparators, cpu);
155 cd->name = "comparator";
8adbf78e 156 cd->features = CLOCK_EVT_FEAT_ONESHOT;
5a62b192
HC
157 cd->mult = 16777;
158 cd->shift = 12;
159 cd->min_delta_ns = 1;
160 cd->max_delta_ns = LONG_MAX;
161 cd->rating = 400;
320ab2b0 162 cd->cpumask = cpumask_of(cpu);
8adbf78e 163 cd->set_next_event = s390_next_event;
5a62b192
HC
164
165 clockevents_register_device(cd);
d54853ef
MS
166
167 /* Enable clock comparator timer interrupt. */
168 __ctl_set_bit(0,11);
169
d2fec595 170 /* Always allow the timing alert external interrupt. */
d54853ef
MS
171 __ctl_set_bit(0, 4);
172}
173
fde15c3a 174static void clock_comparator_interrupt(struct ext_code ext_code,
f6649a7e
MS
175 unsigned int param32,
176 unsigned long param64)
d54853ef 177{
420f42ec 178 inc_irq_stat(IRQEXT_CLK);
d3d238c7
HC
179 if (S390_lowcore.clock_comparator == -1ULL)
180 set_clock_comparator(S390_lowcore.clock_comparator);
d54853ef
MS
181}
182
d2fec595
MS
183static void stp_timing_alert(struct stp_irq_parm *);
184
fde15c3a 185static void timing_alert_interrupt(struct ext_code ext_code,
f6649a7e 186 unsigned int param32, unsigned long param64)
d2fec595 187{
420f42ec 188 inc_irq_stat(IRQEXT_TLA);
f6649a7e
MS
189 if (param32 & 0x00038000)
190 stp_timing_alert((struct stp_irq_parm *) &param32);
d2fec595
MS
191}
192
d2fec595 193static void stp_reset(void);
d54853ef 194
689911c7 195void read_persistent_clock64(struct timespec64 *ts)
d54853ef 196{
936cc855
MS
197 __u64 clock;
198
199 clock = get_tod_clock() - initial_leap_seconds;
200 tod_to_timeval(clock - TOD_UNIX_EPOCH, ts);
1da177e4 201}
d54853ef 202
689911c7 203void read_boot_clock64(struct timespec64 *ts)
23970e38 204{
936cc855
MS
205 __u64 clock;
206
207 clock = sched_clock_base_cc - initial_leap_seconds;
208 tod_to_timeval(clock - TOD_UNIX_EPOCH, ts);
1da177e4
LT
209}
210
a5a1d1c2 211static u64 read_tod_clock(struct clocksource *cs)
dc64bef5 212{
75c7b6f3
MS
213 unsigned long long now, adj;
214
215 preempt_disable(); /* protect from changes to steering parameters */
216 now = get_tod_clock();
217 adj = tod_steering_end - now;
218 if (unlikely((s64) adj >= 0))
219 /*
220 * manually steer by 1 cycle every 2^16 cycles. This
221 * corresponds to shifting the tod delta by 15. 1s is
222 * therefore steered in ~9h. The adjust will decrease
223 * over time, until it finally reaches 0.
224 */
191ce9d1 225 now += (tod_steering_delta < 0) ? (adj >> 15) : -(adj >> 15);
75c7b6f3
MS
226 preempt_enable();
227 return now;
dc64bef5
MS
228}
229
230static struct clocksource clocksource_tod = {
231 .name = "tod",
d2cb0e6e 232 .rating = 400,
dc64bef5
MS
233 .read = read_tod_clock,
234 .mask = -1ULL,
235 .mult = 1000,
236 .shift = 12,
cc02d809 237 .flags = CLOCK_SOURCE_IS_CONTINUOUS,
dc64bef5
MS
238};
239
f1b82746
MS
240struct clocksource * __init clocksource_default_clock(void)
241{
242 return &clocksource_tod;
243}
dc64bef5 244
79c74ecb 245void update_vsyscall(struct timekeeper *tk)
b020632e 246{
79c74ecb
MS
247 u64 nsecps;
248
876e7881 249 if (tk->tkr_mono.clock != &clocksource_tod)
b020632e
MS
250 return;
251
252 /* Make userspace gettimeofday spin until we're done. */
253 ++vdso_data->tb_update_count;
254 smp_wmb();
876e7881 255 vdso_data->xtime_tod_stamp = tk->tkr_mono.cycle_last;
79c74ecb 256 vdso_data->xtime_clock_sec = tk->xtime_sec;
876e7881 257 vdso_data->xtime_clock_nsec = tk->tkr_mono.xtime_nsec;
79c74ecb
MS
258 vdso_data->wtom_clock_sec =
259 tk->xtime_sec + tk->wall_to_monotonic.tv_sec;
876e7881
PZ
260 vdso_data->wtom_clock_nsec = tk->tkr_mono.xtime_nsec +
261 + ((u64) tk->wall_to_monotonic.tv_nsec << tk->tkr_mono.shift);
262 nsecps = (u64) NSEC_PER_SEC << tk->tkr_mono.shift;
79c74ecb
MS
263 while (vdso_data->wtom_clock_nsec >= nsecps) {
264 vdso_data->wtom_clock_nsec -= nsecps;
265 vdso_data->wtom_clock_sec++;
266 }
b7eacb59
MS
267
268 vdso_data->xtime_coarse_sec = tk->xtime_sec;
269 vdso_data->xtime_coarse_nsec =
876e7881 270 (long)(tk->tkr_mono.xtime_nsec >> tk->tkr_mono.shift);
b7eacb59
MS
271 vdso_data->wtom_coarse_sec =
272 vdso_data->xtime_coarse_sec + tk->wall_to_monotonic.tv_sec;
273 vdso_data->wtom_coarse_nsec =
274 vdso_data->xtime_coarse_nsec + tk->wall_to_monotonic.tv_nsec;
275 while (vdso_data->wtom_coarse_nsec >= NSEC_PER_SEC) {
276 vdso_data->wtom_coarse_nsec -= NSEC_PER_SEC;
277 vdso_data->wtom_coarse_sec++;
278 }
279
876e7881
PZ
280 vdso_data->tk_mult = tk->tkr_mono.mult;
281 vdso_data->tk_shift = tk->tkr_mono.shift;
b020632e
MS
282 smp_wmb();
283 ++vdso_data->tb_update_count;
284}
285
286extern struct timezone sys_tz;
287
288void update_vsyscall_tz(void)
289{
b020632e
MS
290 vdso_data->tz_minuteswest = sys_tz.tz_minuteswest;
291 vdso_data->tz_dsttime = sys_tz.tz_dsttime;
b020632e
MS
292}
293
1da177e4
LT
294/*
295 * Initialize the TOD clock and the CPU timer of
296 * the boot cpu.
297 */
298void __init time_init(void)
299{
b6112ccb 300 /* Reset time synchronization interfaces. */
b6112ccb 301 stp_reset();
1da177e4 302
1da177e4 303 /* request the clock comparator external interrupt */
1dad093b
TH
304 if (register_external_irq(EXT_IRQ_CLK_COMP, clock_comparator_interrupt))
305 panic("Couldn't request external interrupt 0x1004");
1da177e4 306
d2fec595 307 /* request the timing alert external interrupt */
1dad093b 308 if (register_external_irq(EXT_IRQ_TIMING_ALERT, timing_alert_interrupt))
d54853ef
MS
309 panic("Couldn't request external interrupt 0x1406");
310
f8935983 311 if (__clocksource_register(&clocksource_tod) != 0)
ab96e798
MS
312 panic("Could not register TOD clock source");
313
d54853ef
MS
314 /* Enable TOD clock interrupts on the boot cpu. */
315 init_cpu_timer();
ab96e798 316
c185b783 317 /* Enable cpu timer interrupts on the boot cpu. */
1da177e4 318 vtime_init();
d54853ef
MS
319}
320
d2fec595 321static DEFINE_PER_CPU(atomic_t, clock_sync_word);
8283cb43 322static DEFINE_MUTEX(clock_sync_mutex);
d2fec595
MS
323static unsigned long clock_sync_flags;
324
ca64f639
DH
325#define CLOCK_SYNC_HAS_STP 0
326#define CLOCK_SYNC_STP 1
d2fec595
MS
327
328/*
40277891
MS
329 * The get_clock function for the physical clock. It will get the current
330 * TOD clock, subtract the LPAR offset and write the result to *clock.
331 * The function returns 0 if the clock is in sync with the external time
332 * source. If the clock mode is local it will return -EOPNOTSUPP and
333 * -EAGAIN if the clock is not in sync with the external reference.
d2fec595 334 */
40277891 335int get_phys_clock(unsigned long long *clock)
d2fec595
MS
336{
337 atomic_t *sw_ptr;
338 unsigned int sw0, sw1;
339
340 sw_ptr = &get_cpu_var(clock_sync_word);
341 sw0 = atomic_read(sw_ptr);
40277891 342 *clock = get_tod_clock() - lpar_offset;
d2fec595 343 sw1 = atomic_read(sw_ptr);
bd119ee2 344 put_cpu_var(clock_sync_word);
d2fec595
MS
345 if (sw0 == sw1 && (sw0 & 0x80000000U))
346 /* Success: time is in sync. */
347 return 0;
ca64f639 348 if (!test_bit(CLOCK_SYNC_HAS_STP, &clock_sync_flags))
a8f6db4d 349 return -EOPNOTSUPP;
ca64f639 350 if (!test_bit(CLOCK_SYNC_STP, &clock_sync_flags))
d2fec595
MS
351 return -EACCES;
352 return -EAGAIN;
353}
40277891 354EXPORT_SYMBOL(get_phys_clock);
d2fec595
MS
355
356/*
ca64f639 357 * Make get_phys_clock() return -EAGAIN.
d2fec595
MS
358 */
359static void disable_sync_clock(void *dummy)
360{
eb7e7d76 361 atomic_t *sw_ptr = this_cpu_ptr(&clock_sync_word);
d2fec595 362 /*
ca64f639 363 * Clear the in-sync bit 2^31. All get_phys_clock calls will
d2fec595
MS
364 * fail until the sync bit is turned back on. In addition
365 * increase the "sequence" counter to avoid the race of an
ca64f639 366 * stp event and the complete recovery against get_phys_clock.
d2fec595 367 */
805de8f4 368 atomic_andnot(0x80000000, sw_ptr);
d2fec595
MS
369 atomic_inc(sw_ptr);
370}
371
372/*
ca64f639 373 * Make get_phys_clock() return 0 again.
d2fec595
MS
374 * Needs to be called from a context disabled for preemption.
375 */
376static void enable_sync_clock(void)
377{
eb7e7d76 378 atomic_t *sw_ptr = this_cpu_ptr(&clock_sync_word);
805de8f4 379 atomic_or(0x80000000, sw_ptr);
d2fec595
MS
380}
381
8283cb43
MS
382/*
383 * Function to check if the clock is in sync.
384 */
385static inline int check_sync_clock(void)
386{
387 atomic_t *sw_ptr;
388 int rc;
389
390 sw_ptr = &get_cpu_var(clock_sync_word);
391 rc = (atomic_read(sw_ptr) & 0x80000000U) != 0;
bd119ee2 392 put_cpu_var(clock_sync_word);
8283cb43
MS
393 return rc;
394}
395
b1c0854d
MS
396/*
397 * Apply clock delta to the global data structures.
398 * This is called once on the CPU that performed the clock sync.
399 */
400static void clock_sync_global(unsigned long long delta)
401{
75c7b6f3 402 unsigned long now, adj;
b1c0854d
MS
403 struct ptff_qto qto;
404
405 /* Fixup the monotonic sched clock. */
406 sched_clock_base_cc += delta;
75c7b6f3
MS
407 /* Adjust TOD steering parameters. */
408 vdso_data->tb_update_count++;
409 now = get_tod_clock();
410 adj = tod_steering_end - now;
411 if (unlikely((s64) adj >= 0))
412 /* Calculate how much of the old adjustment is left. */
191ce9d1 413 tod_steering_delta = (tod_steering_delta < 0) ?
75c7b6f3
MS
414 -(adj >> 15) : (adj >> 15);
415 tod_steering_delta += delta;
416 if ((abs(tod_steering_delta) >> 48) != 0)
417 panic("TOD clock sync offset %lli is too large to drift\n",
418 tod_steering_delta);
419 tod_steering_end = now + (abs(tod_steering_delta) << 15);
420 vdso_data->ts_dir = (tod_steering_delta < 0) ? 0 : 1;
421 vdso_data->ts_end = tod_steering_end;
422 vdso_data->tb_update_count++;
b1c0854d
MS
423 /* Update LPAR offset. */
424 if (ptff_query(PTFF_QTO) && ptff(&qto, sizeof(qto), PTFF_QTO) == 0)
425 lpar_offset = qto.tod_epoch_difference;
426 /* Call the TOD clock change notifier. */
427 atomic_notifier_call_chain(&s390_epoch_delta_notifier, 0, &delta);
428}
429
430/*
431 * Apply clock delta to the per-CPU data structures of this CPU.
432 * This is called for each online CPU after the call to clock_sync_global.
433 */
434static void clock_sync_local(unsigned long long delta)
435{
436 /* Add the delta to the clock comparator. */
437 if (S390_lowcore.clock_comparator != -1ULL) {
438 S390_lowcore.clock_comparator += delta;
439 set_clock_comparator(S390_lowcore.clock_comparator);
440 }
2ace06ec
MS
441 /* Adjust the last_update_clock time-stamp. */
442 S390_lowcore.last_update_clock += delta;
b1c0854d
MS
443}
444
ca64f639 445/* Single threaded workqueue used for stp sync events */
750887de
HC
446static struct workqueue_struct *time_sync_wq;
447
448static void __init time_init_wq(void)
449{
179cb81a
HC
450 if (time_sync_wq)
451 return;
452 time_sync_wq = create_singlethread_workqueue("timesync");
750887de
HC
453}
454
d2fec595 455struct clock_sync_data {
750887de 456 atomic_t cpus;
5a62b192 457 int in_sync;
b1c0854d 458 unsigned long long clock_delta;
d2fec595 459};
5a62b192 460
d2fec595
MS
461/*
462 * Server Time Protocol (STP) code.
463 */
4cc7ecb7 464static bool stp_online;
d2fec595
MS
465static struct stp_sstpi stp_info;
466static void *stp_page;
467
468static void stp_work_fn(struct work_struct *work);
0b3016b7 469static DEFINE_MUTEX(stp_work_mutex);
d2fec595 470static DECLARE_WORK(stp_work, stp_work_fn);
04362301 471static struct timer_list stp_timer;
d2fec595
MS
472
473static int __init early_parse_stp(char *p)
474{
4cc7ecb7 475 return kstrtobool(p, &stp_online);
d2fec595
MS
476}
477early_param("stp", early_parse_stp);
478
479/*
480 * Reset STP attachment.
481 */
8f847003 482static void __init stp_reset(void)
d2fec595
MS
483{
484 int rc;
485
d7d1104f 486 stp_page = (void *) get_zeroed_page(GFP_ATOMIC);
2f82f577 487 rc = chsc_sstpc(stp_page, STP_OP_CTRL, 0x0000, NULL);
4a672cfa 488 if (rc == 0)
d2fec595
MS
489 set_bit(CLOCK_SYNC_HAS_STP, &clock_sync_flags);
490 else if (stp_online) {
baebc70a 491 pr_warn("The real or virtual hardware system does not provide an STP interface\n");
d7d1104f 492 free_page((unsigned long) stp_page);
d2fec595 493 stp_page = NULL;
970ba6ac 494 stp_online = false;
d2fec595
MS
495 }
496}
497
04362301
MS
498static void stp_timeout(unsigned long dummy)
499{
500 queue_work(time_sync_wq, &stp_work);
501}
502
d2fec595
MS
503static int __init stp_init(void)
504{
750887de
HC
505 if (!test_bit(CLOCK_SYNC_HAS_STP, &clock_sync_flags))
506 return 0;
04362301 507 setup_timer(&stp_timer, stp_timeout, 0UL);
750887de
HC
508 time_init_wq();
509 if (!stp_online)
510 return 0;
511 queue_work(time_sync_wq, &stp_work);
d2fec595
MS
512 return 0;
513}
514
515arch_initcall(stp_init);
516
517/*
518 * STP timing alert. There are three causes:
519 * 1) timing status change
520 * 2) link availability change
521 * 3) time control parameter change
522 * In all three cases we are only interested in the clock source state.
523 * If a STP clock source is now available use it.
524 */
525static void stp_timing_alert(struct stp_irq_parm *intparm)
526{
527 if (intparm->tsc || intparm->lac || intparm->tcpc)
750887de 528 queue_work(time_sync_wq, &stp_work);
d2fec595
MS
529}
530
531/*
532 * STP sync check machine check. This is called when the timing state
533 * changes from the synchronized state to the unsynchronized state.
534 * After a STP sync check the clock is not in sync. The machine check
535 * is broadcasted to all cpus at the same time.
536 */
29b0a825 537int stp_sync_check(void)
d2fec595 538{
d2fec595 539 disable_sync_clock(NULL);
29b0a825 540 return 1;
d2fec595
MS
541}
542
543/*
544 * STP island condition machine check. This is called when an attached
545 * server attempts to communicate over an STP link and the servers
546 * have matching CTN ids and have a valid stratum-1 configuration
547 * but the configurations do not match.
548 */
29b0a825 549int stp_island_check(void)
d2fec595 550{
d2fec595 551 disable_sync_clock(NULL);
29b0a825 552 return 1;
d2fec595
MS
553}
554
29b0a825
HC
555void stp_queue_work(void)
556{
557 queue_work(time_sync_wq, &stp_work);
558}
750887de
HC
559
560static int stp_sync_clock(void *data)
d2fec595 561{
b1c0854d 562 struct clock_sync_data *sync = data;
41ad0220 563 unsigned long long clock_delta;
b1c0854d 564 static int first;
d2fec595
MS
565 int rc;
566
d2fec595 567 enable_sync_clock();
b1c0854d
MS
568 if (xchg(&first, 1) == 0) {
569 /* Wait until all other cpus entered the sync function. */
570 while (atomic_read(&sync->cpus) != 0)
571 cpu_relax();
572 rc = 0;
573 if (stp_info.todoff[0] || stp_info.todoff[1] ||
574 stp_info.todoff[2] || stp_info.todoff[3] ||
575 stp_info.tmd != 2) {
576 rc = chsc_sstpc(stp_page, STP_OP_SYNC, 0,
577 &clock_delta);
578 if (rc == 0) {
579 sync->clock_delta = clock_delta;
580 clock_sync_global(clock_delta);
581 rc = chsc_sstpi(stp_page, &stp_info,
582 sizeof(struct stp_sstpi));
583 if (rc == 0 && stp_info.tmd != 2)
584 rc = -EAGAIN;
585 }
d2fec595 586 }
b1c0854d
MS
587 sync->in_sync = rc ? -EAGAIN : 1;
588 xchg(&first, 0);
589 } else {
590 /* Slave */
591 atomic_dec(&sync->cpus);
592 /* Wait for in_sync to be set. */
593 while (READ_ONCE(sync->in_sync) == 0)
594 __udelay(1);
d2fec595 595 }
b1c0854d
MS
596 if (sync->in_sync != 1)
597 /* Didn't work. Clear per-cpu in sync bit again. */
d2fec595 598 disable_sync_clock(NULL);
b1c0854d
MS
599 /* Apply clock delta to per-CPU fields of this CPU. */
600 clock_sync_local(sync->clock_delta);
601
750887de
HC
602 return 0;
603}
d2fec595 604
750887de
HC
605/*
606 * STP work. Check for the STP state and take over the clock
607 * synchronization if the STP clock source is usable.
608 */
609static void stp_work_fn(struct work_struct *work)
610{
611 struct clock_sync_data stp_sync;
612 int rc;
613
0b3016b7
MS
614 /* prevent multiple execution. */
615 mutex_lock(&stp_work_mutex);
616
750887de 617 if (!stp_online) {
2f82f577 618 chsc_sstpc(stp_page, STP_OP_CTRL, 0x0000, NULL);
04362301 619 del_timer_sync(&stp_timer);
0b3016b7 620 goto out_unlock;
750887de
HC
621 }
622
2f82f577 623 rc = chsc_sstpc(stp_page, STP_OP_CTRL, 0xb0e0, NULL);
750887de 624 if (rc)
0b3016b7 625 goto out_unlock;
750887de
HC
626
627 rc = chsc_sstpi(stp_page, &stp_info, sizeof(struct stp_sstpi));
628 if (rc || stp_info.c == 0)
0b3016b7 629 goto out_unlock;
750887de 630
8283cb43
MS
631 /* Skip synchronization if the clock is already in sync. */
632 if (check_sync_clock())
633 goto out_unlock;
634
750887de
HC
635 memset(&stp_sync, 0, sizeof(stp_sync));
636 get_online_cpus();
637 atomic_set(&stp_sync.cpus, num_online_cpus() - 1);
0f1959f5 638 stop_machine(stp_sync_clock, &stp_sync, cpu_online_mask);
750887de 639 put_online_cpus();
0b3016b7 640
04362301
MS
641 if (!check_sync_clock())
642 /*
643 * There is a usable clock but the synchonization failed.
644 * Retry after a second.
645 */
646 mod_timer(&stp_timer, jiffies + HZ);
647
0b3016b7
MS
648out_unlock:
649 mutex_unlock(&stp_work_mutex);
d2fec595
MS
650}
651
652/*
3fbacffb 653 * STP subsys sysfs interface functions
d2fec595 654 */
3fbacffb
KS
655static struct bus_type stp_subsys = {
656 .name = "stp",
657 .dev_name = "stp",
d2fec595
MS
658};
659
3fbacffb
KS
660static ssize_t stp_ctn_id_show(struct device *dev,
661 struct device_attribute *attr,
c9be0a36 662 char *buf)
d2fec595
MS
663{
664 if (!stp_online)
665 return -ENODATA;
666 return sprintf(buf, "%016llx\n",
667 *(unsigned long long *) stp_info.ctnid);
668}
669
3fbacffb 670static DEVICE_ATTR(ctn_id, 0400, stp_ctn_id_show, NULL);
d2fec595 671
3fbacffb
KS
672static ssize_t stp_ctn_type_show(struct device *dev,
673 struct device_attribute *attr,
c9be0a36 674 char *buf)
d2fec595
MS
675{
676 if (!stp_online)
677 return -ENODATA;
678 return sprintf(buf, "%i\n", stp_info.ctn);
679}
680
3fbacffb 681static DEVICE_ATTR(ctn_type, 0400, stp_ctn_type_show, NULL);
d2fec595 682
3fbacffb
KS
683static ssize_t stp_dst_offset_show(struct device *dev,
684 struct device_attribute *attr,
c9be0a36 685 char *buf)
d2fec595
MS
686{
687 if (!stp_online || !(stp_info.vbits & 0x2000))
688 return -ENODATA;
689 return sprintf(buf, "%i\n", (int)(s16) stp_info.dsto);
690}
691
3fbacffb 692static DEVICE_ATTR(dst_offset, 0400, stp_dst_offset_show, NULL);
d2fec595 693
3fbacffb
KS
694static ssize_t stp_leap_seconds_show(struct device *dev,
695 struct device_attribute *attr,
c9be0a36 696 char *buf)
d2fec595
MS
697{
698 if (!stp_online || !(stp_info.vbits & 0x8000))
699 return -ENODATA;
700 return sprintf(buf, "%i\n", (int)(s16) stp_info.leaps);
701}
702
3fbacffb 703static DEVICE_ATTR(leap_seconds, 0400, stp_leap_seconds_show, NULL);
d2fec595 704
3fbacffb
KS
705static ssize_t stp_stratum_show(struct device *dev,
706 struct device_attribute *attr,
c9be0a36 707 char *buf)
d2fec595
MS
708{
709 if (!stp_online)
710 return -ENODATA;
711 return sprintf(buf, "%i\n", (int)(s16) stp_info.stratum);
712}
713
3fbacffb 714static DEVICE_ATTR(stratum, 0400, stp_stratum_show, NULL);
d2fec595 715
3fbacffb
KS
716static ssize_t stp_time_offset_show(struct device *dev,
717 struct device_attribute *attr,
c9be0a36 718 char *buf)
d2fec595
MS
719{
720 if (!stp_online || !(stp_info.vbits & 0x0800))
721 return -ENODATA;
722 return sprintf(buf, "%i\n", (int) stp_info.tto);
723}
724
3fbacffb 725static DEVICE_ATTR(time_offset, 0400, stp_time_offset_show, NULL);
d2fec595 726
3fbacffb
KS
727static ssize_t stp_time_zone_offset_show(struct device *dev,
728 struct device_attribute *attr,
c9be0a36 729 char *buf)
d2fec595
MS
730{
731 if (!stp_online || !(stp_info.vbits & 0x4000))
732 return -ENODATA;
733 return sprintf(buf, "%i\n", (int)(s16) stp_info.tzo);
734}
735
3fbacffb 736static DEVICE_ATTR(time_zone_offset, 0400,
d2fec595
MS
737 stp_time_zone_offset_show, NULL);
738
3fbacffb
KS
739static ssize_t stp_timing_mode_show(struct device *dev,
740 struct device_attribute *attr,
c9be0a36 741 char *buf)
d2fec595
MS
742{
743 if (!stp_online)
744 return -ENODATA;
745 return sprintf(buf, "%i\n", stp_info.tmd);
746}
747
3fbacffb 748static DEVICE_ATTR(timing_mode, 0400, stp_timing_mode_show, NULL);
d2fec595 749
3fbacffb
KS
750static ssize_t stp_timing_state_show(struct device *dev,
751 struct device_attribute *attr,
c9be0a36 752 char *buf)
d2fec595
MS
753{
754 if (!stp_online)
755 return -ENODATA;
756 return sprintf(buf, "%i\n", stp_info.tst);
757}
758
3fbacffb 759static DEVICE_ATTR(timing_state, 0400, stp_timing_state_show, NULL);
d2fec595 760
3fbacffb
KS
761static ssize_t stp_online_show(struct device *dev,
762 struct device_attribute *attr,
c9be0a36 763 char *buf)
d2fec595
MS
764{
765 return sprintf(buf, "%i\n", stp_online);
766}
767
3fbacffb
KS
768static ssize_t stp_online_store(struct device *dev,
769 struct device_attribute *attr,
d2fec595
MS
770 const char *buf, size_t count)
771{
772 unsigned int value;
773
774 value = simple_strtoul(buf, NULL, 0);
775 if (value != 0 && value != 1)
776 return -EINVAL;
777 if (!test_bit(CLOCK_SYNC_HAS_STP, &clock_sync_flags))
778 return -EOPNOTSUPP;
8283cb43 779 mutex_lock(&clock_sync_mutex);
d2fec595 780 stp_online = value;
8283cb43
MS
781 if (stp_online)
782 set_bit(CLOCK_SYNC_STP, &clock_sync_flags);
783 else
784 clear_bit(CLOCK_SYNC_STP, &clock_sync_flags);
750887de 785 queue_work(time_sync_wq, &stp_work);
8283cb43 786 mutex_unlock(&clock_sync_mutex);
d2fec595
MS
787 return count;
788}
789
790/*
3fbacffb
KS
791 * Can't use DEVICE_ATTR because the attribute should be named
792 * stp/online but dev_attr_online already exists in this file ..
d2fec595 793 */
3fbacffb 794static struct device_attribute dev_attr_stp_online = {
d2fec595
MS
795 .attr = { .name = "online", .mode = 0600 },
796 .show = stp_online_show,
797 .store = stp_online_store,
798};
799
3fbacffb
KS
800static struct device_attribute *stp_attributes[] = {
801 &dev_attr_ctn_id,
802 &dev_attr_ctn_type,
803 &dev_attr_dst_offset,
804 &dev_attr_leap_seconds,
805 &dev_attr_stp_online,
806 &dev_attr_stratum,
807 &dev_attr_time_offset,
808 &dev_attr_time_zone_offset,
809 &dev_attr_timing_mode,
810 &dev_attr_timing_state,
d2fec595
MS
811 NULL
812};
813
814static int __init stp_init_sysfs(void)
815{
3fbacffb 816 struct device_attribute **attr;
d2fec595
MS
817 int rc;
818
3fbacffb 819 rc = subsys_system_register(&stp_subsys, NULL);
d2fec595
MS
820 if (rc)
821 goto out;
822 for (attr = stp_attributes; *attr; attr++) {
3fbacffb 823 rc = device_create_file(stp_subsys.dev_root, *attr);
d2fec595
MS
824 if (rc)
825 goto out_unreg;
826 }
827 return 0;
828out_unreg:
829 for (; attr >= stp_attributes; attr--)
3fbacffb
KS
830 device_remove_file(stp_subsys.dev_root, *attr);
831 bus_unregister(&stp_subsys);
d2fec595
MS
832out:
833 return rc;
834}
835
836device_initcall(stp_init_sysfs);