chiptotime.c revision 1.7 1 1.7 christos /* $NetBSD: chiptotime.c,v 1.7 2014/11/20 16:34:25 christos Exp $ */
2 1.1 jdolecek
3 1.1 jdolecek #include <sys/types.h>
4 1.7 christos #include <dev/clock_subr.h>
5 1.1 jdolecek
6 1.1 jdolecek #include <machine/prom.h>
7 1.1 jdolecek
8 1.2 junyoung #include <lib/libsa/stand.h>
9 1.1 jdolecek #include "libsa.h"
10 1.1 jdolecek
11 1.1 jdolecek #define YEAR0 68
12 1.1 jdolecek
13 1.1 jdolecek /*
14 1.1 jdolecek * This code is defunct after 2068.
15 1.1 jdolecek * Will Unix still be here then??
16 1.1 jdolecek */
17 1.1 jdolecek const short dayyr[12] =
18 1.4 tsutsui {0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334};
19 1.1 jdolecek
20 1.1 jdolecek u_long
21 1.4 tsutsui chiptotime(int sec, int min, int hour, int day, int mon, int year)
22 1.1 jdolecek {
23 1.1 jdolecek int days, yr;
24 1.1 jdolecek
25 1.7 christos sec = bcdtobin(sec);
26 1.7 christos min = bcdtobin(min);
27 1.7 christos hour = bcdtobin(hour);
28 1.7 christos day = bcdtobin(day);
29 1.7 christos mon = bcdtobin(mon);
30 1.7 christos year = bcdtobin(year) + YEAR0;
31 1.1 jdolecek if (year < 70)
32 1.1 jdolecek year = 70;
33 1.1 jdolecek
34 1.1 jdolecek /* simple sanity checks */
35 1.1 jdolecek if (year < 70 || mon < 1 || mon > 12 || day < 1 || day > 31)
36 1.1 jdolecek return (0);
37 1.1 jdolecek days = 0;
38 1.1 jdolecek for (yr = 70; yr < year; yr++)
39 1.5 christos days += days_per_year(yr);
40 1.1 jdolecek days += dayyr[mon - 1] + day - 1;
41 1.5 christos if (is_leap_year(yr) && mon > 2)
42 1.1 jdolecek days++;
43 1.1 jdolecek /* now have days since Jan 1, 1970; the rest is easy... */
44 1.5 christos return days * SECS_PER_DAY + hour * SECS_PER_HOUR
45 1.5 christos + min * SECS_PER_MINUTE + sec;
46 1.1 jdolecek }
47