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 "cpu.h" 29 #include "qemu/timer.h" 30 #include "sysemu/sysemu.h" 31 #include "hw/ppc/spapr.h" 32 #include "qapi-event.h" 33 34 #define SPAPR_RTC(obj) \ 35 OBJECT_CHECK(sPAPRRTCState, (obj), TYPE_SPAPR_RTC) 36 37 typedef struct sPAPRRTCState sPAPRRTCState; 38 struct sPAPRRTCState { 39 /*< private >*/ 40 SysBusDevice parent_obj; 41 int64_t ns_offset; 42 }; 43 44 void spapr_rtc_read(DeviceState *dev, struct tm *tm, uint32_t *ns) 45 { 46 sPAPRRTCState *rtc = SPAPR_RTC(dev); 47 int64_t host_ns = qemu_clock_get_ns(rtc_clock); 48 int64_t guest_ns; 49 time_t guest_s; 50 51 assert(rtc); 52 53 guest_ns = host_ns + rtc->ns_offset; 54 guest_s = guest_ns / NSEC_PER_SEC; 55 56 if (tm) { 57 gmtime_r(&guest_s, tm); 58 } 59 if (ns) { 60 *ns = guest_ns; 61 } 62 } 63 64 int spapr_rtc_import_offset(DeviceState *dev, int64_t legacy_offset) 65 { 66 sPAPRRTCState *rtc; 67 68 if (!dev) { 69 return -ENODEV; 70 } 71 72 rtc = SPAPR_RTC(dev); 73 74 rtc->ns_offset = legacy_offset * NSEC_PER_SEC; 75 76 return 0; 77 } 78 79 static void rtas_get_time_of_day(PowerPCCPU *cpu, sPAPRMachineState *spapr, 80 uint32_t token, uint32_t nargs, 81 target_ulong args, 82 uint32_t nret, target_ulong rets) 83 { 84 struct tm tm; 85 uint32_t ns; 86 87 if ((nargs != 0) || (nret != 8)) { 88 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 89 return; 90 } 91 92 if (!spapr->rtc) { 93 rtas_st(rets, 0, RTAS_OUT_HW_ERROR); 94 return; 95 } 96 97 spapr_rtc_read(spapr->rtc, &tm, &ns); 98 99 rtas_st(rets, 0, RTAS_OUT_SUCCESS); 100 rtas_st(rets, 1, tm.tm_year + 1900); 101 rtas_st(rets, 2, tm.tm_mon + 1); 102 rtas_st(rets, 3, tm.tm_mday); 103 rtas_st(rets, 4, tm.tm_hour); 104 rtas_st(rets, 5, tm.tm_min); 105 rtas_st(rets, 6, tm.tm_sec); 106 rtas_st(rets, 7, ns); 107 } 108 109 static void rtas_set_time_of_day(PowerPCCPU *cpu, sPAPRMachineState *spapr, 110 uint32_t token, uint32_t nargs, 111 target_ulong args, 112 uint32_t nret, target_ulong rets) 113 { 114 sPAPRRTCState *rtc; 115 struct tm tm; 116 time_t new_s; 117 int64_t host_ns; 118 119 if ((nargs != 7) || (nret != 1)) { 120 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 121 return; 122 } 123 124 if (!spapr->rtc) { 125 rtas_st(rets, 0, RTAS_OUT_HW_ERROR); 126 return; 127 } 128 129 tm.tm_year = rtas_ld(args, 0) - 1900; 130 tm.tm_mon = rtas_ld(args, 1) - 1; 131 tm.tm_mday = rtas_ld(args, 2); 132 tm.tm_hour = rtas_ld(args, 3); 133 tm.tm_min = rtas_ld(args, 4); 134 tm.tm_sec = rtas_ld(args, 5); 135 136 new_s = mktimegm(&tm); 137 if (new_s == -1) { 138 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 139 return; 140 } 141 142 /* Generate a monitor event for the change */ 143 qapi_event_send_rtc_change(qemu_timedate_diff(&tm), &error_abort); 144 145 rtc = SPAPR_RTC(spapr->rtc); 146 147 host_ns = qemu_clock_get_ns(rtc_clock); 148 149 rtc->ns_offset = (new_s * NSEC_PER_SEC) - host_ns; 150 151 rtas_st(rets, 0, RTAS_OUT_SUCCESS); 152 } 153 154 static void spapr_rtc_qom_date(Object *obj, struct tm *current_tm, Error **errp) 155 { 156 spapr_rtc_read(DEVICE(obj), current_tm, NULL); 157 } 158 159 static void spapr_rtc_realize(DeviceState *dev, Error **errp) 160 { 161 sPAPRRTCState *rtc = SPAPR_RTC(dev); 162 struct tm tm; 163 time_t host_s; 164 int64_t rtc_ns; 165 166 /* Initialize the RTAS RTC from host time */ 167 168 qemu_get_timedate(&tm, 0); 169 host_s = mktimegm(&tm); 170 rtc_ns = qemu_clock_get_ns(rtc_clock); 171 rtc->ns_offset = host_s * NSEC_PER_SEC - rtc_ns; 172 173 object_property_add_tm(OBJECT(rtc), "date", spapr_rtc_qom_date, NULL); 174 } 175 176 static const VMStateDescription vmstate_spapr_rtc = { 177 .name = "spapr/rtc", 178 .version_id = 1, 179 .minimum_version_id = 1, 180 .fields = (VMStateField[]) { 181 VMSTATE_INT64(ns_offset, sPAPRRTCState), 182 VMSTATE_END_OF_LIST() 183 }, 184 }; 185 186 static void spapr_rtc_class_init(ObjectClass *oc, void *data) 187 { 188 DeviceClass *dc = DEVICE_CLASS(oc); 189 190 dc->realize = spapr_rtc_realize; 191 dc->vmsd = &vmstate_spapr_rtc; 192 193 spapr_rtas_register(RTAS_GET_TIME_OF_DAY, "get-time-of-day", 194 rtas_get_time_of_day); 195 spapr_rtas_register(RTAS_SET_TIME_OF_DAY, "set-time-of-day", 196 rtas_set_time_of_day); 197 } 198 199 static const TypeInfo spapr_rtc_info = { 200 .name = TYPE_SPAPR_RTC, 201 .parent = TYPE_SYS_BUS_DEVICE, 202 .instance_size = sizeof(sPAPRRTCState), 203 .class_size = sizeof(XICSStateClass), 204 .class_init = spapr_rtc_class_init, 205 }; 206 207 static void spapr_rtc_register_types(void) 208 { 209 type_register_static(&spapr_rtc_info); 210 } 211 type_init(spapr_rtc_register_types) 212