1 /* 2 * rtc-twl.c -- TWL Real Time Clock interface 3 * 4 * Copyright (C) 2007 MontaVista Software, Inc 5 * Author: Alexandre Rusev <source@mvista.com> 6 * 7 * Based on original TI driver twl4030-rtc.c 8 * Copyright (C) 2006 Texas Instruments, Inc. 9 * 10 * Based on rtc-omap.c 11 * Copyright (C) 2003 MontaVista Software, Inc. 12 * Author: George G. Davis <gdavis@mvista.com> or <source@mvista.com> 13 * Copyright (C) 2006 David Brownell 14 * 15 * This program is free software; you can redistribute it and/or 16 * modify it under the terms of the GNU General Public License 17 * as published by the Free Software Foundation; either version 18 * 2 of the License, or (at your option) any later version. 19 */ 20 21 #include <linux/kernel.h> 22 #include <linux/errno.h> 23 #include <linux/init.h> 24 #include <linux/module.h> 25 #include <linux/types.h> 26 #include <linux/rtc.h> 27 #include <linux/bcd.h> 28 #include <linux/platform_device.h> 29 #include <linux/interrupt.h> 30 31 #include <linux/i2c/twl.h> 32 33 34 /* 35 * RTC block register offsets (use TWL_MODULE_RTC) 36 */ 37 enum { 38 REG_SECONDS_REG = 0, 39 REG_MINUTES_REG, 40 REG_HOURS_REG, 41 REG_DAYS_REG, 42 REG_MONTHS_REG, 43 REG_YEARS_REG, 44 REG_WEEKS_REG, 45 46 REG_ALARM_SECONDS_REG, 47 REG_ALARM_MINUTES_REG, 48 REG_ALARM_HOURS_REG, 49 REG_ALARM_DAYS_REG, 50 REG_ALARM_MONTHS_REG, 51 REG_ALARM_YEARS_REG, 52 53 REG_RTC_CTRL_REG, 54 REG_RTC_STATUS_REG, 55 REG_RTC_INTERRUPTS_REG, 56 57 REG_RTC_COMP_LSB_REG, 58 REG_RTC_COMP_MSB_REG, 59 }; 60 static const u8 twl4030_rtc_reg_map[] = { 61 [REG_SECONDS_REG] = 0x00, 62 [REG_MINUTES_REG] = 0x01, 63 [REG_HOURS_REG] = 0x02, 64 [REG_DAYS_REG] = 0x03, 65 [REG_MONTHS_REG] = 0x04, 66 [REG_YEARS_REG] = 0x05, 67 [REG_WEEKS_REG] = 0x06, 68 69 [REG_ALARM_SECONDS_REG] = 0x07, 70 [REG_ALARM_MINUTES_REG] = 0x08, 71 [REG_ALARM_HOURS_REG] = 0x09, 72 [REG_ALARM_DAYS_REG] = 0x0A, 73 [REG_ALARM_MONTHS_REG] = 0x0B, 74 [REG_ALARM_YEARS_REG] = 0x0C, 75 76 [REG_RTC_CTRL_REG] = 0x0D, 77 [REG_RTC_STATUS_REG] = 0x0E, 78 [REG_RTC_INTERRUPTS_REG] = 0x0F, 79 80 [REG_RTC_COMP_LSB_REG] = 0x10, 81 [REG_RTC_COMP_MSB_REG] = 0x11, 82 }; 83 static const u8 twl6030_rtc_reg_map[] = { 84 [REG_SECONDS_REG] = 0x00, 85 [REG_MINUTES_REG] = 0x01, 86 [REG_HOURS_REG] = 0x02, 87 [REG_DAYS_REG] = 0x03, 88 [REG_MONTHS_REG] = 0x04, 89 [REG_YEARS_REG] = 0x05, 90 [REG_WEEKS_REG] = 0x06, 91 92 [REG_ALARM_SECONDS_REG] = 0x08, 93 [REG_ALARM_MINUTES_REG] = 0x09, 94 [REG_ALARM_HOURS_REG] = 0x0A, 95 [REG_ALARM_DAYS_REG] = 0x0B, 96 [REG_ALARM_MONTHS_REG] = 0x0C, 97 [REG_ALARM_YEARS_REG] = 0x0D, 98 99 [REG_RTC_CTRL_REG] = 0x10, 100 [REG_RTC_STATUS_REG] = 0x11, 101 [REG_RTC_INTERRUPTS_REG] = 0x12, 102 103 [REG_RTC_COMP_LSB_REG] = 0x13, 104 [REG_RTC_COMP_MSB_REG] = 0x14, 105 }; 106 107 /* RTC_CTRL_REG bitfields */ 108 #define BIT_RTC_CTRL_REG_STOP_RTC_M 0x01 109 #define BIT_RTC_CTRL_REG_ROUND_30S_M 0x02 110 #define BIT_RTC_CTRL_REG_AUTO_COMP_M 0x04 111 #define BIT_RTC_CTRL_REG_MODE_12_24_M 0x08 112 #define BIT_RTC_CTRL_REG_TEST_MODE_M 0x10 113 #define BIT_RTC_CTRL_REG_SET_32_COUNTER_M 0x20 114 #define BIT_RTC_CTRL_REG_GET_TIME_M 0x40 115 116 /* RTC_STATUS_REG bitfields */ 117 #define BIT_RTC_STATUS_REG_RUN_M 0x02 118 #define BIT_RTC_STATUS_REG_1S_EVENT_M 0x04 119 #define BIT_RTC_STATUS_REG_1M_EVENT_M 0x08 120 #define BIT_RTC_STATUS_REG_1H_EVENT_M 0x10 121 #define BIT_RTC_STATUS_REG_1D_EVENT_M 0x20 122 #define BIT_RTC_STATUS_REG_ALARM_M 0x40 123 #define BIT_RTC_STATUS_REG_POWER_UP_M 0x80 124 125 /* RTC_INTERRUPTS_REG bitfields */ 126 #define BIT_RTC_INTERRUPTS_REG_EVERY_M 0x03 127 #define BIT_RTC_INTERRUPTS_REG_IT_TIMER_M 0x04 128 #define BIT_RTC_INTERRUPTS_REG_IT_ALARM_M 0x08 129 130 131 /* REG_SECONDS_REG through REG_YEARS_REG is how many registers? */ 132 #define ALL_TIME_REGS 6 133 134 /*----------------------------------------------------------------------*/ 135 static u8 *rtc_reg_map; 136 137 /* 138 * Supports 1 byte read from TWL RTC register. 139 */ 140 static int twl_rtc_read_u8(u8 *data, u8 reg) 141 { 142 int ret; 143 144 ret = twl_i2c_read_u8(TWL_MODULE_RTC, data, (rtc_reg_map[reg])); 145 if (ret < 0) 146 pr_err("twl_rtc: Could not read TWL" 147 "register %X - error %d\n", reg, ret); 148 return ret; 149 } 150 151 /* 152 * Supports 1 byte write to TWL RTC registers. 153 */ 154 static int twl_rtc_write_u8(u8 data, u8 reg) 155 { 156 int ret; 157 158 ret = twl_i2c_write_u8(TWL_MODULE_RTC, data, (rtc_reg_map[reg])); 159 if (ret < 0) 160 pr_err("twl_rtc: Could not write TWL" 161 "register %X - error %d\n", reg, ret); 162 return ret; 163 } 164 165 /* 166 * Cache the value for timer/alarm interrupts register; this is 167 * only changed by callers holding rtc ops lock (or resume). 168 */ 169 static unsigned char rtc_irq_bits; 170 171 /* 172 * Enable 1/second update and/or alarm interrupts. 173 */ 174 static int set_rtc_irq_bit(unsigned char bit) 175 { 176 unsigned char val; 177 int ret; 178 179 val = rtc_irq_bits | bit; 180 val &= ~BIT_RTC_INTERRUPTS_REG_EVERY_M; 181 ret = twl_rtc_write_u8(val, REG_RTC_INTERRUPTS_REG); 182 if (ret == 0) 183 rtc_irq_bits = val; 184 185 return ret; 186 } 187 188 /* 189 * Disable update and/or alarm interrupts. 190 */ 191 static int mask_rtc_irq_bit(unsigned char bit) 192 { 193 unsigned char val; 194 int ret; 195 196 val = rtc_irq_bits & ~bit; 197 ret = twl_rtc_write_u8(val, REG_RTC_INTERRUPTS_REG); 198 if (ret == 0) 199 rtc_irq_bits = val; 200 201 return ret; 202 } 203 204 static int twl_rtc_alarm_irq_enable(struct device *dev, unsigned enabled) 205 { 206 int ret; 207 208 if (enabled) 209 ret = set_rtc_irq_bit(BIT_RTC_INTERRUPTS_REG_IT_ALARM_M); 210 else 211 ret = mask_rtc_irq_bit(BIT_RTC_INTERRUPTS_REG_IT_ALARM_M); 212 213 return ret; 214 } 215 216 /* 217 * Gets current TWL RTC time and date parameters. 218 * 219 * The RTC's time/alarm representation is not what gmtime(3) requires 220 * Linux to use: 221 * 222 * - Months are 1..12 vs Linux 0-11 223 * - Years are 0..99 vs Linux 1900..N (we assume 21st century) 224 */ 225 static int twl_rtc_read_time(struct device *dev, struct rtc_time *tm) 226 { 227 unsigned char rtc_data[ALL_TIME_REGS + 1]; 228 int ret; 229 u8 save_control; 230 231 ret = twl_rtc_read_u8(&save_control, REG_RTC_CTRL_REG); 232 if (ret < 0) 233 return ret; 234 235 save_control |= BIT_RTC_CTRL_REG_GET_TIME_M; 236 237 ret = twl_rtc_write_u8(save_control, REG_RTC_CTRL_REG); 238 if (ret < 0) 239 return ret; 240 241 ret = twl_i2c_read(TWL_MODULE_RTC, rtc_data, 242 (rtc_reg_map[REG_SECONDS_REG]), ALL_TIME_REGS); 243 244 if (ret < 0) { 245 dev_err(dev, "rtc_read_time error %d\n", ret); 246 return ret; 247 } 248 249 tm->tm_sec = bcd2bin(rtc_data[0]); 250 tm->tm_min = bcd2bin(rtc_data[1]); 251 tm->tm_hour = bcd2bin(rtc_data[2]); 252 tm->tm_mday = bcd2bin(rtc_data[3]); 253 tm->tm_mon = bcd2bin(rtc_data[4]) - 1; 254 tm->tm_year = bcd2bin(rtc_data[5]) + 100; 255 256 return ret; 257 } 258 259 static int twl_rtc_set_time(struct device *dev, struct rtc_time *tm) 260 { 261 unsigned char save_control; 262 unsigned char rtc_data[ALL_TIME_REGS + 1]; 263 int ret; 264 265 rtc_data[1] = bin2bcd(tm->tm_sec); 266 rtc_data[2] = bin2bcd(tm->tm_min); 267 rtc_data[3] = bin2bcd(tm->tm_hour); 268 rtc_data[4] = bin2bcd(tm->tm_mday); 269 rtc_data[5] = bin2bcd(tm->tm_mon + 1); 270 rtc_data[6] = bin2bcd(tm->tm_year - 100); 271 272 /* Stop RTC while updating the TC registers */ 273 ret = twl_rtc_read_u8(&save_control, REG_RTC_CTRL_REG); 274 if (ret < 0) 275 goto out; 276 277 save_control &= ~BIT_RTC_CTRL_REG_STOP_RTC_M; 278 ret = twl_rtc_write_u8(save_control, REG_RTC_CTRL_REG); 279 if (ret < 0) 280 goto out; 281 282 /* update all the time registers in one shot */ 283 ret = twl_i2c_write(TWL_MODULE_RTC, rtc_data, 284 (rtc_reg_map[REG_SECONDS_REG]), ALL_TIME_REGS); 285 if (ret < 0) { 286 dev_err(dev, "rtc_set_time error %d\n", ret); 287 goto out; 288 } 289 290 /* Start back RTC */ 291 save_control |= BIT_RTC_CTRL_REG_STOP_RTC_M; 292 ret = twl_rtc_write_u8(save_control, REG_RTC_CTRL_REG); 293 294 out: 295 return ret; 296 } 297 298 /* 299 * Gets current TWL RTC alarm time. 300 */ 301 static int twl_rtc_read_alarm(struct device *dev, struct rtc_wkalrm *alm) 302 { 303 unsigned char rtc_data[ALL_TIME_REGS + 1]; 304 int ret; 305 306 ret = twl_i2c_read(TWL_MODULE_RTC, rtc_data, 307 (rtc_reg_map[REG_ALARM_SECONDS_REG]), ALL_TIME_REGS); 308 if (ret < 0) { 309 dev_err(dev, "rtc_read_alarm error %d\n", ret); 310 return ret; 311 } 312 313 /* some of these fields may be wildcard/"match all" */ 314 alm->time.tm_sec = bcd2bin(rtc_data[0]); 315 alm->time.tm_min = bcd2bin(rtc_data[1]); 316 alm->time.tm_hour = bcd2bin(rtc_data[2]); 317 alm->time.tm_mday = bcd2bin(rtc_data[3]); 318 alm->time.tm_mon = bcd2bin(rtc_data[4]) - 1; 319 alm->time.tm_year = bcd2bin(rtc_data[5]) + 100; 320 321 /* report cached alarm enable state */ 322 if (rtc_irq_bits & BIT_RTC_INTERRUPTS_REG_IT_ALARM_M) 323 alm->enabled = 1; 324 325 return ret; 326 } 327 328 static int twl_rtc_set_alarm(struct device *dev, struct rtc_wkalrm *alm) 329 { 330 unsigned char alarm_data[ALL_TIME_REGS + 1]; 331 int ret; 332 333 ret = twl_rtc_alarm_irq_enable(dev, 0); 334 if (ret) 335 goto out; 336 337 alarm_data[1] = bin2bcd(alm->time.tm_sec); 338 alarm_data[2] = bin2bcd(alm->time.tm_min); 339 alarm_data[3] = bin2bcd(alm->time.tm_hour); 340 alarm_data[4] = bin2bcd(alm->time.tm_mday); 341 alarm_data[5] = bin2bcd(alm->time.tm_mon + 1); 342 alarm_data[6] = bin2bcd(alm->time.tm_year - 100); 343 344 /* update all the alarm registers in one shot */ 345 ret = twl_i2c_write(TWL_MODULE_RTC, alarm_data, 346 (rtc_reg_map[REG_ALARM_SECONDS_REG]), ALL_TIME_REGS); 347 if (ret) { 348 dev_err(dev, "rtc_set_alarm error %d\n", ret); 349 goto out; 350 } 351 352 if (alm->enabled) 353 ret = twl_rtc_alarm_irq_enable(dev, 1); 354 out: 355 return ret; 356 } 357 358 static irqreturn_t twl_rtc_interrupt(int irq, void *rtc) 359 { 360 unsigned long events = 0; 361 int ret = IRQ_NONE; 362 int res; 363 u8 rd_reg; 364 365 res = twl_rtc_read_u8(&rd_reg, REG_RTC_STATUS_REG); 366 if (res) 367 goto out; 368 /* 369 * Figure out source of interrupt: ALARM or TIMER in RTC_STATUS_REG. 370 * only one (ALARM or RTC) interrupt source may be enabled 371 * at time, we also could check our results 372 * by reading RTS_INTERRUPTS_REGISTER[IT_TIMER,IT_ALARM] 373 */ 374 if (rd_reg & BIT_RTC_STATUS_REG_ALARM_M) 375 events |= RTC_IRQF | RTC_AF; 376 else 377 events |= RTC_IRQF | RTC_UF; 378 379 res = twl_rtc_write_u8(rd_reg | BIT_RTC_STATUS_REG_ALARM_M, 380 REG_RTC_STATUS_REG); 381 if (res) 382 goto out; 383 384 if (twl_class_is_4030()) { 385 /* Clear on Read enabled. RTC_IT bit of TWL4030_INT_PWR_ISR1 386 * needs 2 reads to clear the interrupt. One read is done in 387 * do_twl_pwrirq(). Doing the second read, to clear 388 * the bit. 389 * 390 * FIXME the reason PWR_ISR1 needs an extra read is that 391 * RTC_IF retriggered until we cleared REG_ALARM_M above. 392 * But re-reading like this is a bad hack; by doing so we 393 * risk wrongly clearing status for some other IRQ (losing 394 * the interrupt). Be smarter about handling RTC_UF ... 395 */ 396 res = twl_i2c_read_u8(TWL4030_MODULE_INT, 397 &rd_reg, TWL4030_INT_PWR_ISR1); 398 if (res) 399 goto out; 400 } 401 402 /* Notify RTC core on event */ 403 rtc_update_irq(rtc, 1, events); 404 405 ret = IRQ_HANDLED; 406 out: 407 return ret; 408 } 409 410 static struct rtc_class_ops twl_rtc_ops = { 411 .read_time = twl_rtc_read_time, 412 .set_time = twl_rtc_set_time, 413 .read_alarm = twl_rtc_read_alarm, 414 .set_alarm = twl_rtc_set_alarm, 415 .alarm_irq_enable = twl_rtc_alarm_irq_enable, 416 }; 417 418 /*----------------------------------------------------------------------*/ 419 420 static int __devinit twl_rtc_probe(struct platform_device *pdev) 421 { 422 struct rtc_device *rtc; 423 int ret = -EINVAL; 424 int irq = platform_get_irq(pdev, 0); 425 u8 rd_reg; 426 427 if (irq <= 0) 428 goto out1; 429 430 ret = twl_rtc_read_u8(&rd_reg, REG_RTC_STATUS_REG); 431 if (ret < 0) 432 goto out1; 433 434 if (rd_reg & BIT_RTC_STATUS_REG_POWER_UP_M) 435 dev_warn(&pdev->dev, "Power up reset detected.\n"); 436 437 if (rd_reg & BIT_RTC_STATUS_REG_ALARM_M) 438 dev_warn(&pdev->dev, "Pending Alarm interrupt detected.\n"); 439 440 /* Clear RTC Power up reset and pending alarm interrupts */ 441 ret = twl_rtc_write_u8(rd_reg, REG_RTC_STATUS_REG); 442 if (ret < 0) 443 goto out1; 444 445 if (twl_class_is_6030()) { 446 twl6030_interrupt_unmask(TWL6030_RTC_INT_MASK, 447 REG_INT_MSK_LINE_A); 448 twl6030_interrupt_unmask(TWL6030_RTC_INT_MASK, 449 REG_INT_MSK_STS_A); 450 } 451 452 /* Check RTC module status, Enable if it is off */ 453 ret = twl_rtc_read_u8(&rd_reg, REG_RTC_CTRL_REG); 454 if (ret < 0) 455 goto out1; 456 457 if (!(rd_reg & BIT_RTC_CTRL_REG_STOP_RTC_M)) { 458 dev_info(&pdev->dev, "Enabling TWL-RTC.\n"); 459 rd_reg = BIT_RTC_CTRL_REG_STOP_RTC_M; 460 ret = twl_rtc_write_u8(rd_reg, REG_RTC_CTRL_REG); 461 if (ret < 0) 462 goto out1; 463 } 464 465 /* init cached IRQ enable bits */ 466 ret = twl_rtc_read_u8(&rtc_irq_bits, REG_RTC_INTERRUPTS_REG); 467 if (ret < 0) 468 goto out1; 469 470 rtc = rtc_device_register(pdev->name, 471 &pdev->dev, &twl_rtc_ops, THIS_MODULE); 472 if (IS_ERR(rtc)) { 473 ret = PTR_ERR(rtc); 474 dev_err(&pdev->dev, "can't register RTC device, err %ld\n", 475 PTR_ERR(rtc)); 476 goto out1; 477 } 478 479 ret = request_threaded_irq(irq, NULL, twl_rtc_interrupt, 480 IRQF_TRIGGER_RISING, 481 dev_name(&rtc->dev), rtc); 482 if (ret < 0) { 483 dev_err(&pdev->dev, "IRQ is not free.\n"); 484 goto out2; 485 } 486 487 platform_set_drvdata(pdev, rtc); 488 return 0; 489 490 out2: 491 rtc_device_unregister(rtc); 492 out1: 493 return ret; 494 } 495 496 /* 497 * Disable all TWL RTC module interrupts. 498 * Sets status flag to free. 499 */ 500 static int __devexit twl_rtc_remove(struct platform_device *pdev) 501 { 502 /* leave rtc running, but disable irqs */ 503 struct rtc_device *rtc = platform_get_drvdata(pdev); 504 int irq = platform_get_irq(pdev, 0); 505 506 mask_rtc_irq_bit(BIT_RTC_INTERRUPTS_REG_IT_ALARM_M); 507 mask_rtc_irq_bit(BIT_RTC_INTERRUPTS_REG_IT_TIMER_M); 508 if (twl_class_is_6030()) { 509 twl6030_interrupt_mask(TWL6030_RTC_INT_MASK, 510 REG_INT_MSK_LINE_A); 511 twl6030_interrupt_mask(TWL6030_RTC_INT_MASK, 512 REG_INT_MSK_STS_A); 513 } 514 515 516 free_irq(irq, rtc); 517 518 rtc_device_unregister(rtc); 519 platform_set_drvdata(pdev, NULL); 520 return 0; 521 } 522 523 static void twl_rtc_shutdown(struct platform_device *pdev) 524 { 525 /* mask timer interrupts, but leave alarm interrupts on to enable 526 power-on when alarm is triggered */ 527 mask_rtc_irq_bit(BIT_RTC_INTERRUPTS_REG_IT_TIMER_M); 528 } 529 530 #ifdef CONFIG_PM 531 532 static unsigned char irqstat; 533 534 static int twl_rtc_suspend(struct platform_device *pdev, pm_message_t state) 535 { 536 irqstat = rtc_irq_bits; 537 538 mask_rtc_irq_bit(BIT_RTC_INTERRUPTS_REG_IT_TIMER_M); 539 return 0; 540 } 541 542 static int twl_rtc_resume(struct platform_device *pdev) 543 { 544 set_rtc_irq_bit(irqstat); 545 return 0; 546 } 547 548 #else 549 #define twl_rtc_suspend NULL 550 #define twl_rtc_resume NULL 551 #endif 552 553 MODULE_ALIAS("platform:twl_rtc"); 554 555 static struct platform_driver twl4030rtc_driver = { 556 .probe = twl_rtc_probe, 557 .remove = __devexit_p(twl_rtc_remove), 558 .shutdown = twl_rtc_shutdown, 559 .suspend = twl_rtc_suspend, 560 .resume = twl_rtc_resume, 561 .driver = { 562 .owner = THIS_MODULE, 563 .name = "twl_rtc", 564 }, 565 }; 566 567 static int __init twl_rtc_init(void) 568 { 569 if (twl_class_is_4030()) 570 rtc_reg_map = (u8 *) twl4030_rtc_reg_map; 571 else 572 rtc_reg_map = (u8 *) twl6030_rtc_reg_map; 573 574 return platform_driver_register(&twl4030rtc_driver); 575 } 576 module_init(twl_rtc_init); 577 578 static void __exit twl_rtc_exit(void) 579 { 580 platform_driver_unregister(&twl4030rtc_driver); 581 } 582 module_exit(twl_rtc_exit); 583 584 MODULE_AUTHOR("Texas Instruments, MontaVista Software"); 585 MODULE_LICENSE("GPL"); 586