xref: /linux/drivers/rtc/rtc-m48t59.c (revision 9f6d3c4b76314c40c866a935d78c80fd284768bd)
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 platform_device *pdev = to_platform_device(dev);
51 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
52 
53 	writeb(val, m48t59->ioaddr+ofs);
54 }
55 
56 static u8
57 m48t59_mem_readb(struct device *dev, u32 ofs)
58 {
59 	struct platform_device *pdev = to_platform_device(dev);
60 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
61 
62 	return readb(m48t59->ioaddr+ofs);
63 }
64 
65 /*
66  * NOTE: M48T59 only uses BCD mode
67  */
68 static int m48t59_rtc_read_time(struct device *dev, struct rtc_time *tm)
69 {
70 	struct platform_device *pdev = to_platform_device(dev);
71 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
72 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
73 	unsigned long flags;
74 	u8 val;
75 
76 	spin_lock_irqsave(&m48t59->lock, flags);
77 	/* Issue the READ command */
78 	M48T59_SET_BITS(M48T59_CNTL_READ, M48T59_CNTL);
79 
80 	tm->tm_year	= bcd2bin(M48T59_READ(M48T59_YEAR));
81 	/* tm_mon is 0-11 */
82 	tm->tm_mon	= bcd2bin(M48T59_READ(M48T59_MONTH)) - 1;
83 	tm->tm_mday	= bcd2bin(M48T59_READ(M48T59_MDAY));
84 
85 	val = M48T59_READ(M48T59_WDAY);
86 	if ((pdata->type == M48T59RTC_TYPE_M48T59) &&
87 	    (val & M48T59_WDAY_CEB) && (val & M48T59_WDAY_CB)) {
88 		dev_dbg(dev, "Century bit is enabled\n");
89 		tm->tm_year += 100;	/* one century */
90 	}
91 #ifdef CONFIG_SPARC
92 	/* Sun SPARC machines count years since 1968 */
93 	tm->tm_year += 68;
94 #endif
95 
96 	tm->tm_wday	= bcd2bin(val & 0x07);
97 	tm->tm_hour	= bcd2bin(M48T59_READ(M48T59_HOUR) & 0x3F);
98 	tm->tm_min	= bcd2bin(M48T59_READ(M48T59_MIN) & 0x7F);
99 	tm->tm_sec	= bcd2bin(M48T59_READ(M48T59_SEC) & 0x7F);
100 
101 	/* Clear the READ bit */
102 	M48T59_CLEAR_BITS(M48T59_CNTL_READ, M48T59_CNTL);
103 	spin_unlock_irqrestore(&m48t59->lock, flags);
104 
105 	dev_dbg(dev, "RTC read time %04d-%02d-%02d %02d/%02d/%02d\n",
106 		tm->tm_year + 1900, tm->tm_mon, tm->tm_mday,
107 		tm->tm_hour, tm->tm_min, tm->tm_sec);
108 	return 0;
109 }
110 
111 static int m48t59_rtc_set_time(struct device *dev, struct rtc_time *tm)
112 {
113 	struct platform_device *pdev = to_platform_device(dev);
114 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
115 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
116 	unsigned long flags;
117 	u8 val = 0;
118 	int year = tm->tm_year;
119 
120 #ifdef CONFIG_SPARC
121 	/* Sun SPARC machines count years since 1968 */
122 	year -= 68;
123 #endif
124 
125 	dev_dbg(dev, "RTC set time %04d-%02d-%02d %02d/%02d/%02d\n",
126 		year + 1900, tm->tm_mon, tm->tm_mday,
127 		tm->tm_hour, tm->tm_min, tm->tm_sec);
128 
129 	if (year < 0)
130 		return -EINVAL;
131 
132 	spin_lock_irqsave(&m48t59->lock, flags);
133 	/* Issue the WRITE command */
134 	M48T59_SET_BITS(M48T59_CNTL_WRITE, M48T59_CNTL);
135 
136 	M48T59_WRITE((bin2bcd(tm->tm_sec) & 0x7F), M48T59_SEC);
137 	M48T59_WRITE((bin2bcd(tm->tm_min) & 0x7F), M48T59_MIN);
138 	M48T59_WRITE((bin2bcd(tm->tm_hour) & 0x3F), M48T59_HOUR);
139 	M48T59_WRITE((bin2bcd(tm->tm_mday) & 0x3F), M48T59_MDAY);
140 	/* tm_mon is 0-11 */
141 	M48T59_WRITE((bin2bcd(tm->tm_mon + 1) & 0x1F), M48T59_MONTH);
142 	M48T59_WRITE(bin2bcd(year % 100), M48T59_YEAR);
143 
144 	if (pdata->type == M48T59RTC_TYPE_M48T59 && (year / 100))
145 		val = (M48T59_WDAY_CEB | M48T59_WDAY_CB);
146 	val |= (bin2bcd(tm->tm_wday) & 0x07);
147 	M48T59_WRITE(val, M48T59_WDAY);
148 
149 	/* Clear the WRITE bit */
150 	M48T59_CLEAR_BITS(M48T59_CNTL_WRITE, M48T59_CNTL);
151 	spin_unlock_irqrestore(&m48t59->lock, flags);
152 	return 0;
153 }
154 
155 /*
156  * Read alarm time and date in RTC
157  */
158 static int m48t59_rtc_readalarm(struct device *dev, struct rtc_wkalrm *alrm)
159 {
160 	struct platform_device *pdev = to_platform_device(dev);
161 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
162 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
163 	struct rtc_time *tm = &alrm->time;
164 	unsigned long flags;
165 	u8 val;
166 
167 	/* If no irq, we don't support ALARM */
168 	if (m48t59->irq == NO_IRQ)
169 		return -EIO;
170 
171 	spin_lock_irqsave(&m48t59->lock, flags);
172 	/* Issue the READ command */
173 	M48T59_SET_BITS(M48T59_CNTL_READ, M48T59_CNTL);
174 
175 	tm->tm_year = bcd2bin(M48T59_READ(M48T59_YEAR));
176 #ifdef CONFIG_SPARC
177 	/* Sun SPARC machines count years since 1968 */
178 	tm->tm_year += 68;
179 #endif
180 	/* tm_mon is 0-11 */
181 	tm->tm_mon = bcd2bin(M48T59_READ(M48T59_MONTH)) - 1;
182 
183 	val = M48T59_READ(M48T59_WDAY);
184 	if ((val & M48T59_WDAY_CEB) && (val & M48T59_WDAY_CB))
185 		tm->tm_year += 100;	/* one century */
186 
187 	tm->tm_mday = bcd2bin(M48T59_READ(M48T59_ALARM_DATE));
188 	tm->tm_hour = bcd2bin(M48T59_READ(M48T59_ALARM_HOUR));
189 	tm->tm_min = bcd2bin(M48T59_READ(M48T59_ALARM_MIN));
190 	tm->tm_sec = bcd2bin(M48T59_READ(M48T59_ALARM_SEC));
191 
192 	/* Clear the READ bit */
193 	M48T59_CLEAR_BITS(M48T59_CNTL_READ, M48T59_CNTL);
194 	spin_unlock_irqrestore(&m48t59->lock, flags);
195 
196 	dev_dbg(dev, "RTC read alarm time %04d-%02d-%02d %02d/%02d/%02d\n",
197 		tm->tm_year + 1900, tm->tm_mon, tm->tm_mday,
198 		tm->tm_hour, tm->tm_min, tm->tm_sec);
199 	return 0;
200 }
201 
202 /*
203  * Set alarm time and date in RTC
204  */
205 static int m48t59_rtc_setalarm(struct device *dev, struct rtc_wkalrm *alrm)
206 {
207 	struct platform_device *pdev = to_platform_device(dev);
208 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
209 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
210 	struct rtc_time *tm = &alrm->time;
211 	u8 mday, hour, min, sec;
212 	unsigned long flags;
213 	int year = tm->tm_year;
214 
215 #ifdef CONFIG_SPARC
216 	/* Sun SPARC machines count years since 1968 */
217 	year -= 68;
218 #endif
219 
220 	/* If no irq, we don't support ALARM */
221 	if (m48t59->irq == NO_IRQ)
222 		return -EIO;
223 
224 	if (year < 0)
225 		return -EINVAL;
226 
227 	/*
228 	 * 0xff means "always match"
229 	 */
230 	mday = tm->tm_mday;
231 	mday = (mday >= 1 && mday <= 31) ? bin2bcd(mday) : 0xff;
232 	if (mday == 0xff)
233 		mday = M48T59_READ(M48T59_MDAY);
234 
235 	hour = tm->tm_hour;
236 	hour = (hour < 24) ? bin2bcd(hour) : 0x00;
237 
238 	min = tm->tm_min;
239 	min = (min < 60) ? bin2bcd(min) : 0x00;
240 
241 	sec = tm->tm_sec;
242 	sec = (sec < 60) ? bin2bcd(sec) : 0x00;
243 
244 	spin_lock_irqsave(&m48t59->lock, flags);
245 	/* Issue the WRITE command */
246 	M48T59_SET_BITS(M48T59_CNTL_WRITE, M48T59_CNTL);
247 
248 	M48T59_WRITE(mday, M48T59_ALARM_DATE);
249 	M48T59_WRITE(hour, M48T59_ALARM_HOUR);
250 	M48T59_WRITE(min, M48T59_ALARM_MIN);
251 	M48T59_WRITE(sec, M48T59_ALARM_SEC);
252 
253 	/* Clear the WRITE bit */
254 	M48T59_CLEAR_BITS(M48T59_CNTL_WRITE, M48T59_CNTL);
255 	spin_unlock_irqrestore(&m48t59->lock, flags);
256 
257 	dev_dbg(dev, "RTC set alarm time %04d-%02d-%02d %02d/%02d/%02d\n",
258 		year + 1900, tm->tm_mon, tm->tm_mday,
259 		tm->tm_hour, tm->tm_min, tm->tm_sec);
260 	return 0;
261 }
262 
263 /*
264  * Handle commands from user-space
265  */
266 static int m48t59_rtc_ioctl(struct device *dev, unsigned int cmd,
267 			unsigned long arg)
268 {
269 	struct platform_device *pdev = to_platform_device(dev);
270 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
271 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
272 	unsigned long flags;
273 	int ret = 0;
274 
275 	spin_lock_irqsave(&m48t59->lock, flags);
276 	switch (cmd) {
277 	case RTC_AIE_OFF:	/* alarm interrupt off */
278 		M48T59_WRITE(0x00, M48T59_INTR);
279 		break;
280 	case RTC_AIE_ON:	/* alarm interrupt on */
281 		M48T59_WRITE(M48T59_INTR_AFE, M48T59_INTR);
282 		break;
283 	default:
284 		ret = -ENOIOCTLCMD;
285 		break;
286 	}
287 	spin_unlock_irqrestore(&m48t59->lock, flags);
288 
289 	return ret;
290 }
291 
292 static int m48t59_rtc_proc(struct device *dev, struct seq_file *seq)
293 {
294 	struct platform_device *pdev = to_platform_device(dev);
295 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
296 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
297 	unsigned long flags;
298 	u8 val;
299 
300 	spin_lock_irqsave(&m48t59->lock, flags);
301 	val = M48T59_READ(M48T59_FLAGS);
302 	spin_unlock_irqrestore(&m48t59->lock, flags);
303 
304 	seq_printf(seq, "battery\t\t: %s\n",
305 		 (val & M48T59_FLAGS_BF) ? "low" : "normal");
306 	return 0;
307 }
308 
309 /*
310  * IRQ handler for the RTC
311  */
312 static irqreturn_t m48t59_rtc_interrupt(int irq, void *dev_id)
313 {
314 	struct device *dev = (struct device *)dev_id;
315 	struct platform_device *pdev = to_platform_device(dev);
316 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
317 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
318 	u8 event;
319 
320 	spin_lock(&m48t59->lock);
321 	event = M48T59_READ(M48T59_FLAGS);
322 	spin_unlock(&m48t59->lock);
323 
324 	if (event & M48T59_FLAGS_AF) {
325 		rtc_update_irq(m48t59->rtc, 1, (RTC_AF | RTC_IRQF));
326 		return IRQ_HANDLED;
327 	}
328 
329 	return IRQ_NONE;
330 }
331 
332 static const struct rtc_class_ops m48t59_rtc_ops = {
333 	.ioctl		= m48t59_rtc_ioctl,
334 	.read_time	= m48t59_rtc_read_time,
335 	.set_time	= m48t59_rtc_set_time,
336 	.read_alarm	= m48t59_rtc_readalarm,
337 	.set_alarm	= m48t59_rtc_setalarm,
338 	.proc		= m48t59_rtc_proc,
339 };
340 
341 static const struct rtc_class_ops m48t02_rtc_ops = {
342 	.read_time	= m48t59_rtc_read_time,
343 	.set_time	= m48t59_rtc_set_time,
344 };
345 
346 static ssize_t m48t59_nvram_read(struct kobject *kobj,
347 				struct bin_attribute *bin_attr,
348 				char *buf, loff_t pos, size_t size)
349 {
350 	struct device *dev = container_of(kobj, struct device, kobj);
351 	struct platform_device *pdev = to_platform_device(dev);
352 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
353 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
354 	ssize_t cnt = 0;
355 	unsigned long flags;
356 
357 	for (; size > 0 && pos < pdata->offset; cnt++, size--) {
358 		spin_lock_irqsave(&m48t59->lock, flags);
359 		*buf++ = M48T59_READ(cnt);
360 		spin_unlock_irqrestore(&m48t59->lock, flags);
361 	}
362 
363 	return cnt;
364 }
365 
366 static ssize_t m48t59_nvram_write(struct kobject *kobj,
367 				struct bin_attribute *bin_attr,
368 				char *buf, loff_t pos, size_t size)
369 {
370 	struct device *dev = container_of(kobj, struct device, kobj);
371 	struct platform_device *pdev = to_platform_device(dev);
372 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
373 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
374 	ssize_t cnt = 0;
375 	unsigned long flags;
376 
377 	for (; size > 0 && pos < pdata->offset; cnt++, size--) {
378 		spin_lock_irqsave(&m48t59->lock, flags);
379 		M48T59_WRITE(*buf++, cnt);
380 		spin_unlock_irqrestore(&m48t59->lock, flags);
381 	}
382 
383 	return cnt;
384 }
385 
386 static struct bin_attribute m48t59_nvram_attr = {
387 	.attr = {
388 		.name = "nvram",
389 		.mode = S_IRUGO | S_IWUSR,
390 	},
391 	.read = m48t59_nvram_read,
392 	.write = m48t59_nvram_write,
393 };
394 
395 static int __devinit m48t59_rtc_probe(struct platform_device *pdev)
396 {
397 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
398 	struct m48t59_private *m48t59 = NULL;
399 	struct resource *res;
400 	int ret = -ENOMEM;
401 	char *name;
402 	const struct rtc_class_ops *ops;
403 
404 	/* This chip could be memory-mapped or I/O-mapped */
405 	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
406 	if (!res) {
407 		res = platform_get_resource(pdev, IORESOURCE_IO, 0);
408 		if (!res)
409 			return -EINVAL;
410 	}
411 
412 	if (res->flags & IORESOURCE_IO) {
413 		/* If we are I/O-mapped, the platform should provide
414 		 * the operations accessing chip registers.
415 		 */
416 		if (!pdata || !pdata->write_byte || !pdata->read_byte)
417 			return -EINVAL;
418 	} else if (res->flags & IORESOURCE_MEM) {
419 		/* we are memory-mapped */
420 		if (!pdata) {
421 			pdata = kzalloc(sizeof(*pdata), GFP_KERNEL);
422 			if (!pdata)
423 				return -ENOMEM;
424 			/* Ensure we only kmalloc platform data once */
425 			pdev->dev.platform_data = pdata;
426 		}
427 		if (!pdata->type)
428 			pdata->type = M48T59RTC_TYPE_M48T59;
429 
430 		/* Try to use the generic memory read/write ops */
431 		if (!pdata->write_byte)
432 			pdata->write_byte = m48t59_mem_writeb;
433 		if (!pdata->read_byte)
434 			pdata->read_byte = m48t59_mem_readb;
435 	}
436 
437 	m48t59 = kzalloc(sizeof(*m48t59), GFP_KERNEL);
438 	if (!m48t59)
439 		return -ENOMEM;
440 
441 	m48t59->ioaddr = pdata->ioaddr;
442 
443 	if (!m48t59->ioaddr) {
444 		/* ioaddr not mapped externally */
445 		m48t59->ioaddr = ioremap(res->start, res->end - res->start + 1);
446 		if (!m48t59->ioaddr)
447 			goto out;
448 	}
449 
450 	/* Try to get irq number. We also can work in
451 	 * the mode without IRQ.
452 	 */
453 	m48t59->irq = platform_get_irq(pdev, 0);
454 	if (m48t59->irq <= 0)
455 		m48t59->irq = NO_IRQ;
456 
457 	if (m48t59->irq != NO_IRQ) {
458 		ret = request_irq(m48t59->irq, m48t59_rtc_interrupt,
459 			IRQF_SHARED, "rtc-m48t59", &pdev->dev);
460 		if (ret)
461 			goto out;
462 	}
463 	switch (pdata->type) {
464 	case M48T59RTC_TYPE_M48T59:
465 		name = "m48t59";
466 		ops = &m48t59_rtc_ops;
467 		pdata->offset = 0x1ff0;
468 		break;
469 	case M48T59RTC_TYPE_M48T02:
470 		name = "m48t02";
471 		ops = &m48t02_rtc_ops;
472 		pdata->offset = 0x7f0;
473 		break;
474 	case M48T59RTC_TYPE_M48T08:
475 		name = "m48t08";
476 		ops = &m48t02_rtc_ops;
477 		pdata->offset = 0x1ff0;
478 		break;
479 	default:
480 		dev_err(&pdev->dev, "Unknown RTC type\n");
481 		ret = -ENODEV;
482 		goto out;
483 	}
484 
485 	spin_lock_init(&m48t59->lock);
486 	platform_set_drvdata(pdev, m48t59);
487 
488 	m48t59->rtc = rtc_device_register(name, &pdev->dev, ops, THIS_MODULE);
489 	if (IS_ERR(m48t59->rtc)) {
490 		ret = PTR_ERR(m48t59->rtc);
491 		goto out;
492 	}
493 
494 	m48t59_nvram_attr.size = pdata->offset;
495 
496 	ret = sysfs_create_bin_file(&pdev->dev.kobj, &m48t59_nvram_attr);
497 	if (ret) {
498 		rtc_device_unregister(m48t59->rtc);
499 		goto out;
500 	}
501 
502 	return 0;
503 
504 out:
505 	if (m48t59->irq != NO_IRQ)
506 		free_irq(m48t59->irq, &pdev->dev);
507 	if (m48t59->ioaddr)
508 		iounmap(m48t59->ioaddr);
509 	if (m48t59)
510 		kfree(m48t59);
511 	return ret;
512 }
513 
514 static int __devexit m48t59_rtc_remove(struct platform_device *pdev)
515 {
516 	struct m48t59_private *m48t59 = platform_get_drvdata(pdev);
517 	struct m48t59_plat_data *pdata = pdev->dev.platform_data;
518 
519 	sysfs_remove_bin_file(&pdev->dev.kobj, &m48t59_nvram_attr);
520 	if (!IS_ERR(m48t59->rtc))
521 		rtc_device_unregister(m48t59->rtc);
522 	if (m48t59->ioaddr && !pdata->ioaddr)
523 		iounmap(m48t59->ioaddr);
524 	if (m48t59->irq != NO_IRQ)
525 		free_irq(m48t59->irq, &pdev->dev);
526 	platform_set_drvdata(pdev, NULL);
527 	kfree(m48t59);
528 	return 0;
529 }
530 
531 /* work with hotplug and coldplug */
532 MODULE_ALIAS("platform:rtc-m48t59");
533 
534 static struct platform_driver m48t59_rtc_driver = {
535 	.driver		= {
536 		.name	= "rtc-m48t59",
537 		.owner	= THIS_MODULE,
538 	},
539 	.probe		= m48t59_rtc_probe,
540 	.remove		= __devexit_p(m48t59_rtc_remove),
541 };
542 
543 static int __init m48t59_rtc_init(void)
544 {
545 	return platform_driver_register(&m48t59_rtc_driver);
546 }
547 
548 static void __exit m48t59_rtc_exit(void)
549 {
550 	platform_driver_unregister(&m48t59_rtc_driver);
551 }
552 
553 module_init(m48t59_rtc_init);
554 module_exit(m48t59_rtc_exit);
555 
556 MODULE_AUTHOR("Mark Zhan <rongkai.zhan@windriver.com>");
557 MODULE_DESCRIPTION("M48T59/M48T02/M48T08 RTC driver");
558 MODULE_LICENSE("GPL");
559