Merge tag 'block-pull-request' of https://gitlab.com/stefanha/qemu into staging
[qemu.git] / hw / ppc / spapr_rtc.c
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-common.h"
30 #include "qemu/timer.h"
31 #include "sysemu/sysemu.h"
32 #include "hw/ppc/spapr.h"
33 #include "migration/vmstate.h"
34 #include "qapi/error.h"
35 #include "qapi/qapi-events-misc-target.h"
36 #include "qemu/cutils.h"
37 #include "qemu/module.h"
38
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
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
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
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 struct tm tm;
101 time_t new_s;
102 int64_t host_ns;
103
104 if ((nargs != 7) || (nret != 1)) {
105 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR);
106 return;
107 }
108
109 tm.tm_year = rtas_ld(args, 0) - 1900;
110 tm.tm_mon = rtas_ld(args, 1) - 1;
111 tm.tm_mday = rtas_ld(args, 2);
112 tm.tm_hour = rtas_ld(args, 3);
113 tm.tm_min = rtas_ld(args, 4);
114 tm.tm_sec = rtas_ld(args, 5);
115
116 new_s = mktimegm(&tm);
117 if (new_s == -1) {
118 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR);
119 return;
120 }
121
122 /* Generate a monitor event for the change */
123 qapi_event_send_rtc_change(qemu_timedate_diff(&tm));
124
125 host_ns = qemu_clock_get_ns(rtc_clock);
126
127 rtc->ns_offset = (new_s * NANOSECONDS_PER_SECOND) - host_ns;
128
129 rtas_st(rets, 0, RTAS_OUT_SUCCESS);
130 }
131
132 static void spapr_rtc_qom_date(Object *obj, struct tm *current_tm, Error **errp)
133 {
134 spapr_rtc_read(SPAPR_RTC(obj), current_tm, NULL);
135 }
136
137 static void spapr_rtc_realize(DeviceState *dev, Error **errp)
138 {
139 SpaprRtcState *rtc = SPAPR_RTC(dev);
140 struct tm tm;
141 time_t host_s;
142 int64_t rtc_ns;
143
144 /* Initialize the RTAS RTC from host time */
145
146 qemu_get_timedate(&tm, 0);
147 host_s = mktimegm(&tm);
148 rtc_ns = qemu_clock_get_ns(rtc_clock);
149 rtc->ns_offset = host_s * NANOSECONDS_PER_SECOND - rtc_ns;
150
151 object_property_add_tm(OBJECT(rtc), "date", spapr_rtc_qom_date);
152 }
153
154 static const VMStateDescription vmstate_spapr_rtc = {
155 .name = "spapr/rtc",
156 .version_id = 1,
157 .minimum_version_id = 1,
158 .fields = (VMStateField[]) {
159 VMSTATE_INT64(ns_offset, SpaprRtcState),
160 VMSTATE_END_OF_LIST()
161 },
162 };
163
164 static void spapr_rtc_class_init(ObjectClass *oc, void *data)
165 {
166 DeviceClass *dc = DEVICE_CLASS(oc);
167
168 dc->realize = spapr_rtc_realize;
169 dc->vmsd = &vmstate_spapr_rtc;
170 /* Reason: This is an internal device only for handling the hypercalls */
171 dc->user_creatable = false;
172
173 spapr_rtas_register(RTAS_GET_TIME_OF_DAY, "get-time-of-day",
174 rtas_get_time_of_day);
175 spapr_rtas_register(RTAS_SET_TIME_OF_DAY, "set-time-of-day",
176 rtas_set_time_of_day);
177 }
178
179 static const TypeInfo spapr_rtc_info = {
180 .name = TYPE_SPAPR_RTC,
181 .parent = TYPE_DEVICE,
182 .instance_size = sizeof(SpaprRtcState),
183 .class_init = spapr_rtc_class_init,
184 };
185
186 static void spapr_rtc_register_types(void)
187 {
188 type_register_static(&spapr_rtc_info);
189 }
190 type_init(spapr_rtc_register_types)