1/*- 2 * Copyright (c) 2011 Nathan Whitehorn 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 */ 26 27#include <sys/cdefs.h> 28__FBSDID("$FreeBSD$"); 29 30#include <sys/param.h> 31#include <sys/systm.h> 32#include <sys/module.h> 33#include <sys/bus.h> 34#include <sys/conf.h> 35#include <sys/clock.h> 36#include <sys/cpu.h> 37#include <sys/kernel.h> 38#include <sys/reboot.h> 39#include <sys/sysctl.h> 40 41#include <dev/ofw/ofw_bus.h> 42#include <dev/ofw/openfirm.h> 43 44#include <machine/rtas.h> 45 46#include "clock_if.h" 47 48static int rtasdev_probe(device_t); 49static int rtasdev_attach(device_t); 50/* clock interface */ 51static int rtas_gettime(device_t dev, struct timespec *ts); 52static int rtas_settime(device_t dev, struct timespec *ts); 53 54static void rtas_shutdown(void *arg, int howto); 55 56static device_method_t rtasdev_methods[] = { 57 /* Device interface */ 58 DEVMETHOD(device_probe, rtasdev_probe), 59 DEVMETHOD(device_attach, rtasdev_attach), 60 61 /* clock interface */ 62 DEVMETHOD(clock_gettime, rtas_gettime), 63 DEVMETHOD(clock_settime, rtas_settime), 64 65 { 0, 0 }, 66}; 67 68static driver_t rtasdev_driver = { 69 "rtas", 70 rtasdev_methods, 71 0 72}; 73 74static devclass_t rtasdev_devclass; 75 76DRIVER_MODULE(rtasdev, ofwbus, rtasdev_driver, rtasdev_devclass, 0, 0); 77 78static int 79rtasdev_probe(device_t dev) 80{ 81 const char *name = ofw_bus_get_name(dev); 82 83 if (strcmp(name, "rtas") != 0) 84 return (ENXIO); 85 if (!rtas_exists()) 86 return (ENXIO); 87 88 device_set_desc(dev, "Run-Time Abstraction Services"); 89 return (0); 90} 91 92static int 93rtasdev_attach(device_t dev) 94{ 95 if (rtas_token_lookup("get-time-of-day") != -1) 96 clock_register(dev, 2000); 97 98 EVENTHANDLER_REGISTER(shutdown_final, rtas_shutdown, NULL, 99 SHUTDOWN_PRI_LAST); 100 101 return (0); 102} 103 104static int 105rtas_gettime(device_t dev, struct timespec *ts) { 106 struct clocktime ct; 107 cell_t tod[8]; 108 cell_t token; 109 int error; 110 111 token = rtas_token_lookup("get-time-of-day"); 112 if (token == -1) 113 return (ENXIO); 114 error = rtas_call_method(token, 0, 8, &tod[0], &tod[1], &tod[2], 115 &tod[3], &tod[4], &tod[5], &tod[6], &tod[7]); 116 if (error < 0) 117 return (ENXIO); 118 if (tod[0] != 0) 119 return ((tod[0] == -1) ? ENXIO : EAGAIN); 120 121 ct.year = tod[1]; 122 ct.mon = tod[2]; 123 ct.day = tod[3]; 124 ct.hour = tod[4]; 125 ct.min = tod[5]; 126 ct.sec = tod[6]; 127 ct.nsec = tod[7]; 128 129 return (clock_ct_to_ts(&ct, ts)); 130} 131 132static int 133rtas_settime(device_t dev, struct timespec *ts) 134{ 135 struct clocktime ct; 136 cell_t token, status; 137 int error; 138 139 token = rtas_token_lookup("set-time-of-day"); 140 if (token == -1) 141 return (ENXIO); 142 143 clock_ts_to_ct(ts, &ct); 144 error = rtas_call_method(token, 7, 1, ct.year, ct.mon, ct.day, ct.hour, 145 ct.min, ct.sec, ct.nsec, &status); 146 if (error < 0) 147 return (ENXIO); 148 if (status != 0) 149 return (((int)status < 0) ? ENXIO : EAGAIN); 150 151 return (0); 152} 153 154static void 155rtas_shutdown(void *arg, int howto) 156{ 157 cell_t token, status; 158 159 if (howto & RB_HALT) { 160 token = rtas_token_lookup("power-off"); 161 if (token == -1) 162 return; 163 164 rtas_call_method(token, 2, 1, 0, 0, &status); 165 } else { 166 token = rtas_token_lookup("system-reboot"); 167 if (token == -1) 168 return; 169 170 rtas_call_method(token, 0, 1, &status); 171 } 172} 173 174