Home | History | Annotate | Line # | Download | only in kern
kern_todr.c revision 1.12.4.2
      1 /*	$NetBSD: kern_todr.c,v 1.12.4.2 2006/09/09 02:57:16 rpaulo Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1992, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * This code is derived from software contributed to Berkeley by
      8  * the Systems Programming Group of the University of Utah Computer
      9  * Science Department and Ralph Campbell.
     10  *
     11  * Redistribution and use in source and binary forms, with or without
     12  * modification, are permitted provided that the following conditions
     13  * are met:
     14  * 1. Redistributions of source code must retain the above copyright
     15  *    notice, this list of conditions and the following disclaimer.
     16  * 2. Redistributions in binary form must reproduce the above copyright
     17  *    notice, this list of conditions and the following disclaimer in the
     18  *    documentation and/or other materials provided with the distribution.
     19  * 3. Neither the name of the University nor the names of its contributors
     20  *    may be used to endorse or promote products derived from this software
     21  *    without specific prior written permission.
     22  *
     23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33  * SUCH DAMAGE.
     34  *
     35  * from: Utah Hdr: clock.c 1.18 91/01/21
     36  *
     37  *	@(#)clock.c	8.1 (Berkeley) 6/10/93
     38  */
     39 /*
     40  * Copyright (c) 1988 University of Utah.
     41  *
     42  * This code is derived from software contributed to Berkeley by
     43  * the Systems Programming Group of the University of Utah Computer
     44  * Science Department and Ralph Campbell.
     45  *
     46  * Redistribution and use in source and binary forms, with or without
     47  * modification, are permitted provided that the following conditions
     48  * are met:
     49  * 1. Redistributions of source code must retain the above copyright
     50  *    notice, this list of conditions and the following disclaimer.
     51  * 2. Redistributions in binary form must reproduce the above copyright
     52  *    notice, this list of conditions and the following disclaimer in the
     53  *    documentation and/or other materials provided with the distribution.
     54  * 3. All advertising materials mentioning features or use of this software
     55  *    must display the following acknowledgement:
     56  *	This product includes software developed by the University of
     57  *	California, Berkeley and its contributors.
     58  * 4. Neither the name of the University nor the names of its contributors
     59  *    may be used to endorse or promote products derived from this software
     60  *    without specific prior written permission.
     61  *
     62  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     63  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     64  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     65  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     66  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     67  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     68  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     69  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     70  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     71  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     72  * SUCH DAMAGE.
     73  *
     74  * from: Utah Hdr: clock.c 1.18 91/01/21
     75  *
     76  *	@(#)clock.c	8.1 (Berkeley) 6/10/93
     77  */
     78 #include <sys/cdefs.h>
     79 __KERNEL_RCSID(0, "$NetBSD: kern_todr.c,v 1.12.4.2 2006/09/09 02:57:16 rpaulo Exp $");
     80 
     81 #include <sys/param.h>
     82 #include <sys/kernel.h>
     83 #include <sys/systm.h>
     84 #include <sys/device.h>
     85 #include <sys/timetc.h>
     86 #include <dev/clock_subr.h>	/* hmm.. this should probably move to sys */
     87 
     88 #ifdef	__HAVE_GENERIC_TODR
     89 
     90 static todr_chip_handle_t todr_handle = NULL;
     91 
     92 /*
     93  * Attach the clock device to todr_handle.
     94  */
     95 void
     96 todr_attach(todr_chip_handle_t todr)
     97 {
     98 
     99         if (todr_handle) {
    100                 printf("todr_attach: TOD already configured\n");
    101 		return;
    102 	}
    103         todr_handle = todr;
    104 }
    105 
    106 static int timeset = 0;
    107 
    108 /*
    109  * Set up the system's time, given a `reasonable' time value.
    110  */
    111 void
    112 inittodr(time_t base)
    113 {
    114 	int badbase = 0, waszero = (base == 0), goodtime = 0, badrtc = 0;
    115 	int s;
    116 #ifdef	__HAVE_TIMECOUNTER
    117 	struct timespec ts;
    118 #endif
    119 	struct timeval tv;
    120 
    121 	if (base < 5 * SECYR) {
    122 		struct clock_ymdhms basedate;
    123 
    124 		/*
    125 		 * If base is 0, assume filesystem time is just unknown
    126 		 * instead of preposterous. Don't bark.
    127 		 */
    128 		if (base != 0)
    129 			printf("WARNING: preposterous time in file system\n");
    130 		/* not going to use it anyway, if the chip is readable */
    131 		basedate.dt_year = 2006;
    132 		basedate.dt_mon = 1;
    133 		basedate.dt_day = 1;
    134 		basedate.dt_hour = 12;
    135 		basedate.dt_min = 0;
    136 		basedate.dt_sec = 0;
    137 		base = clock_ymdhms_to_secs(&basedate);
    138 		badbase = 1;
    139 	}
    140 
    141 	/*
    142 	 * Some ports need to be supplied base in order to fabricate a time_t.
    143 	 */
    144 	tv.tv_sec = base;
    145 	tv.tv_usec = 0;
    146 
    147 	if ((todr_handle == NULL) ||
    148 	    (todr_gettime(todr_handle, &tv) != 0) ||
    149 	    (tv.tv_sec < (5 * SECYR))) {
    150 
    151 		if (todr_handle != NULL)
    152 			printf("WARNING: preposterous TOD clock time\n");
    153 		else
    154 			printf("WARNING: no TOD clock present\n");
    155 		badrtc = 1;
    156 	} else {
    157 		int deltat = tv.tv_sec - base;
    158 
    159 		if (deltat < 0)
    160 			deltat = -deltat;
    161 
    162 		if ((badbase == 0) && deltat >= 2 * SECDAY) {
    163 
    164 			if (tv.tv_sec < base) {
    165 				/*
    166 				 * The clock should never go backwards
    167 				 * relative to filesystem time.  If it
    168 				 * does by more than the threshold,
    169 				 * believe the filesystem.
    170 				 */
    171 				printf("WARNING: clock lost %d days\n",
    172 				    deltat / SECDAY);
    173 				badrtc = 1;
    174 			}
    175 			else {
    176 				printf("WARNING: clock gained %d days\n",
    177 				    deltat / SECDAY);
    178 			}
    179 		} else {
    180 			goodtime = 1;
    181 		}
    182 	}
    183 
    184 	/* if the rtc time is bad, use the filesystem time */
    185 	if (badrtc) {
    186 		if (badbase) {
    187 			printf("WARNING: using default initial time\n");
    188 		} else {
    189 			printf("WARNING: using filesystem time\n");
    190 		}
    191 		tv.tv_sec = base;
    192 		tv.tv_usec = 0;
    193 	}
    194 
    195 	timeset = 1;
    196 
    197 	s = splclock();
    198 #ifdef	__HAVE_TIMECOUNTER
    199 	ts.tv_sec = tv.tv_sec;
    200 	ts.tv_nsec = tv.tv_usec * 1000;
    201 	tc_setclock(&ts);
    202 #else
    203 	time = tv;
    204 #endif
    205 	splx(s);
    206 
    207 	if (waszero || goodtime)
    208 		return;
    209 
    210 	printf("WARNING: CHECK AND RESET THE DATE!\n");
    211 }
    212 
    213 /*
    214  * Reset the TODR based on the time value; used when the TODR
    215  * has a preposterous value and also when the time is reset
    216  * by the stime system call.  Also called when the TODR goes past
    217  * TODRZERO + 100*(SECYEAR+2*SECDAY) (e.g. on Jan 2 just after midnight)
    218  * to wrap the TODR around.
    219  */
    220 void
    221 resettodr(void)
    222 {
    223 #ifdef	__HAVE_TIMECOUNTER
    224 	struct timeval	time;
    225 #endif
    226 
    227 	/*
    228 	 * We might have been called by boot() due to a crash early
    229 	 * on.  Don't reset the clock chip if we don't know what time
    230 	 * it is.
    231 	 */
    232 	if (!timeset)
    233 		return;
    234 
    235 #ifdef	__HAVE_TIMECOUNTER
    236 	getmicrotime(&time);
    237 #endif
    238 
    239 	if (time.tv_sec == 0)
    240 		return;
    241 
    242 	if (todr_handle)
    243 		if (todr_settime(todr_handle, &time) != 0)
    244 			printf("Cannot set TOD clock time\n");
    245 }
    246 
    247 #endif	/* __HAVE_GENERIC_TODR */
    248 
    249 
    250 int
    251 todr_gettime(todr_chip_handle_t tch, struct timeval *tvp)
    252 {
    253 	struct clock_ymdhms	dt;
    254 	int			rv;
    255 
    256 	if (tch->todr_gettime)
    257 		return tch->todr_gettime(tch, tvp);
    258 
    259 	if (tch->todr_gettime_ymdhms) {
    260 		if ((rv = tch->todr_gettime_ymdhms(tch, &dt)) != 0)
    261 			return rv;
    262 
    263 		/*
    264 		 * Formerly we had code here that explicitly checked
    265 		 * for 2038 year rollover.
    266 		 *
    267 		 * However, clock_ymdhms_to_secs performs the same
    268 		 * check for us, so we need not worry about it.  Note
    269 		 * that this assumes that the tvp->tv_sec member is is
    270 		 * a time_t.
    271 		 */
    272 
    273 		/* simple sanity checks */
    274 		if (dt.dt_mon > 12 || dt.dt_day > 31 ||
    275 		    dt.dt_hour >= 24 || dt.dt_min >= 60 || dt.dt_sec >= 60)
    276 			return -1;
    277 
    278 		tvp->tv_sec = clock_ymdhms_to_secs(&dt) + rtc_offset * 60;
    279 		tvp->tv_usec = 0;
    280 		return tvp->tv_sec < 0 ? -1 : 0;
    281 	}
    282 
    283 	return -1;
    284 }
    285 
    286 int
    287 todr_settime(todr_chip_handle_t tch, volatile struct timeval *tvp)
    288 {
    289 	struct clock_ymdhms	dt;
    290 
    291 	if (tch->todr_settime)
    292 		return tch->todr_settime(tch, tvp);
    293 
    294 	if (tch->todr_settime_ymdhms) {
    295 		time_t	sec = tvp->tv_sec - rtc_offset * 60;
    296 		if (tvp->tv_usec >= 500000)
    297 			sec++;
    298 		clock_secs_to_ymdhms(sec, &dt);
    299 		return tch->todr_settime_ymdhms(tch, &dt);
    300 	}
    301 
    302 	return -1;
    303 }
    304