1 /* $NetBSD: nor.c,v 1.2 2011/07/15 19:37:41 cliff Exp $ */ 2 3 /*- 4 * Copyright (c) 2011 Department of Software Engineering, 5 * University of Szeged, Hungary 6 * Copyright (c) 2011 Adam Hoka <ahoka@NetBSD.org> 7 * All rights reserved. 8 * 9 * This code is derived from software contributed to The NetBSD Foundation 10 * by the Department of Software Engineering, University of Szeged, Hungary 11 * 12 * Redistribution and use in source and binary forms, with or without 13 * modification, are permitted provided that the following conditions 14 * are met: 15 * 1. Redistributions of source code must retain the above copyright 16 * notice, this list of conditions and the following disclaimer. 17 * 2. Redistributions in binary form must reproduce the above copyright 18 * notice, this list of conditions and the following disclaimer in the 19 * documentation and/or other materials provided with the distribution. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 26 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 27 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED 28 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, 29 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 */ 33 34 /* Common driver for NOR chips implementing the ONFI CFI specification */ 35 36 #include <sys/cdefs.h> 37 __KERNEL_RCSID(0, "$NetBSD: nor.c,v 1.2 2011/07/15 19:37:41 cliff Exp $"); 38 39 #include "locators.h" 40 #include "opt_nor.h" 41 42 #include <sys/param.h> 43 #include <sys/types.h> 44 #include <sys/device.h> 45 #include <sys/kmem.h> 46 #include <sys/sysctl.h> 47 #include <sys/atomic.h> 48 49 #include <dev/flash/flash.h> 50 #include <dev/flash/flash_io.h> 51 #include <dev/nor/nor.h> 52 53 54 static int nor_match(device_t, cfdata_t, void *); 55 static void nor_attach(device_t, device_t, void *); 56 static int nor_detach(device_t, int); 57 static bool nor_shutdown(device_t, int); 58 static int nor_print(void *, const char *); 59 static int nor_search(device_t, cfdata_t, const int *, void *); 60 61 /* flash interface implementation */ 62 static int nor_flash_isbad(device_t, flash_off_t, bool *); 63 static int nor_flash_markbad(device_t, flash_off_t); 64 static int nor_flash_write(device_t, flash_off_t, size_t, size_t *, 65 const u_char *); 66 static int nor_flash_read(device_t, flash_off_t, size_t, size_t *, uint8_t *); 67 static int nor_flash_erase_all(device_t); 68 static int nor_flash_erase(device_t, struct flash_erase_instruction *); 69 static int nor_flash_submit(device_t, buf_t *); 70 71 /* default functions for driver development */ 72 static void nor_default_select(device_t, bool); 73 static int nor_default_read_page(device_t, flash_off_t, uint8_t *); 74 static int nor_default_program_page(device_t, flash_off_t, const uint8_t *); 75 76 static int nor_scan_media(device_t, struct nor_chip *); 77 78 CFATTACH_DECL_NEW(nor, sizeof(struct nor_softc), 79 nor_match, nor_attach, nor_detach, NULL); 80 81 #ifdef NOR_DEBUG 82 int nordebug = NOR_DEBUG; 83 #endif 84 85 int nor_cachesync_timeout = 1; 86 int nor_cachesync_nodenum; 87 88 struct flash_interface nor_flash_if = { 89 .type = FLASH_TYPE_NOR, 90 91 .read = nor_flash_read, 92 .write = nor_flash_write, 93 .erase = nor_flash_erase, 94 .block_isbad = nor_flash_isbad, 95 .block_markbad = nor_flash_markbad, 96 97 .submit = nor_flash_submit 98 }; 99 100 #ifdef NOR_VERBOSE 101 const nor_manufacturer_t nor_mfrs[] = { 102 { NOR_MFR_AMD, "AMD" }, 103 { NOR_MFR_FUJITSU, "Fujitsu" }, 104 { NOR_MFR_RENESAS, "Renesas" }, 105 { NOR_MFR_STMICRO, "ST Micro" }, 106 { NOR_MFR_MICRON, "Micron" }, 107 { NOR_MFR_NATIONAL, "National" }, 108 { NOR_MFR_TOSHIBA, "Toshiba" }, 109 { NOR_MFR_HYNIX, "Hynix" }, 110 { NOR_MFR_SAMSUNG, "Samsung" }, 111 { NOR_MFR_UNKNOWN, "Unknown" } 112 }; 113 114 static const char * 115 nor_midtoname(int id) 116 { 117 int i; 118 119 for (i = 0; nor_mfrs[i].id != 0; i++) { 120 if (nor_mfrs[i].id == id) 121 return nor_mfrs[i].name; 122 } 123 124 KASSERT(nor_mfrs[i].id == 0); 125 126 return nor_mfrs[i].name; 127 } 128 #endif 129 130 /* ARGSUSED */ 131 static int 132 nor_match(device_t parent, cfdata_t match, void *aux) 133 { 134 /* pseudo device, always attaches */ 135 return 1; 136 } 137 138 static void 139 nor_attach(device_t parent, device_t self, void *aux) 140 { 141 struct nor_softc * const sc = device_private(self); 142 struct nor_attach_args * const naa = aux; 143 struct nor_chip * const chip = &sc->sc_chip; 144 145 sc->sc_dev = self; 146 sc->sc_controller_dev = parent; 147 sc->sc_nor_if = naa->naa_nor_if; 148 149 aprint_naive("\n"); 150 aprint_normal("\n"); 151 152 if (nor_scan_media(self, chip)) 153 return; 154 155 sc->sc_flash_if = nor_flash_if; 156 sc->sc_flash_if.erasesize = chip->nc_block_size; 157 sc->sc_flash_if.page_size = chip->nc_page_size; 158 sc->sc_flash_if.writesize = chip->nc_page_size; 159 160 /* allocate cache */ 161 #ifdef NOTYET 162 chip->nc_oob_cache = kmem_alloc(chip->nc_spare_size, KM_SLEEP); 163 #endif 164 chip->nc_page_cache = kmem_alloc(chip->nc_page_size, KM_SLEEP); 165 166 mutex_init(&sc->sc_device_lock, MUTEX_DEFAULT, IPL_NONE); 167 168 if (flash_sync_thread_init(&sc->sc_flash_io, self, &sc->sc_flash_if)) { 169 goto error; 170 } 171 172 if (!pmf_device_register1(sc->sc_dev, NULL, NULL, nor_shutdown)) 173 aprint_error_dev(sc->sc_dev, 174 "couldn't establish power handler\n"); 175 176 #ifdef NOR_BBT 177 nor_bbt_init(self); 178 nor_bbt_scan(self); 179 #endif 180 181 /* 182 * Attach all our devices 183 */ 184 config_search_ia(nor_search, self, NULL, NULL); 185 186 return; 187 188 error: 189 #ifdef NOTET 190 kmem_free(chip->nc_oob_cache, chip->nc_spare_size); 191 #endif 192 kmem_free(chip->nc_page_cache, chip->nc_page_size); 193 mutex_destroy(&sc->sc_device_lock); 194 } 195 196 static int 197 nor_search(device_t parent, cfdata_t cf, const int *ldesc, void *aux) 198 { 199 struct nor_softc * const sc = device_private(parent); 200 struct nor_chip * const chip = &sc->sc_chip; 201 struct flash_attach_args faa; 202 203 faa.partinfo.part_offset = cf->cf_loc[FLASHBUSCF_OFFSET]; 204 205 if (cf->cf_loc[FLASHBUSCF_SIZE] == 0) { 206 faa.partinfo.part_size = 207 chip->nc_size - faa.partinfo.part_offset; 208 } else { 209 faa.partinfo.part_size = cf->cf_loc[FLASHBUSCF_SIZE]; 210 } 211 212 if (cf->cf_loc[FLASHBUSCF_READONLY]) 213 faa.partinfo.part_flags = FLASH_PART_READONLY; 214 else 215 faa.partinfo.part_flags = 0; 216 217 faa.flash_if = &sc->sc_flash_if; 218 219 if (config_match(parent, cf, &faa)) { 220 if (config_attach(parent, cf, &faa, nor_print) != NULL) { 221 return 0; 222 } else { 223 return 1; 224 } 225 } 226 227 return 1; 228 } 229 230 static int 231 nor_detach(device_t self, int flags) 232 { 233 struct nor_softc * const sc = device_private(self); 234 struct nor_chip * const chip = &sc->sc_chip; 235 int error = 0; 236 237 error = config_detach_children(self, flags); 238 if (error) { 239 return error; 240 } 241 242 flash_sync_thread_destroy(&sc->sc_flash_io); 243 #ifdef NOR_BBT 244 nor_bbt_detach(self); 245 #endif 246 #ifdef NOTET 247 /* free oob cache */ 248 kmem_free(chip->nc_oob_cache, chip->nc_spare_size); 249 #endif 250 kmem_free(chip->nc_page_cache, chip->nc_page_size); 251 252 mutex_destroy(&sc->sc_device_lock); 253 254 pmf_device_deregister(sc->sc_dev); 255 256 return error; 257 } 258 259 static int 260 nor_print(void *aux, const char *pnp) 261 { 262 if (pnp != NULL) 263 aprint_normal("nor at %s\n", pnp); 264 265 return UNCONF; 266 } 267 268 /* ask for a nor driver to attach to the controller */ 269 device_t 270 nor_attach_mi(struct nor_interface * const nor_if, device_t parent) 271 { 272 struct nor_attach_args arg; 273 274 KASSERT(nor_if != NULL); 275 276 if (nor_if->select == NULL) 277 nor_if->select = &nor_default_select; 278 if (nor_if->read_page == NULL) 279 nor_if->read_page = &nor_default_read_page; 280 if (nor_if->program_page == NULL) 281 nor_if->program_page = &nor_default_program_page; 282 283 arg.naa_nor_if = nor_if; 284 285 device_t dev = config_found_ia(parent, "norbus", &arg, nor_print); 286 287 return dev; 288 } 289 290 static void 291 nor_default_select(device_t self, bool n) 292 { 293 /* do nothing */ 294 return; 295 } 296 297 static int 298 nor_flash_submit(device_t self, buf_t * const bp) 299 { 300 struct nor_softc * const sc = device_private(self); 301 302 return flash_io_submit(&sc->sc_flash_io, bp); 303 } 304 305 306 /* default everything to reasonable values, to ease future api changes */ 307 void 308 nor_init_interface(struct nor_interface * const nor_if) 309 { 310 nor_if->select = &nor_default_select; 311 nor_if->read_1 = NULL; 312 nor_if->read_2 = NULL; 313 nor_if->read_4 = NULL; 314 nor_if->read_buf_1 = NULL; 315 nor_if->read_buf_2 = NULL; 316 nor_if->read_buf_4 = NULL; 317 nor_if->write_1 = NULL; 318 nor_if->write_2 = NULL; 319 nor_if->write_4 = NULL; 320 nor_if->write_buf_1 = NULL; 321 nor_if->write_buf_2 = NULL; 322 nor_if->write_buf_4 = NULL; 323 nor_if->busy = NULL; 324 } 325 326 #ifdef NOTYET 327 /* handle quirks here */ 328 static void 329 nor_quirks(device_t self, struct nor_chip * const chip) 330 { 331 /* this is an example only! */ 332 switch (chip->nc_manf_id) { 333 case NOR_MFR_SAMSUNG: 334 if (chip->nc_dev_id == 0x00) { 335 /* do something only samsung chips need */ 336 /* or */ 337 /* chip->nc_quirks |= NC_QUIRK_NO_READ_START */ 338 } 339 } 340 341 return; 342 } 343 #endif 344 345 /** 346 * scan media to determine the chip's properties 347 * this function resets the device 348 */ 349 static int 350 nor_scan_media(device_t self, struct nor_chip * const chip) 351 { 352 struct nor_softc * const sc = device_private(self); 353 char pbuf[3][sizeof("XXXX MB")]; 354 355 KASSERT(sc->sc_nor_if != NULL); 356 KASSERT(sc->sc_nor_if->scan_media != NULL); 357 int error = sc->sc_nor_if->scan_media(self, chip); 358 if (error != 0) 359 return error; 360 361 #ifdef NOR_VERBOSE 362 aprint_normal_dev(self, 363 "manufacturer id: 0x%.4x (%s), device id: 0x%.4x\n", 364 chip->nc_manf_id, 365 nor_midtoname(chip->nc_manf_id), 366 chip->nc_dev_id); 367 #endif 368 369 format_bytes(pbuf[0], sizeof(pbuf[0]), chip->nc_page_size); 370 format_bytes(pbuf[1], sizeof(pbuf[1]), chip->nc_spare_size); 371 format_bytes(pbuf[2], sizeof(pbuf[2]), chip->nc_block_size); 372 aprint_normal_dev(self, 373 "page size: %s, spare size: %s, block size: %s\n", 374 pbuf[0], pbuf[1], pbuf[2]); 375 376 format_bytes(pbuf[0], sizeof(pbuf[0]), chip->nc_size); 377 aprint_normal_dev(self, 378 "LUN size: %" PRIu32 " blocks, LUNs: %" PRIu8 379 ", total storage size: %s\n", 380 chip->nc_lun_blocks, chip->nc_num_luns, pbuf[0]); 381 382 #ifdef NOTYET 383 /* XXX does this apply to nor? */ 384 /* 385 * calculate badblock marker offset in oob 386 * we try to be compatible with linux here 387 */ 388 if (chip->nc_page_size > 512) 389 chip->nc_badmarker_offs = 0; 390 else 391 chip->nc_badmarker_offs = 5; 392 #endif 393 394 /* Calculate page shift and mask */ 395 chip->nc_page_shift = ffs(chip->nc_page_size) - 1; 396 chip->nc_page_mask = ~(chip->nc_page_size - 1); 397 /* same for block */ 398 chip->nc_block_shift = ffs(chip->nc_block_size) - 1; 399 chip->nc_block_mask = ~(chip->nc_block_size - 1); 400 401 #ifdef NOTYET 402 /* look for quirks here if needed in future */ 403 nor_quirks(self, chip); 404 #endif 405 406 return 0; 407 } 408 409 /* ARGSUSED */ 410 static bool 411 nor_shutdown(device_t self, int howto) 412 { 413 return true; 414 } 415 416 /* implementation of the block device API */ 417 418 /* read a page, default implementation */ 419 static int 420 nor_default_read_page(device_t self, flash_off_t offset, uint8_t * const data) 421 { 422 struct nor_softc * const sc = device_private(self); 423 struct nor_chip * const chip = &sc->sc_chip; 424 425 /* 426 * access by specified access_width 427 * note: #bits == 1 << width 428 */ 429 switch(sc->sc_nor_if->access_width) { 430 case 0: 431 nor_read_buf_1(self, offset, data, chip->nc_page_size); 432 break; 433 case 1: 434 nor_read_buf_2(self, offset, data, chip->nc_page_size); 435 break; 436 case 2: 437 nor_read_buf_4(self, offset, data, chip->nc_page_size); 438 break; 439 #ifdef NOTYET 440 case 3: 441 nor_read_buf_8(self, offset, data, chip->nc_page_size); 442 break; 443 #endif 444 default: 445 panic("%s: bad width %d\n", __func__, sc->sc_nor_if->access_width); 446 } 447 448 #if 0 449 /* for debugging new drivers */ 450 nor_dump_data("page", data, chip->nc_page_size); 451 #endif 452 453 return 0; 454 } 455 456 /* write a page, default implementation */ 457 static int 458 nor_default_program_page(device_t self, flash_off_t offset, 459 const uint8_t * const data) 460 { 461 struct nor_softc * const sc = device_private(self); 462 struct nor_chip * const chip = &sc->sc_chip; 463 464 /* 465 * access by specified width 466 * #bits == 1 << access_width 467 */ 468 switch(sc->sc_nor_if->access_width) { 469 case 0: 470 nor_write_buf_1(self, offset, data, chip->nc_page_size); 471 break; 472 case 1: 473 nor_write_buf_2(self, offset, data, chip->nc_page_size); 474 break; 475 case 2: 476 nor_write_buf_4(self, offset, data, chip->nc_page_size); 477 break; 478 #ifdef NOTYET 479 case 3: 480 nor_write_buf_8(self, offset, data, chip->nc_page_size); 481 break; 482 #endif 483 default: 484 panic("%s: bad width %d\n", __func__, 485 sc->sc_nor_if->access_width); 486 } 487 488 #if 0 489 /* for debugging new drivers */ 490 nor_dump_data("page", data, chip->nc_page_size); 491 #endif 492 493 return 0; 494 } 495 496 /* 497 * nor_flash_erase_all - erase the entire chip 498 * 499 * XXX a good way to brick your system 500 */ 501 static int 502 nor_flash_erase_all(device_t self) 503 { 504 struct nor_softc * const sc = device_private(self); 505 int error; 506 507 mutex_enter(&sc->sc_device_lock); 508 error = nor_erase_all(self); 509 mutex_exit(&sc->sc_device_lock); 510 511 return error; 512 } 513 514 static int 515 nor_flash_erase(device_t self, struct flash_erase_instruction * const ei) 516 { 517 struct nor_softc * const sc = device_private(self); 518 struct nor_chip * const chip = &sc->sc_chip; 519 flash_off_t addr; 520 int error = 0; 521 522 if (ei->ei_addr < 0 || ei->ei_len < chip->nc_block_size) 523 return EINVAL; 524 525 if (ei->ei_addr + ei->ei_len > chip->nc_size) { 526 DPRINTF(("%s: erase address is past the end" 527 " of the device\n", __func__)); 528 return EINVAL; 529 } 530 531 if ((ei->ei_addr == 0) && (ei->ei_len == chip->nc_size) 532 && (sc->sc_nor_if->erase_all != NULL)) { 533 return nor_flash_erase_all(self); 534 } 535 536 if (ei->ei_addr % chip->nc_block_size != 0) { 537 aprint_error_dev(self, 538 "nor_flash_erase: ei_addr (%ju) is not" 539 " a multiple of block size (%ju)\n", 540 (uintmax_t)ei->ei_addr, 541 (uintmax_t)chip->nc_block_size); 542 return EINVAL; 543 } 544 545 if (ei->ei_len % chip->nc_block_size != 0) { 546 aprint_error_dev(self, 547 "nor_flash_erase: ei_len (%ju) is not" 548 " a multiple of block size (%ju)", 549 (uintmax_t)ei->ei_len, 550 (uintmax_t)chip->nc_block_size); 551 return EINVAL; 552 } 553 554 mutex_enter(&sc->sc_device_lock); 555 addr = ei->ei_addr; 556 while (addr < ei->ei_addr + ei->ei_len) { 557 #ifdef NOTYET 558 if (nor_isbad(self, addr)) { 559 aprint_error_dev(self, "bad block encountered\n"); 560 ei->ei_state = FLASH_ERASE_FAILED; 561 error = EIO; 562 goto out; 563 } 564 #endif 565 566 error = nor_erase_block(self, addr); 567 if (error) { 568 ei->ei_state = FLASH_ERASE_FAILED; 569 goto out; 570 } 571 572 addr += chip->nc_block_size; 573 } 574 mutex_exit(&sc->sc_device_lock); 575 576 ei->ei_state = FLASH_ERASE_DONE; 577 if (ei->ei_callback != NULL) { 578 ei->ei_callback(ei); 579 } 580 581 return 0; 582 out: 583 mutex_exit(&sc->sc_device_lock); 584 585 return error; 586 } 587 588 /* 589 * handle (page) unaligned write to nor 590 */ 591 static int 592 nor_flash_write_unaligned(device_t self, flash_off_t offset, size_t len, 593 size_t * const retlen, const uint8_t * const buf) 594 { 595 struct nor_softc * const sc = device_private(self); 596 struct nor_chip * const chip = &sc->sc_chip; 597 flash_off_t first, last, firstoff; 598 const uint8_t *bufp; 599 flash_off_t addr; 600 size_t left, count; 601 int error = 0, i; 602 603 first = offset & chip->nc_page_mask; 604 firstoff = offset & ~chip->nc_page_mask; 605 /* XXX check if this should be len - 1 */ 606 last = (offset + len) & chip->nc_page_mask; 607 count = last - first + 1; 608 609 addr = first; 610 *retlen = 0; 611 612 mutex_enter(&sc->sc_device_lock); 613 if (count == 1) { 614 #ifdef NOTYET 615 if (nor_isbad(self, addr)) { 616 aprint_error_dev(self, 617 "nor_flash_write_unaligned: " 618 "bad block encountered\n"); 619 error = EIO; 620 goto out; 621 } 622 #endif 623 624 error = nor_read_page(self, addr, chip->nc_page_cache); 625 if (error) { 626 goto out; 627 } 628 629 memcpy(chip->nc_page_cache + firstoff, buf, len); 630 631 error = nor_program_page(self, addr, chip->nc_page_cache); 632 if (error) { 633 goto out; 634 } 635 636 *retlen = len; 637 goto out; 638 } 639 640 bufp = buf; 641 left = len; 642 643 for (i = 0; i < count && left != 0; i++) { 644 #ifdef NOTYET 645 if (nor_isbad(self, addr)) { 646 aprint_error_dev(self, 647 "nor_flash_write_unaligned: " 648 "bad block encountered\n"); 649 error = EIO; 650 goto out; 651 } 652 #endif 653 654 if (i == 0) { 655 error = nor_read_page(self, addr, chip->nc_page_cache); 656 if (error) { 657 goto out; 658 } 659 660 memcpy(chip->nc_page_cache + firstoff, 661 bufp, chip->nc_page_size - firstoff); 662 663 printf("write page: %s: %d\n", __FILE__, __LINE__); 664 error = nor_program_page(self, addr, 665 chip->nc_page_cache); 666 if (error) { 667 goto out; 668 } 669 670 bufp += chip->nc_page_size - firstoff; 671 left -= chip->nc_page_size - firstoff; 672 *retlen += chip->nc_page_size - firstoff; 673 674 } else if (i == count - 1) { 675 error = nor_read_page(self, addr, chip->nc_page_cache); 676 if (error) { 677 goto out; 678 } 679 680 memcpy(chip->nc_page_cache, bufp, left); 681 682 error = nor_program_page(self, addr, 683 chip->nc_page_cache); 684 if (error) { 685 goto out; 686 } 687 688 *retlen += left; 689 KASSERT(left < chip->nc_page_size); 690 691 } else { 692 /* XXX debug */ 693 if (left > chip->nc_page_size) { 694 printf("left: %zu, i: %d, count: %zu\n", 695 (size_t )left, i, count); 696 } 697 KASSERT(left > chip->nc_page_size); 698 699 error = nor_program_page(self, addr, bufp); 700 if (error) { 701 goto out; 702 } 703 704 bufp += chip->nc_page_size; 705 left -= chip->nc_page_size; 706 *retlen += chip->nc_page_size; 707 } 708 709 addr += chip->nc_page_size; 710 } 711 712 KASSERT(*retlen == len); 713 out: 714 mutex_exit(&sc->sc_device_lock); 715 716 return error; 717 } 718 719 static int 720 nor_flash_write(device_t self, flash_off_t offset, size_t len, 721 size_t * const retlen, const uint8_t * const buf) 722 { 723 struct nor_softc * const sc = device_private(self); 724 struct nor_chip * const chip = &sc->sc_chip; 725 const uint8_t *bufp; 726 size_t pages, page; 727 daddr_t addr; 728 int error = 0; 729 730 if ((offset + len) > chip->nc_size) { 731 DPRINTF(("%s: write (off: 0x%jx, len: %ju)," 732 " exceeds device size (0x%jx)\n", __func__, 733 (uintmax_t)offset, (uintmax_t)len, 734 (uintmax_t)chip->nc_size)); 735 return EINVAL; 736 } 737 738 if (len % chip->nc_page_size != 0 || 739 offset % chip->nc_page_size != 0) { 740 return nor_flash_write_unaligned(self, 741 offset, len, retlen, buf); 742 } 743 744 pages = len / chip->nc_page_size; 745 KASSERT(pages != 0); 746 *retlen = 0; 747 748 addr = offset; 749 bufp = buf; 750 751 mutex_enter(&sc->sc_device_lock); 752 for (page = 0; page < pages; page++) { 753 #ifdef NOTYET 754 /* do we need this check here? */ 755 if (nor_isbad(self, addr)) { 756 aprint_error_dev(self, 757 "nor_flash_write: bad block encountered\n"); 758 759 error = EIO; 760 goto out; 761 } 762 #endif 763 764 error = nor_program_page(self, addr, bufp); 765 if (error) { 766 goto out; 767 } 768 769 addr += chip->nc_page_size; 770 bufp += chip->nc_page_size; 771 *retlen += chip->nc_page_size; 772 } 773 out: 774 mutex_exit(&sc->sc_device_lock); 775 DPRINTF(("%s: retlen: %zu, len: %zu\n", __func__, *retlen, len)); 776 777 return error; 778 } 779 780 /* 781 * handle (page) unaligned read from nor 782 */ 783 static int 784 nor_flash_read_unaligned(device_t self, flash_off_t offset, size_t len, 785 size_t * const retlen, uint8_t * const buf) 786 { 787 struct nor_softc * const sc = device_private(self); 788 struct nor_chip * const chip = &sc->sc_chip; 789 daddr_t first, last, count, firstoff; 790 uint8_t *bufp; 791 daddr_t addr; 792 size_t left; 793 int error = 0, i; 794 795 first = offset & chip->nc_page_mask; 796 firstoff = offset & ~chip->nc_page_mask; 797 last = (offset + len) & chip->nc_page_mask; 798 count = (last - first) / chip->nc_page_size + 1; 799 800 addr = first; 801 bufp = buf; 802 left = len; 803 *retlen = 0; 804 805 mutex_enter(&sc->sc_device_lock); 806 if (count == 1) { 807 error = nor_read_page(self, addr, chip->nc_page_cache); 808 if (error) { 809 goto out; 810 } 811 812 memcpy(bufp, chip->nc_page_cache + firstoff, len); 813 814 *retlen = len; 815 goto out; 816 } 817 818 for (i = 0; i < count && left != 0; i++) { 819 /* XXX Why use the page cache here ? */ 820 error = nor_read_page(self, addr, chip->nc_page_cache); 821 if (error) { 822 goto out; 823 } 824 825 if (i == 0) { 826 memcpy(bufp, chip->nc_page_cache + firstoff, 827 chip->nc_page_size - firstoff); 828 829 bufp += chip->nc_page_size - firstoff; 830 left -= chip->nc_page_size - firstoff; 831 *retlen += chip->nc_page_size - firstoff; 832 833 } else if (i == count - 1) { 834 memcpy(bufp, chip->nc_page_cache, left); 835 *retlen += left; 836 KASSERT(left < chip->nc_page_size); 837 838 } else { 839 memcpy(bufp, chip->nc_page_cache, chip->nc_page_size); 840 841 bufp += chip->nc_page_size; 842 left -= chip->nc_page_size; 843 *retlen += chip->nc_page_size; 844 } 845 846 addr += chip->nc_page_size; 847 } 848 KASSERT(*retlen == len); 849 out: 850 mutex_exit(&sc->sc_device_lock); 851 852 return error; 853 } 854 855 static int 856 nor_flash_read(device_t self, flash_off_t offset, size_t len, 857 size_t * const retlen, uint8_t * const buf) 858 { 859 struct nor_softc * const sc = device_private(self); 860 struct nor_chip * const chip = &sc->sc_chip; 861 uint8_t *bufp; 862 size_t addr; 863 size_t i, pages; 864 int error = 0; 865 866 *retlen = 0; 867 868 DPRINTF(("%s: off: 0x%jx, len: %zu\n", 869 __func__, (uintmax_t)offset, len)); 870 871 if (__predict_false((offset + len) > chip->nc_size)) { 872 DPRINTF(("%s: read (off: 0x%jx, len: %zu)," 873 " exceeds device size (%ju)\n", __func__, 874 (uintmax_t)offset, len, (uintmax_t)chip->nc_size)); 875 return EINVAL; 876 } 877 878 /* Handle unaligned access, shouldnt be needed when using the 879 * block device, as strategy handles it, so only low level 880 * accesses will use this path 881 */ 882 /* XXX^2 */ 883 #if 0 884 if (len < chip->nc_page_size) 885 panic("TODO page size is larger than read size"); 886 #endif 887 888 if (len % chip->nc_page_size != 0 || 889 offset % chip->nc_page_size != 0) { 890 return nor_flash_read_unaligned(self, 891 offset, len, retlen, buf); 892 } 893 894 bufp = buf; 895 addr = offset; 896 pages = len / chip->nc_page_size; 897 898 mutex_enter(&sc->sc_device_lock); 899 for (i = 0; i < pages; i++) { 900 #ifdef NOTYET 901 /* XXX do we need this check here? */ 902 if (nor_isbad(self, addr)) { 903 aprint_error_dev(self, "bad block encountered\n"); 904 error = EIO; 905 goto out; 906 } 907 #endif 908 error = nor_read_page(self, addr, bufp); 909 if (error) 910 goto out; 911 912 bufp += chip->nc_page_size; 913 addr += chip->nc_page_size; 914 *retlen += chip->nc_page_size; 915 } 916 out: 917 mutex_exit(&sc->sc_device_lock); 918 919 return error; 920 } 921 922 static int 923 nor_flash_isbad(device_t self, flash_off_t ofs, bool * const isbad) 924 { 925 struct nor_softc * const sc = device_private(self); 926 struct nor_chip * const chip = &sc->sc_chip; 927 #ifdef NOTYET 928 bool result; 929 #endif 930 931 if (ofs > chip->nc_size) { 932 DPRINTF(("%s: offset 0x%jx is larger than" 933 " device size (0x%jx)\n", __func__, 934 (uintmax_t)ofs, (uintmax_t)chip->nc_size)); 935 return EINVAL; 936 } 937 938 if (ofs % chip->nc_block_size != 0) { 939 DPRINTF(("offset (0x%jx) is not the multiple of block size " 940 "(%ju)", 941 (uintmax_t)ofs, (uintmax_t)chip->nc_block_size)); 942 return EINVAL; 943 } 944 945 #ifdef NOTYET 946 mutex_enter(&sc->sc_device_lock); 947 result = nor_isbad(self, ofs); 948 mutex_exit(&sc->sc_device_lock); 949 950 *isbad = result; 951 #else 952 *isbad = false; 953 #endif 954 955 return 0; 956 } 957 958 static int 959 nor_flash_markbad(device_t self, flash_off_t ofs) 960 { 961 struct nor_softc * const sc = device_private(self); 962 struct nor_chip * const chip = &sc->sc_chip; 963 964 if (ofs > chip->nc_size) { 965 DPRINTF(("%s: offset 0x%jx is larger than" 966 " device size (0x%jx)\n", __func__, 967 ofs, (uintmax_t)chip->nc_size)); 968 return EINVAL; 969 } 970 971 if (ofs % chip->nc_block_size != 0) { 972 panic("offset (%ju) is not the multiple of block size (%ju)", 973 (uintmax_t)ofs, (uintmax_t)chip->nc_block_size); 974 } 975 976 /* TODO: implement this */ 977 978 return 0; 979 } 980 981 static int 982 sysctl_nor_verify(SYSCTLFN_ARGS) 983 { 984 int error, t; 985 struct sysctlnode node; 986 987 node = *rnode; 988 t = *(int *)rnode->sysctl_data; 989 node.sysctl_data = &t; 990 error = sysctl_lookup(SYSCTLFN_CALL(&node)); 991 if (error || newp == NULL) 992 return error; 993 994 if (node.sysctl_num == nor_cachesync_nodenum) { 995 if (t <= 0 || t > 60) 996 return EINVAL; 997 } else { 998 return EINVAL; 999 } 1000 1001 *(int *)rnode->sysctl_data = t; 1002 1003 return 0; 1004 } 1005 1006 SYSCTL_SETUP(sysctl_nor, "sysctl nor subtree setup") 1007 { 1008 int rc, nor_root_num; 1009 const struct sysctlnode *node; 1010 1011 if ((rc = sysctl_createv(clog, 0, NULL, NULL, 1012 CTLFLAG_PERMANENT, CTLTYPE_NODE, "hw", NULL, 1013 NULL, 0, NULL, 0, CTL_HW, CTL_EOL)) != 0) { 1014 goto error; 1015 } 1016 1017 if ((rc = sysctl_createv(clog, 0, NULL, &node, 1018 CTLFLAG_PERMANENT, CTLTYPE_NODE, "nor", 1019 SYSCTL_DESCR("NOR driver controls"), 1020 NULL, 0, NULL, 0, CTL_HW, CTL_CREATE, CTL_EOL)) != 0) { 1021 goto error; 1022 } 1023 1024 nor_root_num = node->sysctl_num; 1025 1026 if ((rc = sysctl_createv(clog, 0, NULL, &node, 1027 CTLFLAG_PERMANENT|CTLFLAG_READWRITE, 1028 CTLTYPE_INT, "cache_sync_timeout", 1029 SYSCTL_DESCR("NOR write cache sync timeout in seconds"), 1030 sysctl_nor_verify, 0, &nor_cachesync_timeout, 1031 0, CTL_HW, nor_root_num, CTL_CREATE, 1032 CTL_EOL)) != 0) { 1033 goto error; 1034 } 1035 1036 nor_cachesync_nodenum = node->sysctl_num; 1037 1038 return; 1039 1040 error: 1041 aprint_error("%s: sysctl_createv failed (rc = %d)\n", __func__, rc); 1042 } 1043 1044 MODULE(MODULE_CLASS_DRIVER, nor, "flash"); 1045 1046 #ifdef _MODULE 1047 #include "ioconf.c" 1048 #endif 1049 1050 static int 1051 nor_modcmd(modcmd_t cmd, void *opaque) 1052 { 1053 switch (cmd) { 1054 case MODULE_CMD_INIT: 1055 #ifdef _MODULE 1056 return config_init_component(cfdriver_ioconf_nor, 1057 cfattach_ioconf_nor, cfdata_ioconf_nor); 1058 #else 1059 return 0; 1060 #endif 1061 case MODULE_CMD_FINI: 1062 #ifdef _MODULE 1063 return config_fini_component(cfdriver_ioconf_nor, 1064 cfattach_ioconf_nor, cfdata_ioconf_nor); 1065 #else 1066 return 0; 1067 #endif 1068 default: 1069 return ENOTTY; 1070 } 1071 } 1072