rtclock.c revision 1.22 1 1.22 isaki /* $NetBSD: rtclock.c,v 1.22 2008/06/25 08:14:59 isaki Exp $ */
2 1.1 oki
3 1.1 oki /*
4 1.1 oki * Copyright 1993, 1994 Masaru Oki
5 1.1 oki * All rights reserved.
6 1.1 oki *
7 1.1 oki * Redistribution and use in source and binary forms, with or without
8 1.1 oki * modification, are permitted provided that the following conditions
9 1.1 oki * are met:
10 1.1 oki * 1. Redistributions of source code must retain the above copyright
11 1.1 oki * notice, this list of conditions and the following disclaimer.
12 1.1 oki * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 oki * notice, this list of conditions and the following disclaimer in the
14 1.1 oki * documentation and/or other materials provided with the distribution.
15 1.1 oki * 3. All advertising materials mentioning features or use of this software
16 1.1 oki * must display the following acknowledgement:
17 1.1 oki * This product includes software developed by Masaru Oki.
18 1.1 oki * 4. The name of the author may not be used to endorse or promote products
19 1.1 oki * derived from this software without specific prior written permission
20 1.1 oki *
21 1.1 oki * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 1.1 oki * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 1.1 oki * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 1.1 oki * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 1.1 oki * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 1.1 oki * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 1.1 oki * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 1.1 oki * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 1.1 oki * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 1.1 oki * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 1.1 oki */
32 1.1 oki
33 1.1 oki /*
34 1.1 oki * X680x0 internal real time clock interface
35 1.1 oki * alarm is not supported.
36 1.1 oki */
37 1.15 lukem
38 1.15 lukem #include <sys/cdefs.h>
39 1.22 isaki __KERNEL_RCSID(0, "$NetBSD: rtclock.c,v 1.22 2008/06/25 08:14:59 isaki Exp $");
40 1.1 oki
41 1.1 oki #include <sys/param.h>
42 1.1 oki #include <sys/systm.h>
43 1.1 oki #include <sys/buf.h>
44 1.1 oki #include <sys/malloc.h>
45 1.1 oki #include <sys/proc.h>
46 1.1 oki #include <sys/reboot.h>
47 1.1 oki #include <sys/file.h>
48 1.2 perry #include <sys/kernel.h>
49 1.4 minoura #include <sys/device.h>
50 1.1 oki
51 1.4 minoura #include <machine/bus.h>
52 1.4 minoura
53 1.8 minoura #include <dev/clock_subr.h>
54 1.8 minoura
55 1.4 minoura #include <arch/x68k/dev/rtclock_var.h>
56 1.4 minoura #include <arch/x68k/dev/intiovar.h>
57 1.1 oki
58 1.19 gdamore static int rtgettod(todr_chip_handle_t, struct clock_ymdhms *);
59 1.19 gdamore static int rtsettod(todr_chip_handle_t, struct clock_ymdhms *);
60 1.1 oki
61 1.22 isaki static int rtc_match(device_t, cfdata_t, void *);
62 1.22 isaki static void rtc_attach(device_t, device_t, void *);
63 1.4 minoura
64 1.17 chs int rtclockinit(void);
65 1.5 minoura
66 1.22 isaki CFATTACH_DECL_NEW(rtc, sizeof(struct rtc_softc),
67 1.14 thorpej rtc_match, rtc_attach, NULL, NULL);
68 1.4 minoura
69 1.16 chs static int rtc_attached;
70 1.16 chs
71 1.20 isaki static int
72 1.22 isaki rtc_match(device_t parent, cfdata_t cf, void *aux)
73 1.4 minoura {
74 1.4 minoura struct intio_attach_args *ia = aux;
75 1.4 minoura
76 1.21 isaki if (strcmp(ia->ia_name, "rtc") != 0)
77 1.4 minoura return (0);
78 1.16 chs if (rtc_attached)
79 1.4 minoura return (0);
80 1.4 minoura
81 1.4 minoura /* fixed address */
82 1.4 minoura if (ia->ia_addr != RTC_ADDR)
83 1.4 minoura return (0);
84 1.4 minoura if (ia->ia_intr != -1)
85 1.4 minoura return (0);
86 1.4 minoura
87 1.4 minoura return (1);
88 1.4 minoura }
89 1.4 minoura
90 1.20 isaki static void
91 1.22 isaki rtc_attach(device_t parent, device_t self, void *aux)
92 1.4 minoura {
93 1.22 isaki struct rtc_softc *sc = device_private(self);
94 1.4 minoura struct intio_attach_args *ia = aux;
95 1.4 minoura int r;
96 1.4 minoura
97 1.16 chs rtc_attached = 1;
98 1.16 chs
99 1.4 minoura ia->ia_size = 0x20;
100 1.21 isaki r = intio_map_allocate_region(parent, ia, INTIO_MAP_ALLOCATE);
101 1.4 minoura #ifdef DIAGNOSTIC
102 1.4 minoura if (r)
103 1.21 isaki panic("IO map for RTC corruption??");
104 1.4 minoura #endif
105 1.4 minoura
106 1.4 minoura
107 1.4 minoura sc->sc_bst = ia->ia_bst;
108 1.4 minoura bus_space_map(sc->sc_bst, ia->ia_addr, 0x2000, 0, &sc->sc_bht);
109 1.4 minoura
110 1.19 gdamore sc->sc_todr.cookie = sc;
111 1.19 gdamore sc->sc_todr.todr_gettime_ymdhms = rtgettod;
112 1.19 gdamore sc->sc_todr.todr_settime_ymdhms = rtsettod;
113 1.19 gdamore todr_attach(&sc->sc_todr);
114 1.19 gdamore
115 1.22 isaki aprint_normal(": RP5C15\n");
116 1.4 minoura }
117 1.4 minoura
118 1.19 gdamore static int
119 1.19 gdamore rtgettod(todr_chip_handle_t tch, struct clock_ymdhms *dt)
120 1.1 oki {
121 1.19 gdamore struct rtc_softc *rtc = tch->cookie;
122 1.1 oki
123 1.1 oki /* hold clock */
124 1.4 minoura RTC_WRITE(RTC_MODE, RTC_HOLD_CLOCK);
125 1.1 oki
126 1.1 oki /* read it */
127 1.19 gdamore dt->dt_sec = RTC_REG(RTC_SEC10) * 10 + RTC_REG(RTC_SEC);
128 1.19 gdamore dt->dt_min = RTC_REG(RTC_MIN10) * 10 + RTC_REG(RTC_MIN);
129 1.19 gdamore dt->dt_hour = RTC_REG(RTC_HOUR10) * 10 + RTC_REG(RTC_HOUR);
130 1.19 gdamore dt->dt_day = RTC_REG(RTC_DAY10) * 10 + RTC_REG(RTC_DAY);
131 1.19 gdamore dt->dt_mon = RTC_REG(RTC_MON10) * 10 + RTC_REG(RTC_MON);
132 1.19 gdamore dt->dt_year = RTC_REG(RTC_YEAR10) * 10 + RTC_REG(RTC_YEAR)
133 1.9 itohy +RTC_BASE_YEAR;
134 1.1 oki
135 1.1 oki /* let it run again.. */
136 1.4 minoura RTC_WRITE(RTC_MODE, RTC_FREE_CLOCK);
137 1.1 oki
138 1.19 gdamore return 0;
139 1.1 oki }
140 1.1 oki
141 1.1 oki static int
142 1.19 gdamore rtsettod(todr_chip_handle_t tch, struct clock_ymdhms *dt)
143 1.1 oki {
144 1.19 gdamore struct rtc_softc *rtc = tch->cookie;
145 1.1 oki u_char sec1, sec2;
146 1.1 oki u_char min1, min2;
147 1.1 oki u_char hour1, hour2;
148 1.1 oki u_char day1, day2;
149 1.1 oki u_char mon1, mon2;
150 1.1 oki u_char year1, year2;
151 1.1 oki
152 1.1 oki /* prepare values to be written to clock */
153 1.19 gdamore sec1 = dt->dt_sec / 10;
154 1.19 gdamore sec2 = dt->dt_sec % 10;
155 1.19 gdamore min1 = dt->dt_min / 10;
156 1.19 gdamore min2 = dt->dt_min % 10;
157 1.19 gdamore hour1 = dt->dt_hour / 10;
158 1.19 gdamore hour2 = dt->dt_hour % 10;
159 1.19 gdamore
160 1.19 gdamore day1 = dt->dt_day / 10;
161 1.19 gdamore day2 = dt->dt_day % 10;
162 1.19 gdamore mon1 = dt->dt_mon / 10;
163 1.19 gdamore mon2 = dt->dt_mon % 10;
164 1.19 gdamore year1 = (dt->dt_year - RTC_BASE_YEAR) / 10;
165 1.19 gdamore year2 = dt->dt_year % 10;
166 1.1 oki
167 1.4 minoura RTC_WRITE(RTC_MODE, RTC_HOLD_CLOCK);
168 1.4 minoura RTC_WRITE(RTC_SEC10, sec1);
169 1.4 minoura RTC_WRITE(RTC_SEC, sec2);
170 1.4 minoura RTC_WRITE(RTC_MIN10, min1);
171 1.4 minoura RTC_WRITE(RTC_MIN, min2);
172 1.4 minoura RTC_WRITE(RTC_HOUR10, hour1);
173 1.4 minoura RTC_WRITE(RTC_HOUR, hour2);
174 1.4 minoura RTC_WRITE(RTC_DAY10, day1);
175 1.4 minoura RTC_WRITE(RTC_DAY, day2);
176 1.4 minoura RTC_WRITE(RTC_MON10, mon1);
177 1.4 minoura RTC_WRITE(RTC_MON, mon2);
178 1.4 minoura RTC_WRITE(RTC_YEAR10, year1);
179 1.4 minoura RTC_WRITE(RTC_YEAR, year2);
180 1.4 minoura RTC_WRITE(RTC_MODE, RTC_FREE_CLOCK);
181 1.1 oki
182 1.19 gdamore return 0;
183 1.1 oki }
184