1 /*
2 * QEMU PowerPC pSeries Logical Partition (aka sPAPR) hardware System Emulator
3 *
4 * RTAS Real Time Clock
5 *
6 * Copyright (c) 2010-2011 David Gibson, IBM Corporation.
7 * Copyright 2014 David Gibson, Red Hat.
8 *
9 * Permission is hereby granted, free of charge, to any person obtaining a copy
10 * of this software and associated documentation files (the "Software"), to deal
11 * in the Software without restriction, including without limitation the rights
12 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
13 * copies of the Software, and to permit persons to whom the Software is
14 * furnished to do so, subject to the following conditions:
15 *
16 * The above copyright notice and this permission notice shall be included in
17 * all copies or substantial portions of the Software.
18 *
19 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
20 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
21 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
22 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
23 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
24 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
25 * THE SOFTWARE.
26 */
27
28 #include "qemu/osdep.h"
29 #include "qemu/timer.h"
30 #include "sysemu/sysemu.h"
31 #include "sysemu/rtc.h"
32 #include "hw/ppc/spapr.h"
33 #include "migration/vmstate.h"
34 #include "qapi/error.h"
35 #include "qapi/qapi-events-misc.h"
36 #include "qemu/cutils.h"
37 #include "qemu/module.h"
38
spapr_rtc_read(SpaprRtcState * rtc,struct tm * tm,uint32_t * ns)39 void spapr_rtc_read(SpaprRtcState *rtc, struct tm *tm, uint32_t *ns)
40 {
41 int64_t host_ns = qemu_clock_get_ns(rtc_clock);
42 int64_t guest_ns;
43 time_t guest_s;
44
45 assert(rtc);
46
47 guest_ns = host_ns + rtc->ns_offset;
48 guest_s = guest_ns / NANOSECONDS_PER_SECOND;
49
50 if (tm) {
51 gmtime_r(&guest_s, tm);
52 }
53 if (ns) {
54 *ns = guest_ns;
55 }
56 }
57
spapr_rtc_import_offset(SpaprRtcState * rtc,int64_t legacy_offset)58 int spapr_rtc_import_offset(SpaprRtcState *rtc, int64_t legacy_offset)
59 {
60 if (!rtc) {
61 return -ENODEV;
62 }
63
64 rtc->ns_offset = legacy_offset * NANOSECONDS_PER_SECOND;
65
66 return 0;
67 }
68
rtas_get_time_of_day(PowerPCCPU * cpu,SpaprMachineState * spapr,uint32_t token,uint32_t nargs,target_ulong args,uint32_t nret,target_ulong rets)69 static void rtas_get_time_of_day(PowerPCCPU *cpu, SpaprMachineState *spapr,
70 uint32_t token, uint32_t nargs,
71 target_ulong args,
72 uint32_t nret, target_ulong rets)
73 {
74 struct tm tm;
75 uint32_t ns;
76
77 if ((nargs != 0) || (nret != 8)) {
78 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR);
79 return;
80 }
81
82 spapr_rtc_read(&spapr->rtc, &tm, &ns);
83
84 rtas_st(rets, 0, RTAS_OUT_SUCCESS);
85 rtas_st(rets, 1, tm.tm_year + 1900);
86 rtas_st(rets, 2, tm.tm_mon + 1);
87 rtas_st(rets, 3, tm.tm_mday);
88 rtas_st(rets, 4, tm.tm_hour);
89 rtas_st(rets, 5, tm.tm_min);
90 rtas_st(rets, 6, tm.tm_sec);
91 rtas_st(rets, 7, ns);
92 }
93
rtas_set_time_of_day(PowerPCCPU * cpu,SpaprMachineState * spapr,uint32_t token,uint32_t nargs,target_ulong args,uint32_t nret,target_ulong rets)94 static void rtas_set_time_of_day(PowerPCCPU *cpu, SpaprMachineState *spapr,
95 uint32_t token, uint32_t nargs,
96 target_ulong args,
97 uint32_t nret, target_ulong rets)
98 {
99 SpaprRtcState *rtc = &spapr->rtc;
100 g_autofree const char *qom_path = NULL;
101 struct tm tm;
102 time_t new_s;
103 int64_t host_ns;
104
105 if ((nargs != 7) || (nret != 1)) {
106 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR);
107 return;
108 }
109
110 tm.tm_year = rtas_ld(args, 0) - 1900;
111 tm.tm_mon = rtas_ld(args, 1) - 1;
112 tm.tm_mday = rtas_ld(args, 2);
113 tm.tm_hour = rtas_ld(args, 3);
114 tm.tm_min = rtas_ld(args, 4);
115 tm.tm_sec = rtas_ld(args, 5);
116
117 new_s = mktimegm(&tm);
118 if (new_s == -1) {
119 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR);
120 return;
121 }
122
123 /* Generate a monitor event for the change */
124 qom_path = object_get_canonical_path(OBJECT(rtc));
125 qapi_event_send_rtc_change(qemu_timedate_diff(&tm), qom_path);
126
127 host_ns = qemu_clock_get_ns(rtc_clock);
128
129 rtc->ns_offset = (new_s * NANOSECONDS_PER_SECOND) - host_ns;
130
131 rtas_st(rets, 0, RTAS_OUT_SUCCESS);
132 }
133
spapr_rtc_qom_date(Object * obj,struct tm * current_tm,Error ** errp)134 static void spapr_rtc_qom_date(Object *obj, struct tm *current_tm, Error **errp)
135 {
136 spapr_rtc_read(SPAPR_RTC(obj), current_tm, NULL);
137 }
138
spapr_rtc_realize(DeviceState * dev,Error ** errp)139 static void spapr_rtc_realize(DeviceState *dev, Error **errp)
140 {
141 SpaprRtcState *rtc = SPAPR_RTC(dev);
142 struct tm tm;
143 time_t host_s;
144 int64_t rtc_ns;
145
146 /* Initialize the RTAS RTC from host time */
147
148 qemu_get_timedate(&tm, 0);
149 host_s = mktimegm(&tm);
150 rtc_ns = qemu_clock_get_ns(rtc_clock);
151 rtc->ns_offset = host_s * NANOSECONDS_PER_SECOND - rtc_ns;
152
153 object_property_add_tm(OBJECT(rtc), "date", spapr_rtc_qom_date);
154 }
155
156 static const VMStateDescription vmstate_spapr_rtc = {
157 .name = "spapr/rtc",
158 .version_id = 1,
159 .minimum_version_id = 1,
160 .fields = (const VMStateField[]) {
161 VMSTATE_INT64(ns_offset, SpaprRtcState),
162 VMSTATE_END_OF_LIST()
163 },
164 };
165
spapr_rtc_class_init(ObjectClass * oc,void * data)166 static void spapr_rtc_class_init(ObjectClass *oc, void *data)
167 {
168 DeviceClass *dc = DEVICE_CLASS(oc);
169
170 dc->realize = spapr_rtc_realize;
171 dc->vmsd = &vmstate_spapr_rtc;
172 /* Reason: This is an internal device only for handling the hypercalls */
173 dc->user_creatable = false;
174
175 spapr_rtas_register(RTAS_GET_TIME_OF_DAY, "get-time-of-day",
176 rtas_get_time_of_day);
177 spapr_rtas_register(RTAS_SET_TIME_OF_DAY, "set-time-of-day",
178 rtas_set_time_of_day);
179 }
180
181 static const TypeInfo spapr_rtc_info = {
182 .name = TYPE_SPAPR_RTC,
183 .parent = TYPE_DEVICE,
184 .instance_size = sizeof(SpaprRtcState),
185 .class_init = spapr_rtc_class_init,
186 };
187
spapr_rtc_register_types(void)188 static void spapr_rtc_register_types(void)
189 {
190 type_register_static(&spapr_rtc_info);
191 }
192 type_init(spapr_rtc_register_types)
193