nor.c revision 1.6 1 /* $NetBSD: nor.c,v 1.6 2021/04/24 23:36:56 thorpej Exp $ */
2
3 /*-
4 * Copyright (c) 2011 Department of Software Engineering,
5 * University of Szeged, Hungary
6 * Copyright (c) 2011 Adam Hoka <ahoka (at) 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.6 2021/04/24 23:36:56 thorpej 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 struct nor_manufacturer 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_MFGR_MACRONIX, "Macronix" },
111 { NOR_MFR_SAMSUNG, "Samsung" },
112 { NOR_MFR_UNKNOWN, "Unknown" }
113 };
114
115 static const char *
116 nor_midtoname(int id)
117 {
118 int i;
119
120 for (i = 0; nor_mfrs[i].id != 0; i++) {
121 if (nor_mfrs[i].id == id)
122 return nor_mfrs[i].name;
123 }
124
125 KASSERT(nor_mfrs[i].id == 0);
126
127 return nor_mfrs[i].name;
128 }
129 #endif
130
131 /* ARGSUSED */
132 static int
133 nor_match(device_t parent, cfdata_t match, void *aux)
134 {
135 /* pseudo device, always attaches */
136 return 1;
137 }
138
139 static void
140 nor_attach(device_t parent, device_t self, void *aux)
141 {
142 struct nor_softc * const sc = device_private(self);
143 struct nor_attach_args * const naa = aux;
144 struct nor_chip * const chip = &sc->sc_chip;
145
146 sc->sc_dev = self;
147 sc->sc_controller_dev = parent;
148 sc->sc_nor_if = naa->naa_nor_if;
149
150 aprint_naive("\n");
151 aprint_normal("\n");
152
153 if (nor_scan_media(self, chip))
154 return;
155
156 sc->sc_flash_if = nor_flash_if;
157 sc->sc_flash_if.erasesize = chip->nc_block_size;
158 sc->sc_flash_if.page_size = chip->nc_page_size;
159 sc->sc_flash_if.writesize = chip->nc_page_size;
160
161 /* allocate cache */
162 #ifdef NOTYET
163 chip->nc_oob_cache = kmem_alloc(chip->nc_spare_size, KM_SLEEP);
164 #endif
165 chip->nc_page_cache = kmem_alloc(chip->nc_page_size, KM_SLEEP);
166
167 mutex_init(&sc->sc_device_lock, MUTEX_DEFAULT, IPL_NONE);
168
169 if (flash_sync_thread_init(&sc->sc_flash_io, self, &sc->sc_flash_if)) {
170 goto error;
171 }
172
173 if (!pmf_device_register1(sc->sc_dev, NULL, NULL, nor_shutdown))
174 aprint_error_dev(sc->sc_dev,
175 "couldn't establish power handler\n");
176
177 #ifdef NOR_BBT
178 nor_bbt_init(self);
179 nor_bbt_scan(self);
180 #endif
181
182 /*
183 * Attach all our devices
184 */
185 config_search(self, NULL,
186 CFARG_SEARCH, nor_search,
187 CFARG_EOL);
188
189 return;
190
191 error:
192 #ifdef NOTET
193 kmem_free(chip->nc_oob_cache, chip->nc_spare_size);
194 #endif
195 kmem_free(chip->nc_page_cache, chip->nc_page_size);
196 mutex_destroy(&sc->sc_device_lock);
197 }
198
199 static int
200 nor_search(device_t parent, cfdata_t cf, const int *ldesc, void *aux)
201 {
202 struct nor_softc * const sc = device_private(parent);
203 struct nor_chip * const chip = &sc->sc_chip;
204 struct flash_attach_args faa;
205
206 faa.partinfo.part_offset = cf->cf_loc[FLASHBUSCF_OFFSET];
207
208 if (cf->cf_loc[FLASHBUSCF_SIZE] == 0) {
209 faa.partinfo.part_size =
210 chip->nc_size - faa.partinfo.part_offset;
211 } else {
212 faa.partinfo.part_size = cf->cf_loc[FLASHBUSCF_SIZE];
213 }
214
215 if (cf->cf_loc[FLASHBUSCF_READONLY])
216 faa.partinfo.part_flags = FLASH_PART_READONLY;
217 else
218 faa.partinfo.part_flags = 0;
219
220 faa.flash_if = &sc->sc_flash_if;
221
222 if (config_probe(parent, cf, &faa)) {
223 if (config_attach(parent, cf, &faa, nor_print,
224 CFARG_EOL) != NULL) {
225 return 0;
226 } else {
227 return 1;
228 }
229 }
230
231 return 1;
232 }
233
234 static int
235 nor_detach(device_t self, int flags)
236 {
237 struct nor_softc * const sc = device_private(self);
238 struct nor_chip * const chip = &sc->sc_chip;
239 int error = 0;
240
241 error = config_detach_children(self, flags);
242 if (error) {
243 return error;
244 }
245
246 flash_sync_thread_destroy(&sc->sc_flash_io);
247 #ifdef NOR_BBT
248 nor_bbt_detach(self);
249 #endif
250 #ifdef NOTET
251 /* free oob cache */
252 kmem_free(chip->nc_oob_cache, chip->nc_spare_size);
253 #endif
254 kmem_free(chip->nc_page_cache, chip->nc_page_size);
255
256 mutex_destroy(&sc->sc_device_lock);
257
258 pmf_device_deregister(sc->sc_dev);
259
260 return error;
261 }
262
263 static int
264 nor_print(void *aux, const char *pnp)
265 {
266 if (pnp != NULL)
267 aprint_normal("nor at %s\n", pnp);
268
269 return UNCONF;
270 }
271
272 /* ask for a nor driver to attach to the controller */
273 device_t
274 nor_attach_mi(struct nor_interface * const nor_if, device_t parent)
275 {
276 struct nor_attach_args arg;
277
278 KASSERT(nor_if != NULL);
279
280 if (nor_if->select == NULL)
281 nor_if->select = &nor_default_select;
282 if (nor_if->read_page == NULL)
283 nor_if->read_page = &nor_default_read_page;
284 if (nor_if->program_page == NULL)
285 nor_if->program_page = &nor_default_program_page;
286
287 arg.naa_nor_if = nor_if;
288
289 device_t dev = config_found(parent, &arg, nor_print,
290 CFARG_IATTR, "norbus",
291 CFARG_EOL);
292
293 return dev;
294 }
295
296 static void
297 nor_default_select(device_t self, bool n)
298 {
299 /* do nothing */
300 return;
301 }
302
303 static int
304 nor_flash_submit(device_t self, buf_t * const bp)
305 {
306 struct nor_softc * const sc = device_private(self);
307
308 return flash_io_submit(&sc->sc_flash_io, bp);
309 }
310
311
312 /* default everything to reasonable values, to ease future api changes */
313 void
314 nor_init_interface(struct nor_interface * const nor_if)
315 {
316 nor_if->select = &nor_default_select;
317 nor_if->read_1 = NULL;
318 nor_if->read_2 = NULL;
319 nor_if->read_4 = NULL;
320 nor_if->read_buf_1 = NULL;
321 nor_if->read_buf_2 = NULL;
322 nor_if->read_buf_4 = NULL;
323 nor_if->write_1 = NULL;
324 nor_if->write_2 = NULL;
325 nor_if->write_4 = NULL;
326 nor_if->write_buf_1 = NULL;
327 nor_if->write_buf_2 = NULL;
328 nor_if->write_buf_4 = NULL;
329 nor_if->busy = NULL;
330 }
331
332 #ifdef NOTYET
333 /* handle quirks here */
334 static void
335 nor_quirks(device_t self, struct nor_chip * const chip)
336 {
337 /* this is an example only! */
338 switch (chip->nc_manf_id) {
339 case NOR_MFR_SAMSUNG:
340 if (chip->nc_dev_id == 0x00) {
341 /* do something only samsung chips need */
342 /* or */
343 /* chip->nc_quirks |= NC_QUIRK_NO_READ_START */
344 }
345 }
346
347 return;
348 }
349 #endif
350
351 /**
352 * scan media to determine the chip's properties
353 * this function resets the device
354 */
355 static int
356 nor_scan_media(device_t self, struct nor_chip * const chip)
357 {
358 struct nor_softc * const sc = device_private(self);
359 char pbuf[3][sizeof("XXXX MB")];
360
361 KASSERT(sc->sc_nor_if != NULL);
362 KASSERT(sc->sc_nor_if->scan_media != NULL);
363 int error = sc->sc_nor_if->scan_media(self, chip);
364 if (error != 0)
365 return error;
366
367 #ifdef NOR_VERBOSE
368 aprint_normal_dev(self,
369 "manufacturer id: 0x%.4x (%s), device id: 0x%.4x\n",
370 chip->nc_manf_id,
371 nor_midtoname(chip->nc_manf_id),
372 chip->nc_dev_id);
373 #endif
374
375 format_bytes(pbuf[0], sizeof(pbuf[0]), chip->nc_page_size);
376 format_bytes(pbuf[1], sizeof(pbuf[1]), chip->nc_spare_size);
377 format_bytes(pbuf[2], sizeof(pbuf[2]), chip->nc_block_size);
378 aprint_normal_dev(self,
379 "page size: %s, spare size: %s, block size: %s\n",
380 pbuf[0], pbuf[1], pbuf[2]);
381
382 format_bytes(pbuf[0], sizeof(pbuf[0]), chip->nc_size);
383 aprint_normal_dev(self,
384 "LUN size: %" PRIu32 " blocks, LUNs: %" PRIu8
385 ", total storage size: %s\n",
386 chip->nc_lun_blocks, chip->nc_num_luns, pbuf[0]);
387
388 #ifdef NOTYET
389 /* XXX does this apply to nor? */
390 /*
391 * calculate badblock marker offset in oob
392 * we try to be compatible with linux here
393 */
394 if (chip->nc_page_size > 512)
395 chip->nc_badmarker_offs = 0;
396 else
397 chip->nc_badmarker_offs = 5;
398 #endif
399
400 /* Calculate page shift and mask */
401 chip->nc_page_shift = ffs(chip->nc_page_size) - 1;
402 chip->nc_page_mask = ~(chip->nc_page_size - 1);
403 /* same for block */
404 chip->nc_block_shift = ffs(chip->nc_block_size) - 1;
405 chip->nc_block_mask = ~(chip->nc_block_size - 1);
406
407 #ifdef NOTYET
408 /* look for quirks here if needed in future */
409 nor_quirks(self, chip);
410 #endif
411
412 return 0;
413 }
414
415 /* ARGSUSED */
416 static bool
417 nor_shutdown(device_t self, int howto)
418 {
419 return true;
420 }
421
422 /* implementation of the block device API */
423
424 /* read a page, default implementation */
425 static int
426 nor_default_read_page(device_t self, flash_off_t offset, uint8_t * const data)
427 {
428 struct nor_softc * const sc = device_private(self);
429 struct nor_chip * const chip = &sc->sc_chip;
430
431 /*
432 * access by specified access_width
433 * note: #bits == 1 << width
434 */
435 switch(sc->sc_nor_if->access_width) {
436 case 0:
437 nor_read_buf_1(self, offset, data, chip->nc_page_size);
438 break;
439 case 1:
440 nor_read_buf_2(self, offset, data, chip->nc_page_size);
441 break;
442 case 2:
443 nor_read_buf_4(self, offset, data, chip->nc_page_size);
444 break;
445 #ifdef NOTYET
446 case 3:
447 nor_read_buf_8(self, offset, data, chip->nc_page_size);
448 break;
449 #endif
450 default:
451 panic("%s: bad width %d\n", __func__, sc->sc_nor_if->access_width);
452 }
453
454 #if 0
455 /* for debugging new drivers */
456 nor_dump_data("page", data, chip->nc_page_size);
457 #endif
458
459 return 0;
460 }
461
462 /* write a page, default implementation */
463 static int
464 nor_default_program_page(device_t self, flash_off_t offset,
465 const uint8_t * const data)
466 {
467 struct nor_softc * const sc = device_private(self);
468 struct nor_chip * const chip = &sc->sc_chip;
469
470 /*
471 * access by specified width
472 * #bits == 1 << access_width
473 */
474 switch(sc->sc_nor_if->access_width) {
475 case 0:
476 nor_write_buf_1(self, offset, data, chip->nc_page_size);
477 break;
478 case 1:
479 nor_write_buf_2(self, offset, data, chip->nc_page_size);
480 break;
481 case 2:
482 nor_write_buf_4(self, offset, data, chip->nc_page_size);
483 break;
484 #ifdef NOTYET
485 case 3:
486 nor_write_buf_8(self, offset, data, chip->nc_page_size);
487 break;
488 #endif
489 default:
490 panic("%s: bad width %d\n", __func__,
491 sc->sc_nor_if->access_width);
492 }
493
494 #if 0
495 /* for debugging new drivers */
496 nor_dump_data("page", data, chip->nc_page_size);
497 #endif
498
499 return 0;
500 }
501
502 /*
503 * nor_flash_erase_all - erase the entire chip
504 *
505 * XXX a good way to brick your system
506 */
507 static int
508 nor_flash_erase_all(device_t self)
509 {
510 struct nor_softc * const sc = device_private(self);
511 int error;
512
513 mutex_enter(&sc->sc_device_lock);
514 error = nor_erase_all(self);
515 mutex_exit(&sc->sc_device_lock);
516
517 return error;
518 }
519
520 static int
521 nor_flash_erase(device_t self, struct flash_erase_instruction * const ei)
522 {
523 struct nor_softc * const sc = device_private(self);
524 struct nor_chip * const chip = &sc->sc_chip;
525 flash_off_t addr;
526 int error = 0;
527
528 if (ei->ei_addr < 0 || ei->ei_len < chip->nc_block_size)
529 return EINVAL;
530
531 if (ei->ei_addr + ei->ei_len > chip->nc_size) {
532 DPRINTF(("%s: erase address is past the end"
533 " of the device\n", __func__));
534 return EINVAL;
535 }
536
537 if ((ei->ei_addr == 0) && (ei->ei_len == chip->nc_size)
538 && (sc->sc_nor_if->erase_all != NULL)) {
539 return nor_flash_erase_all(self);
540 }
541
542 if (ei->ei_addr % chip->nc_block_size != 0) {
543 aprint_error_dev(self,
544 "nor_flash_erase: ei_addr (%ju) is not"
545 " a multiple of block size (%ju)\n",
546 (uintmax_t)ei->ei_addr,
547 (uintmax_t)chip->nc_block_size);
548 return EINVAL;
549 }
550
551 if (ei->ei_len % chip->nc_block_size != 0) {
552 aprint_error_dev(self,
553 "nor_flash_erase: ei_len (%ju) is not"
554 " a multiple of block size (%ju)",
555 (uintmax_t)ei->ei_len,
556 (uintmax_t)chip->nc_block_size);
557 return EINVAL;
558 }
559
560 mutex_enter(&sc->sc_device_lock);
561 addr = ei->ei_addr;
562 while (addr < ei->ei_addr + ei->ei_len) {
563 #ifdef NOTYET
564 if (nor_isbad(self, addr)) {
565 aprint_error_dev(self, "bad block encountered\n");
566 ei->ei_state = FLASH_ERASE_FAILED;
567 error = EIO;
568 goto out;
569 }
570 #endif
571
572 error = nor_erase_block(self, addr);
573 if (error) {
574 ei->ei_state = FLASH_ERASE_FAILED;
575 goto out;
576 }
577
578 addr += chip->nc_block_size;
579 }
580 mutex_exit(&sc->sc_device_lock);
581
582 ei->ei_state = FLASH_ERASE_DONE;
583 if (ei->ei_callback != NULL) {
584 ei->ei_callback(ei);
585 }
586
587 return 0;
588 out:
589 mutex_exit(&sc->sc_device_lock);
590
591 return error;
592 }
593
594 /*
595 * handle (page) unaligned write to nor
596 */
597 static int
598 nor_flash_write_unaligned(device_t self, flash_off_t offset, size_t len,
599 size_t * const retlen, const uint8_t * const buf)
600 {
601 struct nor_softc * const sc = device_private(self);
602 struct nor_chip * const chip = &sc->sc_chip;
603 flash_off_t first, last, firstoff;
604 const uint8_t *bufp;
605 flash_off_t addr;
606 size_t left, count;
607 int error = 0, i;
608
609 first = offset & chip->nc_page_mask;
610 firstoff = offset & ~chip->nc_page_mask;
611 /* XXX check if this should be len - 1 */
612 last = (offset + len) & chip->nc_page_mask;
613 count = last - first + 1;
614
615 addr = first;
616 *retlen = 0;
617
618 mutex_enter(&sc->sc_device_lock);
619 if (count == 1) {
620 #ifdef NOTYET
621 if (nor_isbad(self, addr)) {
622 aprint_error_dev(self,
623 "nor_flash_write_unaligned: "
624 "bad block encountered\n");
625 error = EIO;
626 goto out;
627 }
628 #endif
629
630 error = nor_read_page(self, addr, chip->nc_page_cache);
631 if (error) {
632 goto out;
633 }
634
635 memcpy(chip->nc_page_cache + firstoff, buf, len);
636
637 error = nor_program_page(self, addr, chip->nc_page_cache);
638 if (error) {
639 goto out;
640 }
641
642 *retlen = len;
643 goto out;
644 }
645
646 bufp = buf;
647 left = len;
648
649 for (i = 0; i < count && left != 0; i++) {
650 #ifdef NOTYET
651 if (nor_isbad(self, addr)) {
652 aprint_error_dev(self,
653 "nor_flash_write_unaligned: "
654 "bad block encountered\n");
655 error = EIO;
656 goto out;
657 }
658 #endif
659
660 if (i == 0) {
661 error = nor_read_page(self, addr, chip->nc_page_cache);
662 if (error) {
663 goto out;
664 }
665
666 memcpy(chip->nc_page_cache + firstoff,
667 bufp, chip->nc_page_size - firstoff);
668
669 printf("write page: %s: %d\n", __FILE__, __LINE__);
670 error = nor_program_page(self, addr,
671 chip->nc_page_cache);
672 if (error) {
673 goto out;
674 }
675
676 bufp += chip->nc_page_size - firstoff;
677 left -= chip->nc_page_size - firstoff;
678 *retlen += chip->nc_page_size - firstoff;
679
680 } else if (i == count - 1) {
681 error = nor_read_page(self, addr, chip->nc_page_cache);
682 if (error) {
683 goto out;
684 }
685
686 memcpy(chip->nc_page_cache, bufp, left);
687
688 error = nor_program_page(self, addr,
689 chip->nc_page_cache);
690 if (error) {
691 goto out;
692 }
693
694 *retlen += left;
695 KASSERT(left < chip->nc_page_size);
696
697 } else {
698 /* XXX debug */
699 if (left > chip->nc_page_size) {
700 printf("left: %zu, i: %d, count: %zu\n",
701 (size_t )left, i, count);
702 }
703 KASSERT(left > chip->nc_page_size);
704
705 error = nor_program_page(self, addr, bufp);
706 if (error) {
707 goto out;
708 }
709
710 bufp += chip->nc_page_size;
711 left -= chip->nc_page_size;
712 *retlen += chip->nc_page_size;
713 }
714
715 addr += chip->nc_page_size;
716 }
717
718 KASSERT(*retlen == len);
719 out:
720 mutex_exit(&sc->sc_device_lock);
721
722 return error;
723 }
724
725 static int
726 nor_flash_write(device_t self, flash_off_t offset, size_t len,
727 size_t * const retlen, const uint8_t * const buf)
728 {
729 struct nor_softc * const sc = device_private(self);
730 struct nor_chip * const chip = &sc->sc_chip;
731 const uint8_t *bufp;
732 size_t pages, page;
733 daddr_t addr;
734 int error = 0;
735
736 if ((offset + len) > chip->nc_size) {
737 DPRINTF(("%s: write (off: 0x%jx, len: %ju),"
738 " exceeds device size (0x%jx)\n", __func__,
739 (uintmax_t)offset, (uintmax_t)len,
740 (uintmax_t)chip->nc_size));
741 return EINVAL;
742 }
743
744 if (len % chip->nc_page_size != 0 ||
745 offset % chip->nc_page_size != 0) {
746 return nor_flash_write_unaligned(self,
747 offset, len, retlen, buf);
748 }
749
750 pages = len / chip->nc_page_size;
751 KASSERT(pages != 0);
752 *retlen = 0;
753
754 addr = offset;
755 bufp = buf;
756
757 mutex_enter(&sc->sc_device_lock);
758 for (page = 0; page < pages; page++) {
759 #ifdef NOTYET
760 /* do we need this check here? */
761 if (nor_isbad(self, addr)) {
762 aprint_error_dev(self,
763 "nor_flash_write: bad block encountered\n");
764
765 error = EIO;
766 goto out;
767 }
768 #endif
769
770 error = nor_program_page(self, addr, bufp);
771 if (error) {
772 goto out;
773 }
774
775 addr += chip->nc_page_size;
776 bufp += chip->nc_page_size;
777 *retlen += chip->nc_page_size;
778 }
779 out:
780 mutex_exit(&sc->sc_device_lock);
781 DPRINTF(("%s: retlen: %zu, len: %zu\n", __func__, *retlen, len));
782
783 return error;
784 }
785
786 /*
787 * handle (page) unaligned read from nor
788 */
789 static int
790 nor_flash_read_unaligned(device_t self, flash_off_t offset, size_t len,
791 size_t * const retlen, uint8_t * const buf)
792 {
793 struct nor_softc * const sc = device_private(self);
794 struct nor_chip * const chip = &sc->sc_chip;
795 daddr_t first, last, count, firstoff;
796 uint8_t *bufp;
797 daddr_t addr;
798 size_t left;
799 int error = 0, i;
800
801 first = offset & chip->nc_page_mask;
802 firstoff = offset & ~chip->nc_page_mask;
803 last = (offset + len) & chip->nc_page_mask;
804 count = (last - first) / chip->nc_page_size + 1;
805
806 addr = first;
807 bufp = buf;
808 left = len;
809 *retlen = 0;
810
811 mutex_enter(&sc->sc_device_lock);
812 if (count == 1) {
813 error = nor_read_page(self, addr, chip->nc_page_cache);
814 if (error) {
815 goto out;
816 }
817
818 memcpy(bufp, chip->nc_page_cache + firstoff, len);
819
820 *retlen = len;
821 goto out;
822 }
823
824 for (i = 0; i < count && left != 0; i++) {
825 /* XXX Why use the page cache here ? */
826 error = nor_read_page(self, addr, chip->nc_page_cache);
827 if (error) {
828 goto out;
829 }
830
831 if (i == 0) {
832 memcpy(bufp, chip->nc_page_cache + firstoff,
833 chip->nc_page_size - firstoff);
834
835 bufp += chip->nc_page_size - firstoff;
836 left -= chip->nc_page_size - firstoff;
837 *retlen += chip->nc_page_size - firstoff;
838
839 } else if (i == count - 1) {
840 memcpy(bufp, chip->nc_page_cache, left);
841 *retlen += left;
842 KASSERT(left < chip->nc_page_size);
843
844 } else {
845 memcpy(bufp, chip->nc_page_cache, chip->nc_page_size);
846
847 bufp += chip->nc_page_size;
848 left -= chip->nc_page_size;
849 *retlen += chip->nc_page_size;
850 }
851
852 addr += chip->nc_page_size;
853 }
854 KASSERT(*retlen == len);
855 out:
856 mutex_exit(&sc->sc_device_lock);
857
858 return error;
859 }
860
861 static int
862 nor_flash_read(device_t self, flash_off_t offset, size_t len,
863 size_t * const retlen, uint8_t * const buf)
864 {
865 struct nor_softc * const sc = device_private(self);
866 struct nor_chip * const chip = &sc->sc_chip;
867 uint8_t *bufp;
868 size_t addr;
869 size_t i, pages;
870 int error = 0;
871
872 *retlen = 0;
873
874 DPRINTF(("%s: off: 0x%jx, len: %zu\n",
875 __func__, (uintmax_t)offset, len));
876
877 if (__predict_false((offset + len) > chip->nc_size)) {
878 DPRINTF(("%s: read (off: 0x%jx, len: %zu),"
879 " exceeds device size (%ju)\n", __func__,
880 (uintmax_t)offset, len, (uintmax_t)chip->nc_size));
881 return EINVAL;
882 }
883
884 /* Handle unaligned access, shouldnt be needed when using the
885 * block device, as strategy handles it, so only low level
886 * accesses will use this path
887 */
888 /* XXX^2 */
889 #if 0
890 if (len < chip->nc_page_size)
891 panic("TODO page size is larger than read size");
892 #endif
893
894 if (len % chip->nc_page_size != 0 ||
895 offset % chip->nc_page_size != 0) {
896 return nor_flash_read_unaligned(self,
897 offset, len, retlen, buf);
898 }
899
900 bufp = buf;
901 addr = offset;
902 pages = len / chip->nc_page_size;
903
904 mutex_enter(&sc->sc_device_lock);
905 for (i = 0; i < pages; i++) {
906 #ifdef NOTYET
907 /* XXX do we need this check here? */
908 if (nor_isbad(self, addr)) {
909 aprint_error_dev(self, "bad block encountered\n");
910 error = EIO;
911 goto out;
912 }
913 #endif
914 error = nor_read_page(self, addr, bufp);
915 if (error)
916 goto out;
917
918 bufp += chip->nc_page_size;
919 addr += chip->nc_page_size;
920 *retlen += chip->nc_page_size;
921 }
922 out:
923 mutex_exit(&sc->sc_device_lock);
924
925 return error;
926 }
927
928 static int
929 nor_flash_isbad(device_t self, flash_off_t ofs, bool * const isbad)
930 {
931 struct nor_softc * const sc = device_private(self);
932 struct nor_chip * const chip = &sc->sc_chip;
933 #ifdef NOTYET
934 bool result;
935 #endif
936
937 if (ofs > chip->nc_size) {
938 DPRINTF(("%s: offset 0x%jx is larger than"
939 " device size (0x%jx)\n", __func__,
940 (uintmax_t)ofs, (uintmax_t)chip->nc_size));
941 return EINVAL;
942 }
943
944 if (ofs % chip->nc_block_size != 0) {
945 DPRINTF(("offset (0x%jx) is not the multiple of block size "
946 "(%ju)",
947 (uintmax_t)ofs, (uintmax_t)chip->nc_block_size));
948 return EINVAL;
949 }
950
951 #ifdef NOTYET
952 mutex_enter(&sc->sc_device_lock);
953 result = nor_isbad(self, ofs);
954 mutex_exit(&sc->sc_device_lock);
955
956 *isbad = result;
957 #else
958 *isbad = false;
959 #endif
960
961 return 0;
962 }
963
964 static int
965 nor_flash_markbad(device_t self, flash_off_t ofs)
966 {
967 struct nor_softc * const sc = device_private(self);
968 struct nor_chip * const chip = &sc->sc_chip;
969
970 if (ofs > chip->nc_size) {
971 DPRINTF(("%s: offset 0x%jx is larger than"
972 " device size (0x%jx)\n", __func__,
973 ofs, (uintmax_t)chip->nc_size));
974 return EINVAL;
975 }
976
977 if (ofs % chip->nc_block_size != 0) {
978 panic("offset (%ju) is not the multiple of block size (%ju)",
979 (uintmax_t)ofs, (uintmax_t)chip->nc_block_size);
980 }
981
982 /* TODO: implement this */
983
984 return 0;
985 }
986
987 static int
988 sysctl_nor_verify(SYSCTLFN_ARGS)
989 {
990 int error, t;
991 struct sysctlnode node;
992
993 node = *rnode;
994 t = *(int *)rnode->sysctl_data;
995 node.sysctl_data = &t;
996 error = sysctl_lookup(SYSCTLFN_CALL(&node));
997 if (error || newp == NULL)
998 return error;
999
1000 if (node.sysctl_num == nor_cachesync_nodenum) {
1001 if (t <= 0 || t > 60)
1002 return EINVAL;
1003 } else {
1004 return EINVAL;
1005 }
1006
1007 *(int *)rnode->sysctl_data = t;
1008
1009 return 0;
1010 }
1011
1012 SYSCTL_SETUP(sysctl_nor, "sysctl nor subtree setup")
1013 {
1014 int rc, nor_root_num;
1015 const struct sysctlnode *node;
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