1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 /* 22 * Copyright 2009 Sun Microsystems, Inc. All rights reserved. 23 * Use is subject to license terms. 24 */ 25 26 27 #include <sys/types.h> 28 #include <sys/conf.h> 29 #include <sys/devops.h> 30 #include <sys/kmem.h> 31 #include <sys/open.h> 32 #include <sys/file.h> 33 #include <sys/note.h> 34 #include <sys/ddi.h> 35 #include <sys/sunddi.h> 36 37 #include <sys/modctl.h> 38 #include <sys/stat.h> 39 #include <sys/clock.h> 40 #include <sys/reboot.h> 41 #include <sys/machsystm.h> 42 #include <sys/poll.h> 43 #include <sys/pbio.h> 44 #include <sys/sysmacros.h> 45 46 /* Added for prom interface */ 47 #include <sys/promif.h> 48 #include <sys/promimpl.h> 49 50 #include <sys/i2c/misc/i2c_svc.h> 51 #include <sys/todds1307.h> 52 53 #define I2C_DELAY 20000 54 #define DS1307_DEVICE_TYPE "rtc" 55 56 /* 57 * Driver enrty routines 58 */ 59 static int todds1307_attach(dev_info_t *, ddi_attach_cmd_t); 60 static int todds1307_detach(dev_info_t *, ddi_detach_cmd_t); 61 static int todds1307_getinfo(dev_info_t *, ddi_info_cmd_t, void *, void **); 62 63 /* 64 * tod_ops entry routines 65 */ 66 static timestruc_t todds1307_get(void); 67 static void todds1307_set(timestruc_t); 68 static uint_t todds1307_set_watchdog_timer(uint_t); 69 static uint_t todds1307_clear_watchdog_timer(void); 70 static void todds1307_set_power_alarm(timestruc_t); 71 static void todds1307_clear_power_alarm(void); 72 static int todds1307_setup_prom(); 73 static void todds1307_rele_prom(); 74 static int todds1307_prom_getdate(struct rtc_t *rtc); 75 static int todds1307_prom_setdate(struct rtc_t *rtc); 76 77 /* 78 * Local functions 79 */ 80 static int todds1307_read_rtc(struct rtc_t *); 81 static int todds1307_write_rtc(struct rtc_t *); 82 83 /* Anchor for soft state structure */ 84 static void *ds1307_statep; 85 static int instance = -1; 86 static int todds1307_attach_done = 0; 87 static kmutex_t todds1307_rd_lock; 88 static ihandle_t todds1307_ihandle = 0; 89 90 /* one second time out */ 91 #define I2c_CYCLIC_TIMEOUT 1000000000 92 uint_t i2c_cyclic_timeout = I2c_CYCLIC_TIMEOUT; 93 static int sync_clock_once = 1; 94 static struct rtc_t soft_rtc; 95 96 /* 97 * For debugging only 98 */ 99 static unsigned char int2bcd(int num); 100 static int bcd2int(unsigned char num); 101 102 /* 103 * cp_ops structure 104 */ 105 static struct cb_ops ds1307_cbops = { 106 nodev, /* open */ 107 nodev, /* close */ 108 nodev, /* strategy */ 109 nodev, /* print */ 110 nodev, /* dump */ 111 nodev, /* read */ 112 nodev, /* write */ 113 nodev, /* ioctl */ 114 nodev, /* devmap */ 115 nodev, /* mmap */ 116 nodev, /* segmap */ 117 NULL, /* poll */ 118 ddi_prop_op, /* cb_prop_op */ 119 NULL, /* streamtab */ 120 D_NEW | D_MP, /* Driver compatibility flag */ 121 CB_REV, /* rev */ 122 nodev, /* int (*cb_aread)() */ 123 nodev /* int (*cb_awrite)() */ 124 }; 125 126 /* 127 * dev_ops structure 128 */ 129 static struct dev_ops ds1307_ops = { 130 DEVO_REV, /* devo_rev */ 131 0, /* refcnt - reference cnt always set to 0 */ 132 todds1307_getinfo, /* getinfo - Maybe requred */ 133 nulldev, /* identify */ 134 nulldev, /* probe */ 135 todds1307_attach, /* attach */ 136 todds1307_detach, /* detach */ 137 nodev, /* reset */ 138 &ds1307_cbops, /* cb_ops - ds1307 does not need this(?) */ 139 NULL, /* bus_ops */ 140 NULL, /* power */ 141 ddi_quiesce_not_needed, /* quiesce */ 142 }; 143 144 static struct modldrv todds1307_modldrv = { 145 &mod_driverops, /* Type of module. This one is a driver */ 146 "tod driver for DS1307 v1.12", /* Name of the module */ 147 &ds1307_ops, /* Pointer to dev_ops */ 148 }; 149 150 /* 151 * Module linkage structure 152 */ 153 static struct modlinkage todds1307_modlinkage = { 154 MODREV_1, 155 &todds1307_modldrv, 156 0 157 }; 158 159 int 160 _init(void) 161 { 162 int error; 163 164 if (strcmp(tod_module_name, "todds1307") == 0) { 165 if ((error = ddi_soft_state_init(&ds1307_statep, 166 sizeof (ds1307_state_t), 0)) != DDI_SUCCESS) { 167 return (error); 168 } 169 170 tod_ops.tod_get = todds1307_get; 171 tod_ops.tod_set = todds1307_set; 172 tod_ops.tod_set_watchdog_timer = todds1307_set_watchdog_timer; 173 tod_ops.tod_clear_watchdog_timer = 174 todds1307_clear_watchdog_timer; 175 tod_ops.tod_set_power_alarm = todds1307_set_power_alarm; 176 tod_ops.tod_clear_power_alarm = todds1307_clear_power_alarm; 177 } 178 179 (void) todds1307_setup_prom(); 180 181 /* 182 * Install the module 183 */ 184 if ((error = mod_install(&todds1307_modlinkage)) != 0) { 185 ddi_soft_state_fini(&ds1307_statep); 186 return (error); 187 } 188 mutex_init(&todds1307_rd_lock, NULL, MUTEX_DEFAULT, NULL); 189 190 return (0); 191 } 192 193 int 194 _fini(void) 195 { 196 int error = 0; 197 198 if (strcmp(tod_module_name, "todds1307") == 0) { 199 error = EBUSY; 200 } else { 201 if ((error = mod_remove(&todds1307_modlinkage)) == 0) { 202 ddi_soft_state_fini(&ds1307_statep); 203 mutex_destroy(&todds1307_rd_lock); 204 todds1307_rele_prom(); 205 } 206 } 207 208 return (error); 209 } 210 211 int 212 _info(struct modinfo *modinfop) 213 { 214 return (mod_info(&todds1307_modlinkage, modinfop)); 215 } 216 217 /* 218 * cyclical call to get tod. 219 */ 220 static void 221 todds1307_cyclic(void *arg) 222 { 223 224 (void) todds1307_read_rtc((struct rtc_t *)arg); 225 226 } 227 228 /* 229 * register ds1307 client device with i2c services, and 230 * allocate & initialize soft state structure. 231 */ 232 static int 233 todds1307_attach(dev_info_t *dip, ddi_attach_cmd_t cmd) 234 { 235 static ds1307_state_t *statep = NULL; 236 i2c_transfer_t *i2c_tp = NULL; 237 uint8_t tempVal = (uint8_t)0; 238 switch (cmd) { 239 240 case DDI_ATTACH: 241 break; 242 case DDI_RESUME: 243 return (DDI_SUCCESS); 244 default: 245 return (DDI_FAILURE); 246 } 247 248 if (instance != -1) { 249 return (DDI_FAILURE); 250 } 251 252 instance = ddi_get_instance(dip); 253 254 /* 255 * Allocate soft state structure 256 */ 257 if (ddi_soft_state_zalloc(ds1307_statep, instance) != DDI_SUCCESS) { 258 return (DDI_FAILURE); 259 } 260 261 statep = ddi_get_soft_state(ds1307_statep, instance); 262 if (statep == NULL) { 263 return (DDI_FAILURE); 264 } 265 266 statep->dip = dip; 267 268 if (i2c_client_register(dip, &statep->ds1307_i2c_hdl) != I2C_SUCCESS) { 269 ddi_soft_state_free(ds1307_statep, instance); 270 delay(drv_usectohz(I2C_DELAY)); 271 return (DDI_FAILURE); 272 } 273 274 /* check and initialize the oscillator */ 275 276 (void) i2c_transfer_alloc(statep->ds1307_i2c_hdl, 277 &i2c_tp, 1, 1, I2C_SLEEP); 278 i2c_tp->i2c_version = I2C_XFER_REV; 279 i2c_tp->i2c_flags = I2C_WR_RD; 280 i2c_tp->i2c_wbuf[0] = (uchar_t)0x00; /* Read 00h */ 281 i2c_tp->i2c_wlen = 1; 282 i2c_tp->i2c_rlen = 1; 283 284 if ((i2c_transfer(statep->ds1307_i2c_hdl, i2c_tp)) != I2C_SUCCESS) { 285 (void) i2c_transfer_free(statep->ds1307_i2c_hdl, i2c_tp); 286 ddi_soft_state_free(ds1307_statep, instance); 287 delay(drv_usectohz(I2C_DELAY)); 288 return (DDI_FAILURE); 289 } 290 291 tempVal = i2c_tp->i2c_rbuf[0]; 292 293 (void) i2c_transfer_free(statep->ds1307_i2c_hdl, i2c_tp); 294 295 if (tempVal & 0x80) { /* check Oscillator */ 296 (void) i2c_transfer_alloc(statep->ds1307_i2c_hdl, &i2c_tp, 297 2, 1, I2C_SLEEP); 298 i2c_tp->i2c_version = I2C_XFER_REV; 299 i2c_tp->i2c_flags = I2C_WR; 300 i2c_tp->i2c_wbuf[0] = 0x00; 301 i2c_tp->i2c_wbuf[1] = 302 (uchar_t)(i2c_tp->i2c_rbuf[0]& 0x7f); 303 i2c_tp->i2c_wlen = 2; 304 /* Enable oscillator */ 305 if ((i2c_transfer(statep->ds1307_i2c_hdl, i2c_tp)) 306 != I2C_SUCCESS) { 307 (void) i2c_transfer_free(statep->ds1307_i2c_hdl, 308 i2c_tp); 309 ddi_soft_state_free(ds1307_statep, instance); 310 return (DDI_FAILURE); 311 } 312 (void) i2c_transfer_free(statep->ds1307_i2c_hdl, i2c_tp); 313 } 314 315 /* 316 * Create a periodical handler to read TOD. 317 */ 318 ASSERT(statep->cycid == NULL); 319 statep->cycid = ddi_periodic_add(todds1307_cyclic, &soft_rtc, 320 i2c_cyclic_timeout, DDI_IPL_1); 321 322 statep->state = TOD_ATTACHED; 323 todds1307_attach_done = 1; 324 ddi_report_dev(dip); 325 326 return (DDI_SUCCESS); 327 } 328 329 /* 330 * Unregister ds1307 client device with i2c services and free 331 * soft state structure. 332 */ 333 /*ARGSUSED*/ 334 static int 335 todds1307_detach(dev_info_t *dip, ddi_detach_cmd_t cmd) 336 { 337 switch (cmd) { 338 339 /* 340 * Once attached, do not allow detach because the system constantly 341 * calling todds1307_get() to get the time. If the driver is detached 342 * and the system try to get the time, the system will have memory 343 * problem. 344 * 345 * ds1307_state_t *statep = NULL; 346 * case DDI_DETACH: 347 * if ((statep = ddi_get_soft_state(ds1307_statep, 348 * instance)) == NULL) { 349 * return (ENOMEM); 350 * } 351 * i2c_client_unregister(statep->ds1307_i2c_hdl); 352 * ddi_soft_state_free(ds1307_statep, instance); 353 * return (DDI_SUCCESS); 354 */ 355 case DDI_SUSPEND: 356 return (DDI_SUCCESS); 357 358 default: 359 return (DDI_FAILURE); 360 } 361 } 362 363 /* *********************** tod_ops entry points ******************** */ 364 365 /* 366 * Read the current time from the DS1307 chip and convert to UNIX form. 367 * Should be called with tod_clock held. 368 */ 369 370 static timestruc_t 371 todds1307_get(void) 372 { 373 timestruc_t ts; 374 todinfo_t tod; 375 struct rtc_t rtc; 376 377 ASSERT(MUTEX_HELD(&tod_lock)); 378 379 if (sync_clock_once) { 380 (void) todds1307_read_rtc(&soft_rtc); 381 sync_clock_once = 0; 382 } else { 383 tod_fault_reset(); 384 return (hrestime); 385 } 386 387 bcopy(&soft_rtc, &rtc, sizeof (rtc)); 388 389 /* 390 * 00 - 68 = 2000 thru 2068 391 * 69-99 = 1969 thru 1999 392 */ 393 tod.tod_year = rtc.rtc_year; 394 if (rtc.rtc_year <= 68) 395 tod.tod_year += 100; 396 tod.tod_month = rtc.rtc_mon; 397 tod.tod_day = rtc.rtc_dom; 398 tod.tod_dow = rtc.rtc_dow; 399 tod.tod_hour = rtc.rtc_hrs; 400 tod.tod_min = rtc.rtc_min; 401 tod.tod_sec = rtc.rtc_sec; 402 403 ts.tv_sec = tod_to_utc(tod); 404 ts.tv_nsec = 0; 405 return (ts); 406 } 407 408 /* 409 * Program DS1307 with the specified time. 410 * Must be called with tod_lock held. The TOD 411 * chip supports date from 1969-2068 only. We must 412 * reject requests to set date below 2000. 413 */ 414 static void 415 todds1307_set(timestruc_t ts) 416 { 417 struct rtc_t rtc; 418 todinfo_t tod = utc_to_tod(ts.tv_sec); 419 int year; 420 421 422 ASSERT(MUTEX_HELD(&tod_lock)); 423 424 /* 425 * Year is base 1900, valid year range 1969-2068 426 */ 427 if ((tod.tod_year < 69) || (tod.tod_year > 168)) 428 return; 429 430 year = tod.tod_year; 431 if (year >= 100) 432 year -= 100; 433 434 rtc.rtc_year = int2bcd(year); 435 rtc.rtc_mon = int2bcd(tod.tod_month); 436 rtc.rtc_dom = int2bcd(tod.tod_day); 437 rtc.rtc_dow = int2bcd(tod.tod_dow); 438 rtc.rtc_hrs = int2bcd(tod.tod_hour); 439 rtc.rtc_min = int2bcd(tod.tod_min); 440 rtc.rtc_sec = int2bcd(tod.tod_sec); 441 442 (void) todds1307_write_rtc(&rtc); 443 } 444 445 /* ARGSUSED */ 446 static void 447 todds1307_set_power_alarm(timestruc_t ts) 448 { 449 ASSERT(MUTEX_HELD(&tod_lock)); 450 } 451 452 /* ARGSUSED */ 453 static void 454 todds1307_clear_power_alarm(void) 455 { 456 ASSERT(MUTEX_HELD(&tod_lock)); 457 } 458 459 /* ARGSUSED */ 460 static uint_t 461 todds1307_set_watchdog_timer(uint_t timeoutval) 462 { 463 ASSERT(MUTEX_HELD(&tod_lock)); 464 return (0); 465 } 466 467 /* ARGSUSED */ 468 static uint_t 469 todds1307_clear_watchdog_timer(void) 470 { 471 ASSERT(MUTEX_HELD(&tod_lock)); 472 return (0); 473 } 474 475 /* ********************** Local functions ***************************** */ 476 477 static char tod_read[7] = {-1, -1, -1, -1, -1, -1, -1}; 478 static int 479 todds1307_read_rtc(struct rtc_t *rtc) 480 { 481 static ds1307_state_t *statep = NULL; 482 i2c_transfer_t *i2c_tp = NULL; 483 int i2c_cmd_status = I2C_FAILURE; 484 int counter = 4; 485 486 if (!todds1307_attach_done) { 487 return (todds1307_prom_getdate(rtc)); 488 } 489 490 statep = ddi_get_soft_state(ds1307_statep, instance); 491 if (statep == NULL) { 492 cmn_err(CE_WARN, "todds1307: ddi_get_soft_state failed"); 493 return (DDI_FAILURE); 494 } 495 496 mutex_enter(&todds1307_rd_lock); 497 498 /* 499 * Allocate 1 byte for write buffer and 7 bytes for read buffer to 500 * to accomodate sec, min, hrs, dayOfWeek, dayOfMonth, year 501 */ 502 if ((i2c_transfer_alloc(statep->ds1307_i2c_hdl, &i2c_tp, 1, 503 7, I2C_SLEEP)) != I2C_SUCCESS) { 504 mutex_exit(&todds1307_rd_lock); 505 return (DDI_FAILURE); 506 } 507 508 do { 509 i2c_tp->i2c_version = I2C_XFER_REV; 510 i2c_tp->i2c_flags = I2C_WR_RD; 511 i2c_tp->i2c_wbuf[0] = (uchar_t)0x00; /* Start from reg 0x00 */ 512 i2c_tp->i2c_wlen = 1; /* Write one byte address */ 513 i2c_tp->i2c_rlen = 7; /* Read 7 regs */ 514 515 if ((i2c_cmd_status = i2c_transfer(statep->ds1307_i2c_hdl, 516 i2c_tp)) != I2C_SUCCESS) { 517 drv_usecwait(I2C_DELAY); 518 goto done; 519 } 520 /* for first read, need to get valid data */ 521 while (tod_read[0] == -1 && counter > 0) { 522 /* move data to static buffer */ 523 bcopy(i2c_tp->i2c_rbuf, tod_read, 7); 524 525 /* now read again */ 526 /* Start reading reg from 0x00 */ 527 i2c_tp->i2c_wbuf[0] = (uchar_t)0x00; 528 i2c_tp->i2c_wlen = 1; /* Write one byte address */ 529 i2c_tp->i2c_rlen = 7; /* Read 7 regs */ 530 if ((i2c_cmd_status = i2c_transfer(statep->ds1307_i2c_hdl, 531 i2c_tp)) != I2C_SUCCESS) { 532 drv_usecwait(I2C_DELAY); 533 goto done; 534 } 535 /* if they are not the same, then read again */ 536 if (bcmp(tod_read, i2c_tp->i2c_rbuf, 7) != 0) { 537 tod_read[0] = -1; 538 counter--; 539 } 540 } 541 542 } while (i2c_tp->i2c_rbuf[0] == 0x59 && 543 /* if seconds register is 0x59 (BCD), add data should match */ 544 bcmp(&tod_read[1], &i2c_tp->i2c_rbuf[1], 6) != 0 && 545 counter-- > 0); 546 547 if (counter < 0) 548 cmn_err(CE_WARN, "i2ctod: TOD Chip failed ??"); 549 550 /* move data to static buffer */ 551 bcopy(i2c_tp->i2c_rbuf, tod_read, 7); 552 553 554 rtc->rtc_year = bcd2int(i2c_tp->i2c_rbuf[6]); 555 rtc->rtc_mon = bcd2int(i2c_tp->i2c_rbuf[5]); 556 rtc->rtc_dom = bcd2int(i2c_tp->i2c_rbuf[4]); 557 rtc->rtc_dow = bcd2int(i2c_tp->i2c_rbuf[3]); 558 rtc->rtc_hrs = bcd2int(i2c_tp->i2c_rbuf[2]); 559 rtc->rtc_min = bcd2int(i2c_tp->i2c_rbuf[1]); 560 rtc->rtc_sec = bcd2int(i2c_tp->i2c_rbuf[0]); 561 562 done: 563 (void) i2c_transfer_free(statep->ds1307_i2c_hdl, i2c_tp); 564 565 mutex_exit(&todds1307_rd_lock); 566 return (i2c_cmd_status); 567 } 568 569 570 static int 571 todds1307_write_rtc(struct rtc_t *rtc) 572 { 573 ds1307_state_t *statep = NULL; 574 i2c_transfer_t *i2c_tp = NULL; 575 int i2c_cmd_status = I2C_SUCCESS; 576 577 578 if (!todds1307_attach_done) { 579 return (todds1307_prom_setdate(rtc)); 580 } 581 582 statep = ddi_get_soft_state(ds1307_statep, instance); 583 if (statep == NULL) { 584 return (DDI_FAILURE); 585 } 586 587 if ((i2c_cmd_status = i2c_transfer_alloc(statep->ds1307_i2c_hdl, 588 &i2c_tp, 8, 0, I2C_SLEEP)) != I2C_SUCCESS) { 589 return (i2c_cmd_status); 590 } 591 592 i2c_tp->i2c_version = I2C_XFER_REV; 593 i2c_tp->i2c_flags = I2C_WR; 594 i2c_tp->i2c_wbuf[0] = (uchar_t)0x00; 595 i2c_tp->i2c_wbuf[1] = rtc->rtc_sec; 596 i2c_tp->i2c_wbuf[2] = rtc->rtc_min; 597 i2c_tp->i2c_wbuf[3] = rtc->rtc_hrs; 598 i2c_tp->i2c_wbuf[4] = rtc->rtc_dow; 599 i2c_tp->i2c_wbuf[5] = rtc->rtc_dom; 600 i2c_tp->i2c_wbuf[6] = rtc->rtc_mon; 601 i2c_tp->i2c_wbuf[7] = rtc->rtc_year; 602 i2c_tp->i2c_wlen = 8; 603 604 if ((i2c_cmd_status = i2c_transfer(statep->ds1307_i2c_hdl, 605 i2c_tp)) != I2C_SUCCESS) { 606 (void) i2c_transfer_free(statep->ds1307_i2c_hdl, i2c_tp); 607 /* delay(drv_usectohz(I2C_DELAY)); */ 608 drv_usecwait(I2C_DELAY); 609 return (i2c_cmd_status); 610 } 611 612 tod_read[0] = -1; /* invalidate saved data from read routine */ 613 614 (void) i2c_transfer_free(statep->ds1307_i2c_hdl, i2c_tp); 615 616 return (i2c_cmd_status); 617 } 618 619 620 /*ARGSUSED*/ 621 static int 622 todds1307_getinfo(dev_info_t *dip, ddi_info_cmd_t infocmd, void *arg, 623 void **result) 624 { 625 ds1307_state_t *softsp; 626 627 if (instance == -1) { 628 return (DDI_FAILURE); 629 } 630 631 switch (infocmd) { 632 case DDI_INFO_DEVT2DEVINFO: 633 if ((softsp = ddi_get_soft_state(ds1307_statep, instance)) 634 == NULL) 635 return (DDI_FAILURE); 636 *result = (void *)softsp->dip; 637 return (DDI_SUCCESS); 638 639 case DDI_INFO_DEVT2INSTANCE: 640 *result = (void *)(uintptr_t)instance; 641 return (DDI_SUCCESS); 642 643 default: 644 return (DDI_FAILURE); 645 } 646 } 647 648 /* 649 * Conversion functions 650 */ 651 static unsigned char 652 int2bcd(int num) { 653 return (((num / 10) << 4) /* tens BCD digit in high four bits */ 654 + (num % 10)); /* units digit goes in low four bits */ 655 } 656 657 static int 658 bcd2int(unsigned char num) { 659 return (((num >> 4) * 10) /* 10 times high-order four bits */ 660 + (num & 0x0f)); /* plus low-order four bits */ 661 } 662 663 /* 664 * Finds the device node with device_type "rtc" and opens it to 665 * execute the get-time method 666 */ 667 static int 668 todds1307_setup_prom() 669 { 670 pnode_t todnode; 671 char tod1307_devpath[MAXNAMELEN]; 672 673 if ((todnode = prom_findnode_bydevtype(prom_rootnode(), 674 DS1307_DEVICE_TYPE)) == OBP_NONODE) 675 return (DDI_FAILURE); 676 677 /* 678 * We now have the phandle of the rtc node, we need to open the 679 * node and get the ihandle 680 */ 681 if (prom_phandle_to_path(todnode, tod1307_devpath, 682 sizeof (tod1307_devpath)) < 0) { 683 cmn_err(CE_WARN, "prom_phandle_to_path failed"); 684 return (DDI_FAILURE); 685 } 686 687 /* 688 * Now open the node and store it's ihandle 689 */ 690 if ((todds1307_ihandle = prom_open(tod1307_devpath)) == NULL) { 691 cmn_err(CE_WARN, "prom_open failed"); 692 return (DDI_FAILURE); 693 } 694 695 return (DDI_SUCCESS); 696 } 697 698 /* 699 * Closes the prom interface 700 */ 701 static void 702 todds1307_rele_prom() 703 { 704 (void) prom_close(todds1307_ihandle); 705 } 706 707 /* 708 * Read the date using "get-time" method in rtc node 709 * PROM returns 1969-1999 when reading 69-99 and 710 * 2000-2068 when reading 00-68 711 */ 712 static int 713 todds1307_prom_getdate(struct rtc_t *rtc) 714 { 715 int year; 716 cell_t ci[12]; 717 718 ci[0] = p1275_ptr2cell("call-method"); /* Service name */ 719 ci[1] = 2; /* # of arguments */ 720 ci[2] = 7; /* # of result cells */ 721 ci[3] = p1275_ptr2cell("get-time"); 722 ci[4] = p1275_ihandle2cell(todds1307_ihandle); 723 724 promif_preprom(); 725 (void) p1275_cif_handler(&ci); 726 promif_postprom(); 727 728 year = p1275_cell2int(ci[6]); 729 rtc->rtc_mon = p1275_cell2int(ci[7]); 730 rtc->rtc_dom = p1275_cell2int(ci[8]); 731 rtc->rtc_dow = 0; 732 rtc->rtc_hrs = p1275_cell2int(ci[9]); 733 rtc->rtc_min = p1275_cell2int(ci[10]); 734 rtc->rtc_sec = p1275_cell2int(ci[11]); 735 if (year >= 2000) 736 year -= 2000; 737 else 738 year -= 1900; 739 rtc->rtc_year = year; 740 741 return (DDI_SUCCESS); 742 } 743 744 /* 745 * Read the date using "set-time" method in rtc node 746 * For values 00 - 68, write 2000-2068, and for 69-99, 747 * write 1969-1999 748 */ 749 static int 750 todds1307_prom_setdate(struct rtc_t *rtc) 751 { 752 int year; 753 cell_t ci[12]; 754 755 year = rtc->rtc_year; 756 757 if ((year < 0) || (year > 99)) 758 return (DDI_FAILURE); 759 760 if (year <= 68) 761 year = rtc->rtc_year + 2000; 762 else 763 year = rtc->rtc_year + 1900; 764 765 ci[0] = p1275_ptr2cell("call-method"); /* Service name */ 766 ci[1] = 8; /* # of arguments */ 767 ci[2] = 0; /* # of result cells */ 768 ci[3] = p1275_ptr2cell("set-time"); 769 ci[4] = p1275_ihandle2cell(todds1307_ihandle); 770 ci[5] = p1275_int2cell(year); 771 ci[6] = p1275_int2cell(rtc->rtc_mon); 772 ci[7] = p1275_int2cell(rtc->rtc_dom); 773 ci[8] = p1275_int2cell(rtc->rtc_hrs); 774 ci[9] = p1275_int2cell(rtc->rtc_min); 775 ci[10] = p1275_int2cell(rtc->rtc_sec); 776 777 promif_preprom(); 778 (void) p1275_cif_handler(&ci); 779 promif_postprom(); 780 781 return (DDI_SUCCESS); 782 } 783