xref: /openbmc/linux/drivers/rtc/rtc-rx8025.c (revision a8fe58ce)
1 /*
2  * Driver for Epson's RTC module RX-8025 SA/NB
3  *
4  * Copyright (C) 2009 Wolfgang Grandegger <wg@grandegger.com>
5  *
6  * Copyright (C) 2005 by Digi International Inc.
7  * All rights reserved.
8  *
9  * Modified by fengjh at rising.com.cn
10  * <http://lists.lm-sensors.org/mailman/listinfo/lm-sensors>
11  * 2006.11
12  *
13  * Code cleanup by Sergei Poselenov, <sposelenov@emcraft.com>
14  * Converted to new style by Wolfgang Grandegger <wg@grandegger.com>
15  * Alarm and periodic interrupt added by Dmitry Rakhchev <rda@emcraft.com>
16  *
17  * This program is free software; you can redistribute it and/or
18  * modify it under the terms of the GNU General Public License
19  * version 2 as published by the Free Software Foundation.
20  */
21 #include <linux/bcd.h>
22 #include <linux/bitops.h>
23 #include <linux/i2c.h>
24 #include <linux/kernel.h>
25 #include <linux/module.h>
26 #include <linux/rtc.h>
27 
28 /* Register definitions */
29 #define RX8025_REG_SEC		0x00
30 #define RX8025_REG_MIN		0x01
31 #define RX8025_REG_HOUR		0x02
32 #define RX8025_REG_WDAY		0x03
33 #define RX8025_REG_MDAY		0x04
34 #define RX8025_REG_MONTH	0x05
35 #define RX8025_REG_YEAR		0x06
36 #define RX8025_REG_DIGOFF	0x07
37 #define RX8025_REG_ALWMIN	0x08
38 #define RX8025_REG_ALWHOUR	0x09
39 #define RX8025_REG_ALWWDAY	0x0a
40 #define RX8025_REG_ALDMIN	0x0b
41 #define RX8025_REG_ALDHOUR	0x0c
42 /* 0x0d is reserved */
43 #define RX8025_REG_CTRL1	0x0e
44 #define RX8025_REG_CTRL2	0x0f
45 
46 #define RX8025_BIT_CTRL1_CT	(7 << 0)
47 /* 1 Hz periodic level irq */
48 #define RX8025_BIT_CTRL1_CT_1HZ	4
49 #define RX8025_BIT_CTRL1_TEST	BIT(3)
50 #define RX8025_BIT_CTRL1_1224	BIT(5)
51 #define RX8025_BIT_CTRL1_DALE	BIT(6)
52 #define RX8025_BIT_CTRL1_WALE	BIT(7)
53 
54 #define RX8025_BIT_CTRL2_DAFG	BIT(0)
55 #define RX8025_BIT_CTRL2_WAFG	BIT(1)
56 #define RX8025_BIT_CTRL2_CTFG	BIT(2)
57 #define RX8025_BIT_CTRL2_PON	BIT(4)
58 #define RX8025_BIT_CTRL2_XST	BIT(5)
59 #define RX8025_BIT_CTRL2_VDET	BIT(6)
60 
61 /* Clock precision adjustment */
62 #define RX8025_ADJ_RESOLUTION	3050 /* in ppb */
63 #define RX8025_ADJ_DATA_MAX	62
64 #define RX8025_ADJ_DATA_MIN	-62
65 
66 static const struct i2c_device_id rx8025_id[] = {
67 	{ "rx8025", 0 },
68 	{ "rv8803", 1 },
69 	{ }
70 };
71 MODULE_DEVICE_TABLE(i2c, rx8025_id);
72 
73 struct rx8025_data {
74 	struct i2c_client *client;
75 	struct rtc_device *rtc;
76 	u8 ctrl1;
77 };
78 
79 static s32 rx8025_read_reg(const struct i2c_client *client, u8 number)
80 {
81 	return i2c_smbus_read_byte_data(client, number << 4);
82 }
83 
84 static int rx8025_read_regs(const struct i2c_client *client,
85 			    u8 number, u8 length, u8 *values)
86 {
87 	int ret = i2c_smbus_read_i2c_block_data(client, number << 4, length,
88 						values);
89 	if (ret != length)
90 		return ret < 0 ? ret : -EIO;
91 
92 	return 0;
93 }
94 
95 static s32 rx8025_write_reg(const struct i2c_client *client, u8 number,
96 			    u8 value)
97 {
98 	return i2c_smbus_write_byte_data(client, number << 4, value);
99 }
100 
101 static s32 rx8025_write_regs(const struct i2c_client *client,
102 			     u8 number, u8 length, const u8 *values)
103 {
104 	return i2c_smbus_write_i2c_block_data(client, number << 4,
105 					      length, values);
106 }
107 
108 static int rx8025_check_validity(struct device *dev)
109 {
110 	struct rx8025_data *rx8025 = dev_get_drvdata(dev);
111 	int ctrl2;
112 
113 	ctrl2 = rx8025_read_reg(rx8025->client, RX8025_REG_CTRL2);
114 	if (ctrl2 < 0)
115 		return ctrl2;
116 
117 	if (ctrl2 & RX8025_BIT_CTRL2_VDET)
118 		dev_warn(dev, "power voltage drop detected\n");
119 
120 	if (ctrl2 & RX8025_BIT_CTRL2_PON) {
121 		dev_warn(dev, "power-on reset detected, date is invalid\n");
122 		return -EINVAL;
123 	}
124 
125 	if (!(ctrl2 & RX8025_BIT_CTRL2_XST)) {
126 		dev_warn(dev, "crystal stopped, date is invalid\n");
127 		return -EINVAL;
128 	}
129 
130 	return 0;
131 }
132 
133 static int rx8025_reset_validity(struct i2c_client *client)
134 {
135 	int ctrl2 = rx8025_read_reg(client, RX8025_REG_CTRL2);
136 
137 	if (ctrl2 < 0)
138 		return ctrl2;
139 
140 	ctrl2 &= ~(RX8025_BIT_CTRL2_PON | RX8025_BIT_CTRL2_VDET);
141 
142 	return rx8025_write_reg(client, RX8025_REG_CTRL2,
143 				ctrl2 | RX8025_BIT_CTRL2_XST);
144 }
145 
146 static irqreturn_t rx8025_handle_irq(int irq, void *dev_id)
147 {
148 	struct i2c_client *client = dev_id;
149 	struct rx8025_data *rx8025 = i2c_get_clientdata(client);
150 	int status;
151 
152 	status = rx8025_read_reg(client, RX8025_REG_CTRL2);
153 	if (status < 0)
154 		goto out;
155 
156 	if (!(status & RX8025_BIT_CTRL2_XST))
157 		dev_warn(&client->dev, "Oscillation stop was detected,"
158 			 "you may have to readjust the clock\n");
159 
160 	if (status & RX8025_BIT_CTRL2_CTFG) {
161 		/* periodic */
162 		status &= ~RX8025_BIT_CTRL2_CTFG;
163 		rtc_update_irq(rx8025->rtc, 1, RTC_PF | RTC_IRQF);
164 	}
165 
166 	if (status & RX8025_BIT_CTRL2_DAFG) {
167 		/* alarm */
168 		status &= RX8025_BIT_CTRL2_DAFG;
169 		if (rx8025_write_reg(client, RX8025_REG_CTRL1,
170 				     rx8025->ctrl1 & ~RX8025_BIT_CTRL1_DALE))
171 			goto out;
172 		rtc_update_irq(rx8025->rtc, 1, RTC_AF | RTC_IRQF);
173 	}
174 
175 out:
176 	return IRQ_HANDLED;
177 }
178 
179 static int rx8025_get_time(struct device *dev, struct rtc_time *dt)
180 {
181 	struct rx8025_data *rx8025 = dev_get_drvdata(dev);
182 	u8 date[7];
183 	int err;
184 
185 	err = rx8025_check_validity(dev);
186 	if (err)
187 		return err;
188 
189 	err = rx8025_read_regs(rx8025->client, RX8025_REG_SEC, 7, date);
190 	if (err)
191 		return err;
192 
193 	dev_dbg(dev, "%s: read 0x%02x 0x%02x "
194 		"0x%02x 0x%02x 0x%02x 0x%02x 0x%02x\n", __func__,
195 		date[0], date[1], date[2], date[3], date[4],
196 		date[5], date[6]);
197 
198 	dt->tm_sec = bcd2bin(date[RX8025_REG_SEC] & 0x7f);
199 	dt->tm_min = bcd2bin(date[RX8025_REG_MIN] & 0x7f);
200 	if (rx8025->ctrl1 & RX8025_BIT_CTRL1_1224)
201 		dt->tm_hour = bcd2bin(date[RX8025_REG_HOUR] & 0x3f);
202 	else
203 		dt->tm_hour = bcd2bin(date[RX8025_REG_HOUR] & 0x1f) % 12
204 			+ (date[RX8025_REG_HOUR] & 0x20 ? 12 : 0);
205 
206 	dt->tm_mday = bcd2bin(date[RX8025_REG_MDAY] & 0x3f);
207 	dt->tm_mon = bcd2bin(date[RX8025_REG_MONTH] & 0x1f) - 1;
208 	dt->tm_year = bcd2bin(date[RX8025_REG_YEAR]) + 100;
209 
210 	dev_dbg(dev, "%s: date %ds %dm %dh %dmd %dm %dy\n", __func__,
211 		dt->tm_sec, dt->tm_min, dt->tm_hour,
212 		dt->tm_mday, dt->tm_mon, dt->tm_year);
213 
214 	return rtc_valid_tm(dt);
215 }
216 
217 static int rx8025_set_time(struct device *dev, struct rtc_time *dt)
218 {
219 	struct rx8025_data *rx8025 = dev_get_drvdata(dev);
220 	u8 date[7];
221 	int ret;
222 
223 	if ((dt->tm_year < 100) || (dt->tm_year > 199))
224 		return -EINVAL;
225 
226 	/*
227 	 * Here the read-only bits are written as "0".  I'm not sure if that
228 	 * is sound.
229 	 */
230 	date[RX8025_REG_SEC] = bin2bcd(dt->tm_sec);
231 	date[RX8025_REG_MIN] = bin2bcd(dt->tm_min);
232 	if (rx8025->ctrl1 & RX8025_BIT_CTRL1_1224)
233 		date[RX8025_REG_HOUR] = bin2bcd(dt->tm_hour);
234 	else
235 		date[RX8025_REG_HOUR] = (dt->tm_hour >= 12 ? 0x20 : 0)
236 			| bin2bcd((dt->tm_hour + 11) % 12 + 1);
237 
238 	date[RX8025_REG_WDAY] = bin2bcd(dt->tm_wday);
239 	date[RX8025_REG_MDAY] = bin2bcd(dt->tm_mday);
240 	date[RX8025_REG_MONTH] = bin2bcd(dt->tm_mon + 1);
241 	date[RX8025_REG_YEAR] = bin2bcd(dt->tm_year - 100);
242 
243 	dev_dbg(dev,
244 		"%s: write 0x%02x 0x%02x 0x%02x 0x%02x 0x%02x 0x%02x 0x%02x\n",
245 		__func__,
246 		date[0], date[1], date[2], date[3], date[4], date[5], date[6]);
247 
248 	ret = rx8025_write_regs(rx8025->client, RX8025_REG_SEC, 7, date);
249 	if (ret < 0)
250 		return ret;
251 
252 	return rx8025_reset_validity(rx8025->client);
253 }
254 
255 static int rx8025_init_client(struct i2c_client *client)
256 {
257 	struct rx8025_data *rx8025 = i2c_get_clientdata(client);
258 	u8 ctrl[2], ctrl2;
259 	int need_clear = 0;
260 	int err;
261 
262 	err = rx8025_read_regs(rx8025->client, RX8025_REG_CTRL1, 2, ctrl);
263 	if (err)
264 		goto out;
265 
266 	/* Keep test bit zero ! */
267 	rx8025->ctrl1 = ctrl[0] & ~RX8025_BIT_CTRL1_TEST;
268 
269 	if (ctrl[1] & (RX8025_BIT_CTRL2_DAFG | RX8025_BIT_CTRL2_WAFG)) {
270 		dev_warn(&client->dev, "Alarm was detected\n");
271 		need_clear = 1;
272 	}
273 
274 	if (ctrl[1] & RX8025_BIT_CTRL2_CTFG)
275 		need_clear = 1;
276 
277 	if (need_clear) {
278 		ctrl2 = ctrl[1];
279 		ctrl2 &= ~(RX8025_BIT_CTRL2_CTFG | RX8025_BIT_CTRL2_WAFG |
280 			   RX8025_BIT_CTRL2_DAFG);
281 
282 		err = rx8025_write_reg(client, RX8025_REG_CTRL2, ctrl2);
283 	}
284 out:
285 	return err;
286 }
287 
288 /* Alarm support */
289 static int rx8025_read_alarm(struct device *dev, struct rtc_wkalrm *t)
290 {
291 	struct rx8025_data *rx8025 = dev_get_drvdata(dev);
292 	struct i2c_client *client = rx8025->client;
293 	u8 ald[2];
294 	int ctrl2, err;
295 
296 	if (client->irq <= 0)
297 		return -EINVAL;
298 
299 	err = rx8025_read_regs(client, RX8025_REG_ALDMIN, 2, ald);
300 	if (err)
301 		return err;
302 
303 	ctrl2 = rx8025_read_reg(client, RX8025_REG_CTRL2);
304 	if (ctrl2 < 0)
305 		return ctrl2;
306 
307 	dev_dbg(dev, "%s: read alarm 0x%02x 0x%02x ctrl2 %02x\n",
308 		__func__, ald[0], ald[1], ctrl2);
309 
310 	/* Hardware alarms precision is 1 minute! */
311 	t->time.tm_sec = 0;
312 	t->time.tm_min = bcd2bin(ald[0] & 0x7f);
313 	if (rx8025->ctrl1 & RX8025_BIT_CTRL1_1224)
314 		t->time.tm_hour = bcd2bin(ald[1] & 0x3f);
315 	else
316 		t->time.tm_hour = bcd2bin(ald[1] & 0x1f) % 12
317 			+ (ald[1] & 0x20 ? 12 : 0);
318 
319 	t->time.tm_wday = -1;
320 	t->time.tm_mday = -1;
321 	t->time.tm_mon = -1;
322 	t->time.tm_year = -1;
323 
324 	dev_dbg(dev, "%s: date: %ds %dm %dh %dmd %dm %dy\n",
325 		__func__,
326 		t->time.tm_sec, t->time.tm_min, t->time.tm_hour,
327 		t->time.tm_mday, t->time.tm_mon, t->time.tm_year);
328 	t->enabled = !!(rx8025->ctrl1 & RX8025_BIT_CTRL1_DALE);
329 	t->pending = (ctrl2 & RX8025_BIT_CTRL2_DAFG) && t->enabled;
330 
331 	return err;
332 }
333 
334 static int rx8025_set_alarm(struct device *dev, struct rtc_wkalrm *t)
335 {
336 	struct i2c_client *client = to_i2c_client(dev);
337 	struct rx8025_data *rx8025 = dev_get_drvdata(dev);
338 	u8 ald[2];
339 	int err;
340 
341 	if (client->irq <= 0)
342 		return -EINVAL;
343 
344 	/* Hardware alarm precision is 1 minute! */
345 	ald[0] = bin2bcd(t->time.tm_min);
346 	if (rx8025->ctrl1 & RX8025_BIT_CTRL1_1224)
347 		ald[1] = bin2bcd(t->time.tm_hour);
348 	else
349 		ald[1] = (t->time.tm_hour >= 12 ? 0x20 : 0)
350 			| bin2bcd((t->time.tm_hour + 11) % 12 + 1);
351 
352 	dev_dbg(dev, "%s: write 0x%02x 0x%02x\n", __func__, ald[0], ald[1]);
353 
354 	if (rx8025->ctrl1 & RX8025_BIT_CTRL1_DALE) {
355 		rx8025->ctrl1 &= ~RX8025_BIT_CTRL1_DALE;
356 		err = rx8025_write_reg(rx8025->client, RX8025_REG_CTRL1,
357 				       rx8025->ctrl1);
358 		if (err)
359 			return err;
360 	}
361 	err = rx8025_write_regs(rx8025->client, RX8025_REG_ALDMIN, 2, ald);
362 	if (err)
363 		return err;
364 
365 	if (t->enabled) {
366 		rx8025->ctrl1 |= RX8025_BIT_CTRL1_DALE;
367 		err = rx8025_write_reg(rx8025->client, RX8025_REG_CTRL1,
368 				       rx8025->ctrl1);
369 		if (err)
370 			return err;
371 	}
372 
373 	return 0;
374 }
375 
376 static int rx8025_alarm_irq_enable(struct device *dev, unsigned int enabled)
377 {
378 	struct rx8025_data *rx8025 = dev_get_drvdata(dev);
379 	u8 ctrl1;
380 	int err;
381 
382 	ctrl1 = rx8025->ctrl1;
383 	if (enabled)
384 		ctrl1 |= RX8025_BIT_CTRL1_DALE;
385 	else
386 		ctrl1 &= ~RX8025_BIT_CTRL1_DALE;
387 
388 	if (ctrl1 != rx8025->ctrl1) {
389 		rx8025->ctrl1 = ctrl1;
390 		err = rx8025_write_reg(rx8025->client, RX8025_REG_CTRL1,
391 				       rx8025->ctrl1);
392 		if (err)
393 			return err;
394 	}
395 	return 0;
396 }
397 
398 static struct rtc_class_ops rx8025_rtc_ops = {
399 	.read_time = rx8025_get_time,
400 	.set_time = rx8025_set_time,
401 	.read_alarm = rx8025_read_alarm,
402 	.set_alarm = rx8025_set_alarm,
403 	.alarm_irq_enable = rx8025_alarm_irq_enable,
404 };
405 
406 /*
407  * Clock precision adjustment support
408  *
409  * According to the RX8025 SA/NB application manual the frequency and
410  * temperature characteristics can be approximated using the following
411  * equation:
412  *
413  *   df = a * (ut - t)**2
414  *
415  *   df: Frequency deviation in any temperature
416  *   a : Coefficient = (-35 +-5) * 10**-9
417  *   ut: Ultimate temperature in degree = +25 +-5 degree
418  *   t : Any temperature in degree
419  *
420  * Note that the clock adjustment in ppb must be entered (which is
421  * the negative value of the deviation).
422  */
423 static int rx8025_get_clock_adjust(struct device *dev, int *adj)
424 {
425 	struct i2c_client *client = to_i2c_client(dev);
426 	int digoff;
427 
428 	digoff = rx8025_read_reg(client, RX8025_REG_DIGOFF);
429 	if (digoff < 0)
430 		return digoff;
431 
432 	*adj = digoff >= 64 ? digoff - 128 : digoff;
433 	if (*adj > 0)
434 		(*adj)--;
435 	*adj *= -RX8025_ADJ_RESOLUTION;
436 
437 	return 0;
438 }
439 
440 static int rx8025_set_clock_adjust(struct device *dev, int adj)
441 {
442 	struct i2c_client *client = to_i2c_client(dev);
443 	u8 digoff;
444 	int err;
445 
446 	adj /= -RX8025_ADJ_RESOLUTION;
447 	if (adj > RX8025_ADJ_DATA_MAX)
448 		adj = RX8025_ADJ_DATA_MAX;
449 	else if (adj < RX8025_ADJ_DATA_MIN)
450 		adj = RX8025_ADJ_DATA_MIN;
451 	else if (adj > 0)
452 		adj++;
453 	else if (adj < 0)
454 		adj += 128;
455 	digoff = adj;
456 
457 	err = rx8025_write_reg(client, RX8025_REG_DIGOFF, digoff);
458 	if (err)
459 		return err;
460 
461 	dev_dbg(dev, "%s: write 0x%02x\n", __func__, digoff);
462 
463 	return 0;
464 }
465 
466 static ssize_t rx8025_sysfs_show_clock_adjust(struct device *dev,
467 					      struct device_attribute *attr,
468 					      char *buf)
469 {
470 	int err, adj;
471 
472 	err = rx8025_get_clock_adjust(dev, &adj);
473 	if (err)
474 		return err;
475 
476 	return sprintf(buf, "%d\n", adj);
477 }
478 
479 static ssize_t rx8025_sysfs_store_clock_adjust(struct device *dev,
480 					       struct device_attribute *attr,
481 					       const char *buf, size_t count)
482 {
483 	int adj, err;
484 
485 	if (sscanf(buf, "%i", &adj) != 1)
486 		return -EINVAL;
487 
488 	err = rx8025_set_clock_adjust(dev, adj);
489 
490 	return err ? err : count;
491 }
492 
493 static DEVICE_ATTR(clock_adjust_ppb, S_IRUGO | S_IWUSR,
494 		   rx8025_sysfs_show_clock_adjust,
495 		   rx8025_sysfs_store_clock_adjust);
496 
497 static int rx8025_sysfs_register(struct device *dev)
498 {
499 	return device_create_file(dev, &dev_attr_clock_adjust_ppb);
500 }
501 
502 static void rx8025_sysfs_unregister(struct device *dev)
503 {
504 	device_remove_file(dev, &dev_attr_clock_adjust_ppb);
505 }
506 
507 static int rx8025_probe(struct i2c_client *client,
508 			const struct i2c_device_id *id)
509 {
510 	struct i2c_adapter *adapter = to_i2c_adapter(client->dev.parent);
511 	struct rx8025_data *rx8025;
512 	int err = 0;
513 
514 	if (!i2c_check_functionality(adapter, I2C_FUNC_SMBUS_BYTE_DATA
515 				     | I2C_FUNC_SMBUS_I2C_BLOCK)) {
516 		dev_err(&adapter->dev,
517 			"doesn't support required functionality\n");
518 		return -EIO;
519 	}
520 
521 	rx8025 = devm_kzalloc(&client->dev, sizeof(*rx8025), GFP_KERNEL);
522 	if (!rx8025)
523 		return -ENOMEM;
524 
525 	rx8025->client = client;
526 	i2c_set_clientdata(client, rx8025);
527 
528 	err = rx8025_init_client(client);
529 	if (err)
530 		return err;
531 
532 	rx8025->rtc = devm_rtc_device_register(&client->dev, client->name,
533 					  &rx8025_rtc_ops, THIS_MODULE);
534 	if (IS_ERR(rx8025->rtc)) {
535 		dev_err(&client->dev, "unable to register the class device\n");
536 		return PTR_ERR(rx8025->rtc);
537 	}
538 
539 	if (client->irq > 0) {
540 		dev_info(&client->dev, "IRQ %d supplied\n", client->irq);
541 		err = devm_request_threaded_irq(&client->dev, client->irq, NULL,
542 						rx8025_handle_irq, 0, "rx8025",
543 						client);
544 		if (err) {
545 			dev_err(&client->dev, "unable to request IRQ, alarms disabled\n");
546 			client->irq = 0;
547 		}
548 	}
549 
550 	rx8025->rtc->max_user_freq = 1;
551 
552 	err = rx8025_sysfs_register(&client->dev);
553 	return err;
554 }
555 
556 static int rx8025_remove(struct i2c_client *client)
557 {
558 	rx8025_sysfs_unregister(&client->dev);
559 	return 0;
560 }
561 
562 static struct i2c_driver rx8025_driver = {
563 	.driver = {
564 		.name = "rtc-rx8025",
565 	},
566 	.probe		= rx8025_probe,
567 	.remove		= rx8025_remove,
568 	.id_table	= rx8025_id,
569 };
570 
571 module_i2c_driver(rx8025_driver);
572 
573 MODULE_AUTHOR("Wolfgang Grandegger <wg@grandegger.com>");
574 MODULE_DESCRIPTION("RX-8025 SA/NB RTC driver");
575 MODULE_LICENSE("GPL");
576