1 /* CLOCK.H (c) Copyright Jan Jaeger, 2000-2009 */
2 /* TOD Clock functions */
3
4 #if !defined(_CLOCK_C_)
5 #define _CLOCK_EXTERN extern
6 #else
7 #undef _CLOCK_EXTERN
8 #define _CLOCK_EXTERN
9 #endif
10
11
12 #if !defined(_CLOCK_H_)
13 #define _CLOCK_H_
14
15 /* Clock Steering Registers */
16 typedef struct _CSR {
17 U64 start_time;
18 S64 base_offset;
19 S32 fine_s_rate;
20 S32 gross_s_rate;
21 } CSR;
22
23
24 void csr_reset(void); /* Reset cs registers */
25 void set_tod_steering(double); /* Set steering rate */
26 double get_tod_steering(void); /* Get steering rate */
27 U64 update_tod_clock(void); /* Update the TOD clock */
28 void update_cpu_timer(void); /* Update the CPU timer */
29 void set_tod_epoch(S64); /* Set TOD epoch */
30 void adjust_tod_epoch(S64); /* Adjust TOD epoch */
31 S64 get_tod_epoch(void); /* Get TOD epoch */
32 U64 hw_clock(void); /* Get hardware clock */
33 S64 cpu_timer(REGS *); /* Retrieve CPU timer */
34 void set_cpu_timer(REGS *, S64); /* Set CPU timer */
35 S32 int_timer(REGS *); /* Get interval timer */
36 void set_int_timer(REGS *, S32); /* Set interval timer */
37 U64 tod_clock(REGS *); /* Get TOD clock */
38 void set_tod_clock(U64); /* Set TOD clock */
39 int chk_int_timer(REGS *); /* Check int_timer pending */
40 int clock_hsuspend(void *file); /* Hercules suspend */
41 int clock_hresume(void *file); /* Hercules resume */
42
host_tod(void)43 static __inline__ U64 host_tod(void)
44 {
45 struct timeval tv;
46 gettimeofday (&tv, NULL);
47 return (U64)tv.tv_sec*1000000 + tv.tv_usec;
48 }
49
50 #endif
51
52 DLL_EXPORT void ARCH_DEP(store_int_timer) (REGS *);
53 void ARCH_DEP(store_int_timer_nolock) (REGS *);
54 DLL_EXPORT void ARCH_DEP(fetch_int_timer) (REGS *);
55
56 void ARCH_DEP(set_gross_s_rate) (REGS *);
57 void ARCH_DEP(set_fine_s_rate) (REGS *);
58 void ARCH_DEP(set_tod_offset) (REGS *);
59 void ARCH_DEP(adjust_tod_offset) (REGS *);
60 void ARCH_DEP(query_physical_clock) (REGS *);
61 void ARCH_DEP(query_steering_information) (REGS *);
62 void ARCH_DEP(query_tod_offset) (REGS *);
63 void ARCH_DEP(query_available_functions) (REGS *);
64
65
66 _CLOCK_EXTERN U64 tod_value; /* Bits 0-7 TOD clock epoch */
67 /* Bits b-63 TOD bits 0-55 */
68
69 _CLOCK_EXTERN S64 tod_epoch; /* Bits 0-7 TOD clock epoch */
70 /* Bits 8-63 offset bits 0-55*/
71
72 _CLOCK_EXTERN U64 hw_tod; /* Hardware clock */
73
74
75 #define SECONDS_IN_SEVENTY_YEARS ((70*365 + 17) * 86400ULL)
76
77 #define TOD_4YEARS (1461*24*60*60*16000000LL)
78 #define TOD_LYEAR (366*24*60*60*16000000LL)
79 #define TOD_YEAR (365*24*60*60*16000000LL)
80 #define TOD_DAY (24*60*60*16000000LL)
81 #define TOD_HOUR (60*60*16000000LL)
82 #define TOD_MIN (60*16000000LL)
83 #define TOD_SEC (16000000LL)
84 #define TOD_USEC (16LL)
85
86
87 #define ITIMER_TO_TOD(_units) \
88 ((S64)(625*((S64)(_units))/3))
89
90 #define TOD_TO_ITIMER(_units) \
91 ((S32)(3*(_units)/625))
92
93 #define TOD_CLOCK(_regs) \
94 (tod_value + (_regs)->tod_epoch)
95
96 #define CPU_TIMER(_regs) \
97 ((S64)((_regs)->cpu_timer - hw_tod))
98
99 #define INT_TIMER(_regs) \
100 ((S32)TOD_TO_ITIMER((S64)((_regs)->int_timer - hw_tod)))
101
102 #define ITIMER_ACCESS(_addr, _len) \
103 (unlikely(unlikely((_addr) < 84) && (((_addr) + (_len)) >= 80)))
104
105 #undef ITIMER_UPDATE
106 #undef ITIMER_SYNC
107 #if defined(FEATURE_INTERVAL_TIMER)
108 #define ITIMER_UPDATE(_addr, _len, _regs) \
109 do { \
110 if( ITIMER_ACCESS((_addr), (_len)) ) \
111 ARCH_DEP(fetch_int_timer) ((_regs)); \
112 } while(0)
113 #define ITIMER_SYNC(_addr, _len, _regs) \
114 do { \
115 if( ITIMER_ACCESS((_addr), (_len)) ) \
116 ARCH_DEP(store_int_timer) ((_regs)); \
117 } while (0)
118 #else
119 #define ITIMER_UPDATE(_addr, _len, _regs)
120 #define ITIMER_SYNC(_addr, _len, _regs)
121 #endif
122