xref: /openbmc/linux/drivers/rtc/rtc-m48t59.c (revision 4c9ca2fd)
1 /*
2  * ST M48T59 RTC driver
3  *
4  * Copyright (c) 2007 Wind River Systems, Inc.
5  *
6  * Author: Mark Zhan <rongkai.zhan@windriver.com>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 as
10  * published by the Free Software Foundation.
11  */
12 
13 #include <linux/kernel.h>
14 #include <linux/module.h>
15 #include <linux/init.h>
16 #include <linux/io.h>
17 #include <linux/device.h>
18 #include <linux/platform_device.h>
19 #include <linux/rtc.h>
20 #include <linux/rtc/m48t59.h>
21 #include <linux/bcd.h>
22 #include <linux/slab.h>
23 
24 #ifndef NO_IRQ
25 #define NO_IRQ	(-1)
26 #endif
27 
28 #define M48T59_READ(reg) (pdata->read_byte(dev, pdata->offset + reg))
29 #define M48T59_WRITE(val, reg) \
30 	(pdata->write_byte(dev, pdata->offset + reg, val))
31 
32 #define M48T59_SET_BITS(mask, reg)	\
33 	M48T59_WRITE((M48T59_READ(reg) | (mask)), (reg))
34 #define M48T59_CLEAR_BITS(mask, reg)	\
35 	M48T59_WRITE((M48T59_READ(reg) & ~(mask)), (reg))
36 
37 struct m48t59_private {
38 	void __iomem *ioaddr;
39 	int irq;
40 	struct rtc_device *rtc;
41 	spinlock_t lock; /* serialize the NVRAM and RTC access */
42 };
43 
44 /*
45  * This is the generic access method when the chip is memory-mapped
46  */
47 static void
48 m48t59_mem_writeb(struct device *dev, u32 ofs, u8 val)
49 {
50 	struct m48t59_private *m48t59 = dev_get_drvdata(dev);
51 
52 	writeb(val, m48t59->ioaddr+ofs);
53 }
54 
55 static u8
56 m48t59_mem_readb(struct device *dev, u32 ofs)
57 {
58 	struct m48t59_private *m48t59 = dev_get_drvdata(dev);
59 
60 	return readb(m48t59->ioaddr+ofs);
61 }
62 
63 /*
64  * NOTE: M48T59 only uses BCD mode
65  */
66 static int m48t59_rtc_read_time(struct device *dev, struct rtc_time *tm)
67 {
68 	struct m48t59_plat_data *pdata = dev_get_platdata(dev);
69 	struct m48t59_private *m48t59 = dev_get_drvdata(dev);
70 	unsigned long flags;
71 	u8 val;
72 
73 	spin_lock_irqsave(&m48t59->lock, flags);
74 	/* Issue the READ command */
75 	M48T59_SET_BITS(M48T59_CNTL_READ, M48T59_CNTL);
76 
77 	tm->tm_year	= bcd2bin(M48T59_READ(M48T59_YEAR));
78 	/* tm_mon is 0-11 */
79 	tm->tm_mon	= bcd2bin(M48T59_READ(M48T59_MONTH)) - 1;
80 	tm->tm_mday	= bcd2bin(M48T59_READ(M48T59_MDAY));
81 
82 	val = M48T59_READ(M48T59_WDAY);
83 	if ((pdata->type == M48T59RTC_TYPE_M48T59) &&
84 	    (val & M48T59_WDAY_CEB) && (val & M48T59_WDAY_CB)) {
85 		dev_dbg(dev, "Century bit is enabled\n");
86 		tm->tm_year += 100;	/* one century */
87 	}
88 #ifdef CONFIG_SPARC
89 	/* Sun SPARC machines count years since 1968 */
90 	tm->tm_year += 68;
91 #endif
92 
93 	tm->tm_wday	= bcd2bin(val & 0x07);
94 	tm->tm_hour	= bcd2bin(M48T59_READ(M48T59_HOUR) & 0x3F);
95 	tm->tm_min	= bcd2bin(M48T59_READ(M48T59_MIN) & 0x7F);
96 	tm->tm_sec	= bcd2bin(M48T59_READ(M48T59_SEC) & 0x7F);
97 
98 	/* Clear the READ bit */
99 	M48T59_CLEAR_BITS(M48T59_CNTL_READ, M48T59_CNTL);
100 	spin_unlock_irqrestore(&m48t59->lock, flags);
101 
102 	dev_dbg(dev, "RTC read time %04d-%02d-%02d %02d/%02d/%02d\n",
103 		tm->tm_year + 1900, tm->tm_mon, tm->tm_mday,
104 		tm->tm_hour, tm->tm_min, tm->tm_sec);
105 	return 0;
106 }
107 
108 static int m48t59_rtc_set_time(struct device *dev, struct rtc_time *tm)
109 {
110 	struct m48t59_plat_data *pdata = dev_get_platdata(dev);
111 	struct m48t59_private *m48t59 = dev_get_drvdata(dev);
112 	unsigned long flags;
113 	u8 val = 0;
114 	int year = tm->tm_year;
115 
116 #ifdef CONFIG_SPARC
117 	/* Sun SPARC machines count years since 1968 */
118 	year -= 68;
119 #endif
120 
121 	dev_dbg(dev, "RTC set time %04d-%02d-%02d %02d/%02d/%02d\n",
122 		year + 1900, tm->tm_mon, tm->tm_mday,
123 		tm->tm_hour, tm->tm_min, tm->tm_sec);
124 
125 	if (year < 0)
126 		return -EINVAL;
127 
128 	spin_lock_irqsave(&m48t59->lock, flags);
129 	/* Issue the WRITE command */
130 	M48T59_SET_BITS(M48T59_CNTL_WRITE, M48T59_CNTL);
131 
132 	M48T59_WRITE((bin2bcd(tm->tm_sec) & 0x7F), M48T59_SEC);
133 	M48T59_WRITE((bin2bcd(tm->tm_min) & 0x7F), M48T59_MIN);
134 	M48T59_WRITE((bin2bcd(tm->tm_hour) & 0x3F), M48T59_HOUR);
135 	M48T59_WRITE((bin2bcd(tm->tm_mday) & 0x3F), M48T59_MDAY);
136 	/* tm_mon is 0-11 */
137 	M48T59_WRITE((bin2bcd(tm->tm_mon + 1) & 0x1F), M48T59_MONTH);
138 	M48T59_WRITE(bin2bcd(year % 100), M48T59_YEAR);
139 
140 	if (pdata->type == M48T59RTC_TYPE_M48T59 && (year / 100))
141 		val = (M48T59_WDAY_CEB | M48T59_WDAY_CB);
142 	val |= (bin2bcd(tm->tm_wday) & 0x07);
143 	M48T59_WRITE(val, M48T59_WDAY);
144 
145 	/* Clear the WRITE bit */
146 	M48T59_CLEAR_BITS(M48T59_CNTL_WRITE, M48T59_CNTL);
147 	spin_unlock_irqrestore(&m48t59->lock, flags);
148 	return 0;
149 }
150 
151 /*
152  * Read alarm time and date in RTC
153  */
154 static int m48t59_rtc_readalarm(struct device *dev, struct rtc_wkalrm *alrm)
155 {
156 	struct m48t59_plat_data *pdata = dev_get_platdata(dev);
157 	struct m48t59_private *m48t59 = dev_get_drvdata(dev);
158 	struct rtc_time *tm = &alrm->time;
159 	unsigned long flags;
160 	u8 val;
161 
162 	/* If no irq, we don't support ALARM */
163 	if (m48t59->irq == NO_IRQ)
164 		return -EIO;
165 
166 	spin_lock_irqsave(&m48t59->lock, flags);
167 	/* Issue the READ command */
168 	M48T59_SET_BITS(M48T59_CNTL_READ, M48T59_CNTL);
169 
170 	tm->tm_year = bcd2bin(M48T59_READ(M48T59_YEAR));
171 #ifdef CONFIG_SPARC
172 	/* Sun SPARC machines count years since 1968 */
173 	tm->tm_year += 68;
174 #endif
175 	/* tm_mon is 0-11 */
176 	tm->tm_mon = bcd2bin(M48T59_READ(M48T59_MONTH)) - 1;
177 
178 	val = M48T59_READ(M48T59_WDAY);
179 	if ((val & M48T59_WDAY_CEB) && (val & M48T59_WDAY_CB))
180 		tm->tm_year += 100;	/* one century */
181 
182 	tm->tm_mday = bcd2bin(M48T59_READ(M48T59_ALARM_DATE));
183 	tm->tm_hour = bcd2bin(M48T59_READ(M48T59_ALARM_HOUR));
184 	tm->tm_min = bcd2bin(M48T59_READ(M48T59_ALARM_MIN));
185 	tm->tm_sec = bcd2bin(M48T59_READ(M48T59_ALARM_SEC));
186 
187 	/* Clear the READ bit */
188 	M48T59_CLEAR_BITS(M48T59_CNTL_READ, M48T59_CNTL);
189 	spin_unlock_irqrestore(&m48t59->lock, flags);
190 
191 	dev_dbg(dev, "RTC read alarm time %04d-%02d-%02d %02d/%02d/%02d\n",
192 		tm->tm_year + 1900, tm->tm_mon, tm->tm_mday,
193 		tm->tm_hour, tm->tm_min, tm->tm_sec);
194 	return rtc_valid_tm(tm);
195 }
196 
197 /*
198  * Set alarm time and date in RTC
199  */
200 static int m48t59_rtc_setalarm(struct device *dev, struct rtc_wkalrm *alrm)
201 {
202 	struct m48t59_plat_data *pdata = dev_get_platdata(dev);
203 	struct m48t59_private *m48t59 = dev_get_drvdata(dev);
204 	struct rtc_time *tm = &alrm->time;
205 	u8 mday, hour, min, sec;
206 	unsigned long flags;
207 	int year = tm->tm_year;
208 
209 #ifdef CONFIG_SPARC
210 	/* Sun SPARC machines count years since 1968 */
211 	year -= 68;
212 #endif
213 
214 	/* If no irq, we don't support ALARM */
215 	if (m48t59->irq == NO_IRQ)
216 		return -EIO;
217 
218 	if (year < 0)
219 		return -EINVAL;
220 
221 	/*
222 	 * 0xff means "always match"
223 	 */
224 	mday = tm->tm_mday;
225 	mday = (mday >= 1 && mday <= 31) ? bin2bcd(mday) : 0xff;
226 	if (mday == 0xff)
227 		mday = M48T59_READ(M48T59_MDAY);
228 
229 	hour = tm->tm_hour;
230 	hour = (hour < 24) ? bin2bcd(hour) : 0x00;
231 
232 	min = tm->tm_min;
233 	min = (min < 60) ? bin2bcd(min) : 0x00;
234 
235 	sec = tm->tm_sec;
236 	sec = (sec < 60) ? bin2bcd(sec) : 0x00;
237 
238 	spin_lock_irqsave(&m48t59->lock, flags);
239 	/* Issue the WRITE command */
240 	M48T59_SET_BITS(M48T59_CNTL_WRITE, M48T59_CNTL);
241 
242 	M48T59_WRITE(mday, M48T59_ALARM_DATE);
243 	M48T59_WRITE(hour, M48T59_ALARM_HOUR);
244 	M48T59_WRITE(min, M48T59_ALARM_MIN);
245 	M48T59_WRITE(sec, M48T59_ALARM_SEC);
246 
247 	/* Clear the WRITE bit */
248 	M48T59_CLEAR_BITS(M48T59_CNTL_WRITE, M48T59_CNTL);
249 	spin_unlock_irqrestore(&m48t59->lock, flags);
250 
251 	dev_dbg(dev, "RTC set alarm time %04d-%02d-%02d %02d/%02d/%02d\n",
252 		year + 1900, tm->tm_mon, tm->tm_mday,
253 		tm->tm_hour, tm->tm_min, tm->tm_sec);
254 	return 0;
255 }
256 
257 /*
258  * Handle commands from user-space
259  */
260 static int m48t59_rtc_alarm_irq_enable(struct device *dev, unsigned int enabled)
261 {
262 	struct m48t59_plat_data *pdata = dev_get_platdata(dev);
263 	struct m48t59_private *m48t59 = dev_get_drvdata(dev);
264 	unsigned long flags;
265 
266 	spin_lock_irqsave(&m48t59->lock, flags);
267 	if (enabled)
268 		M48T59_WRITE(M48T59_INTR_AFE, M48T59_INTR);
269 	else
270 		M48T59_WRITE(0x00, M48T59_INTR);
271 	spin_unlock_irqrestore(&m48t59->lock, flags);
272 
273 	return 0;
274 }
275 
276 static int m48t59_rtc_proc(struct device *dev, struct seq_file *seq)
277 {
278 	struct m48t59_plat_data *pdata = dev_get_platdata(dev);
279 	struct m48t59_private *m48t59 = dev_get_drvdata(dev);
280 	unsigned long flags;
281 	u8 val;
282 
283 	spin_lock_irqsave(&m48t59->lock, flags);
284 	val = M48T59_READ(M48T59_FLAGS);
285 	spin_unlock_irqrestore(&m48t59->lock, flags);
286 
287 	seq_printf(seq, "battery\t\t: %s\n",
288 		 (val & M48T59_FLAGS_BF) ? "low" : "normal");
289 	return 0;
290 }
291 
292 /*
293  * IRQ handler for the RTC
294  */
295 static irqreturn_t m48t59_rtc_interrupt(int irq, void *dev_id)
296 {
297 	struct device *dev = (struct device *)dev_id;
298 	struct m48t59_plat_data *pdata = dev_get_platdata(dev);
299 	struct m48t59_private *m48t59 = dev_get_drvdata(dev);
300 	u8 event;
301 
302 	spin_lock(&m48t59->lock);
303 	event = M48T59_READ(M48T59_FLAGS);
304 	spin_unlock(&m48t59->lock);
305 
306 	if (event & M48T59_FLAGS_AF) {
307 		rtc_update_irq(m48t59->rtc, 1, (RTC_AF | RTC_IRQF));
308 		return IRQ_HANDLED;
309 	}
310 
311 	return IRQ_NONE;
312 }
313 
314 static const struct rtc_class_ops m48t59_rtc_ops = {
315 	.read_time	= m48t59_rtc_read_time,
316 	.set_time	= m48t59_rtc_set_time,
317 	.read_alarm	= m48t59_rtc_readalarm,
318 	.set_alarm	= m48t59_rtc_setalarm,
319 	.proc		= m48t59_rtc_proc,
320 	.alarm_irq_enable = m48t59_rtc_alarm_irq_enable,
321 };
322 
323 static const struct rtc_class_ops m48t02_rtc_ops = {
324 	.read_time	= m48t59_rtc_read_time,
325 	.set_time	= m48t59_rtc_set_time,
326 };
327 
328 static int m48t59_nvram_read(void *priv, unsigned int offset, void *val,
329 			     size_t size)
330 {
331 	struct platform_device *pdev = priv;
332 	struct device *dev = &pdev->dev;
333 	struct m48t59_plat_data *pdata = dev_get_platdata(&pdev->dev);
334 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
335 	ssize_t cnt = 0;
336 	unsigned long flags;
337 	u8 *buf = val;
338 
339 	spin_lock_irqsave(&m48t59->lock, flags);
340 
341 	for (; cnt < size; cnt++)
342 		*buf++ = M48T59_READ(cnt);
343 
344 	spin_unlock_irqrestore(&m48t59->lock, flags);
345 
346 	return 0;
347 }
348 
349 static int m48t59_nvram_write(void *priv, unsigned int offset, void *val,
350 			      size_t size)
351 {
352 	struct platform_device *pdev = priv;
353 	struct device *dev = &pdev->dev;
354 	struct m48t59_plat_data *pdata = dev_get_platdata(&pdev->dev);
355 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
356 	ssize_t cnt = 0;
357 	unsigned long flags;
358 	u8 *buf = val;
359 
360 	spin_lock_irqsave(&m48t59->lock, flags);
361 
362 	for (; cnt < size; cnt++)
363 		M48T59_WRITE(*buf++, cnt);
364 
365 	spin_unlock_irqrestore(&m48t59->lock, flags);
366 
367 	return 0;
368 }
369 
370 static int m48t59_rtc_probe(struct platform_device *pdev)
371 {
372 	struct m48t59_plat_data *pdata = dev_get_platdata(&pdev->dev);
373 	struct m48t59_private *m48t59 = NULL;
374 	struct resource *res;
375 	int ret = -ENOMEM;
376 	char *name;
377 	const struct rtc_class_ops *ops;
378 	struct nvmem_config nvmem_cfg = {
379 		.name = "m48t59-",
380 		.word_size = 1,
381 		.stride = 1,
382 		.reg_read = m48t59_nvram_read,
383 		.reg_write = m48t59_nvram_write,
384 		.priv = pdev,
385 	};
386 
387 	/* This chip could be memory-mapped or I/O-mapped */
388 	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
389 	if (!res) {
390 		res = platform_get_resource(pdev, IORESOURCE_IO, 0);
391 		if (!res)
392 			return -EINVAL;
393 	}
394 
395 	if (res->flags & IORESOURCE_IO) {
396 		/* If we are I/O-mapped, the platform should provide
397 		 * the operations accessing chip registers.
398 		 */
399 		if (!pdata || !pdata->write_byte || !pdata->read_byte)
400 			return -EINVAL;
401 	} else if (res->flags & IORESOURCE_MEM) {
402 		/* we are memory-mapped */
403 		if (!pdata) {
404 			pdata = devm_kzalloc(&pdev->dev, sizeof(*pdata),
405 						GFP_KERNEL);
406 			if (!pdata)
407 				return -ENOMEM;
408 			/* Ensure we only kmalloc platform data once */
409 			pdev->dev.platform_data = pdata;
410 		}
411 		if (!pdata->type)
412 			pdata->type = M48T59RTC_TYPE_M48T59;
413 
414 		/* Try to use the generic memory read/write ops */
415 		if (!pdata->write_byte)
416 			pdata->write_byte = m48t59_mem_writeb;
417 		if (!pdata->read_byte)
418 			pdata->read_byte = m48t59_mem_readb;
419 	}
420 
421 	m48t59 = devm_kzalloc(&pdev->dev, sizeof(*m48t59), GFP_KERNEL);
422 	if (!m48t59)
423 		return -ENOMEM;
424 
425 	m48t59->ioaddr = pdata->ioaddr;
426 
427 	if (!m48t59->ioaddr) {
428 		/* ioaddr not mapped externally */
429 		m48t59->ioaddr = devm_ioremap(&pdev->dev, res->start,
430 						resource_size(res));
431 		if (!m48t59->ioaddr)
432 			return ret;
433 	}
434 
435 	/* Try to get irq number. We also can work in
436 	 * the mode without IRQ.
437 	 */
438 	m48t59->irq = platform_get_irq(pdev, 0);
439 	if (m48t59->irq <= 0)
440 		m48t59->irq = NO_IRQ;
441 
442 	if (m48t59->irq != NO_IRQ) {
443 		ret = devm_request_irq(&pdev->dev, m48t59->irq,
444 				m48t59_rtc_interrupt, IRQF_SHARED,
445 				"rtc-m48t59", &pdev->dev);
446 		if (ret)
447 			return ret;
448 	}
449 	switch (pdata->type) {
450 	case M48T59RTC_TYPE_M48T59:
451 		name = "m48t59";
452 		ops = &m48t59_rtc_ops;
453 		pdata->offset = 0x1ff0;
454 		break;
455 	case M48T59RTC_TYPE_M48T02:
456 		name = "m48t02";
457 		ops = &m48t02_rtc_ops;
458 		pdata->offset = 0x7f0;
459 		break;
460 	case M48T59RTC_TYPE_M48T08:
461 		name = "m48t08";
462 		ops = &m48t02_rtc_ops;
463 		pdata->offset = 0x1ff0;
464 		break;
465 	default:
466 		dev_err(&pdev->dev, "Unknown RTC type\n");
467 		return -ENODEV;
468 	}
469 
470 	spin_lock_init(&m48t59->lock);
471 	platform_set_drvdata(pdev, m48t59);
472 
473 	m48t59->rtc = devm_rtc_allocate_device(&pdev->dev);
474 	if (IS_ERR(m48t59->rtc))
475 		return PTR_ERR(m48t59->rtc);
476 
477 	m48t59->rtc->nvram_old_abi = true;
478 	m48t59->rtc->ops = ops;
479 
480 	nvmem_cfg.size = pdata->offset;
481 	ret = rtc_nvmem_register(m48t59->rtc, &nvmem_cfg);
482 	if (ret)
483 		return ret;
484 
485 	ret = rtc_register_device(m48t59->rtc);
486 	if (ret)
487 		return ret;
488 
489 	return 0;
490 }
491 
492 /* work with hotplug and coldplug */
493 MODULE_ALIAS("platform:rtc-m48t59");
494 
495 static struct platform_driver m48t59_rtc_driver = {
496 	.driver		= {
497 		.name	= "rtc-m48t59",
498 	},
499 	.probe		= m48t59_rtc_probe,
500 };
501 
502 module_platform_driver(m48t59_rtc_driver);
503 
504 MODULE_AUTHOR("Mark Zhan <rongkai.zhan@windriver.com>");
505 MODULE_DESCRIPTION("M48T59/M48T02/M48T08 RTC driver");
506 MODULE_LICENSE("GPL");
507