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/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
  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     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
 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
 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 = (VMStateField[]) {
 161         VMSTATE_INT64(ns_offset, SpaprRtcState),
 162         VMSTATE_END_OF_LIST()
 163     },
 164 };
 165
 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
 188 static void spapr_rtc_register_types(void)
 189 {
 190     type_register_static(&spapr_rtc_info);
 191 }
 192 type_init(spapr_rtc_register_types)