2 * CFI parallel flash with Intel command set emulation
4 * Copyright (c) 2006 Thorsten Zitterell
5 * Copyright (c) 2005 Jocelyn Mayer
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
22 * For now, this code can emulate flashes of 1, 2 or 4 bytes width.
23 * Supported commands/modes are:
30 * It does not support timings
31 * It does not support flash interleaving
32 * It does not implement software data protection as found in many real chips
33 * It does not implement erase suspend/resume commands
34 * It does not implement multiple sectors erase
36 * It does not implement much more ...
42 #include "qemu-timer.h"
44 #define PFLASH_BUG(fmt, ...) \
46 printf("PFLASH: Possible BUG - " fmt, ## __VA_ARGS__); \
50 /* #define PFLASH_DEBUG */
52 #define DPRINTF(fmt, ...) \
54 printf("PFLASH: " fmt , ## __VA_ARGS__); \
57 #define DPRINTF(fmt, ...) do { } while (0)
62 target_phys_addr_t base
;
63 target_phys_addr_t sector_len
;
64 target_phys_addr_t total_len
;
66 int wcycle
; /* if 0, the flash is read normally */
73 uint8_t cfi_table
[0x52];
74 target_phys_addr_t counter
;
75 unsigned int writeblock_size
;
82 static void pflash_timer (void *opaque
)
84 pflash_t
*pfl
= opaque
;
86 DPRINTF("%s: command %02x done\n", __func__
, pfl
->cmd
);
92 cpu_register_physical_memory(pfl
->base
, pfl
->total_len
,
93 pfl
->off
| IO_MEM_ROMD
| pfl
->fl_mem
);
99 static uint32_t pflash_read (pflash_t
*pfl
, target_phys_addr_t offset
,
102 target_phys_addr_t boff
;
107 boff
= offset
& 0xFF; /* why this here ?? */
111 else if (pfl
->width
== 4)
115 DPRINTF("%s: reading offset " TARGET_FMT_plx
" under cmd %02x width %d\n",
116 __func__
, offset
, pfl
->cmd
, width
);
120 /* Flash area read */
125 DPRINTF("%s: data offset " TARGET_FMT_plx
" %02x\n",
126 __func__
, offset
, ret
);
130 ret
= p
[offset
] << 8;
131 ret
|= p
[offset
+ 1];
134 ret
|= p
[offset
+ 1] << 8;
136 DPRINTF("%s: data offset " TARGET_FMT_plx
" %04x\n",
137 __func__
, offset
, ret
);
141 ret
= p
[offset
] << 24;
142 ret
|= p
[offset
+ 1] << 16;
143 ret
|= p
[offset
+ 2] << 8;
144 ret
|= p
[offset
+ 3];
147 ret
|= p
[offset
+ 1] << 8;
148 ret
|= p
[offset
+ 1] << 8;
149 ret
|= p
[offset
+ 2] << 16;
150 ret
|= p
[offset
+ 3] << 24;
152 DPRINTF("%s: data offset " TARGET_FMT_plx
" %08x\n",
153 __func__
, offset
, ret
);
156 DPRINTF("BUG in %s\n", __func__
);
160 case 0x20: /* Block erase */
161 case 0x50: /* Clear status register */
162 case 0x60: /* Block /un)lock */
163 case 0x70: /* Status Register */
164 case 0xe8: /* Write block */
165 /* Status register read */
167 DPRINTF("%s: status %x\n", __func__
, ret
);
169 case 0x98: /* Query mode */
170 if (boff
> pfl
->cfi_len
)
173 ret
= pfl
->cfi_table
[boff
];
176 /* This should never happen : reset state & treat it as a read */
177 DPRINTF("%s: unknown command state: %x\n", __func__
, pfl
->cmd
);
184 /* update flash content on disk */
185 static void pflash_update(pflash_t
*pfl
, int offset
,
190 offset_end
= offset
+ size
;
191 /* round to sectors */
192 offset
= offset
>> 9;
193 offset_end
= (offset_end
+ 511) >> 9;
194 bdrv_write(pfl
->bs
, offset
, pfl
->storage
+ (offset
<< 9),
195 offset_end
- offset
);
199 static inline void pflash_data_write(pflash_t
*pfl
, target_phys_addr_t offset
,
200 uint32_t value
, int width
, int be
)
202 uint8_t *p
= pfl
->storage
;
204 DPRINTF("%s: block write offset " TARGET_FMT_plx
205 " value %x counter " TARGET_FMT_plx
"\n",
206 __func__
, offset
, value
, pfl
->counter
);
213 p
[offset
] = value
>> 8;
214 p
[offset
+ 1] = value
;
217 p
[offset
+ 1] = value
>> 8;
222 p
[offset
] = value
>> 24;
223 p
[offset
+ 1] = value
>> 16;
224 p
[offset
+ 2] = value
>> 8;
225 p
[offset
+ 3] = value
;
228 p
[offset
+ 1] = value
>> 8;
229 p
[offset
+ 2] = value
>> 16;
230 p
[offset
+ 3] = value
>> 24;
237 static void pflash_write(pflash_t
*pfl
, target_phys_addr_t offset
,
238 uint32_t value
, int width
, int be
)
245 DPRINTF("%s: writing offset " TARGET_FMT_plx
" value %08x width %d wcycle 0x%x\n",
246 __func__
, offset
, value
, width
, pfl
->wcycle
);
249 /* Set the device in I/O access mode */
250 cpu_register_physical_memory(pfl
->base
, pfl
->total_len
, pfl
->fl_mem
);
253 switch (pfl
->wcycle
) {
259 case 0x10: /* Single Byte Program */
260 case 0x40: /* Single Byte Program */
261 DPRINTF("%s: Single Byte Program\n", __func__
);
263 case 0x20: /* Block erase */
265 offset
&= ~(pfl
->sector_len
- 1);
267 DPRINTF("%s: block erase at " TARGET_FMT_plx
" bytes "
269 __func__
, offset
, pfl
->sector_len
);
271 memset(p
+ offset
, 0xff, pfl
->sector_len
);
272 pflash_update(pfl
, offset
, pfl
->sector_len
);
273 pfl
->status
|= 0x80; /* Ready! */
275 case 0x50: /* Clear status bits */
276 DPRINTF("%s: Clear status bits\n", __func__
);
279 case 0x60: /* Block (un)lock */
280 DPRINTF("%s: Block unlock\n", __func__
);
282 case 0x70: /* Status Register */
283 DPRINTF("%s: Read status register\n", __func__
);
286 case 0x98: /* CFI query */
287 DPRINTF("%s: CFI query\n", __func__
);
289 case 0xe8: /* Write to buffer */
290 DPRINTF("%s: Write to buffer\n", __func__
);
291 pfl
->status
|= 0x80; /* Ready! */
293 case 0xff: /* Read array mode */
294 DPRINTF("%s: Read array mode\n", __func__
);
304 case 0x10: /* Single Byte Program */
305 case 0x40: /* Single Byte Program */
306 DPRINTF("%s: Single Byte Program\n", __func__
);
307 pflash_data_write(pfl
, offset
, value
, width
, be
);
308 pflash_update(pfl
, offset
, width
);
309 pfl
->status
|= 0x80; /* Ready! */
312 case 0x20: /* Block erase */
314 if (cmd
== 0xd0) { /* confirm */
317 } else if (cmd
== 0xff) { /* read array mode */
324 DPRINTF("%s: block write of %x bytes\n", __func__
, value
);
325 pfl
->counter
= value
;
332 } else if (cmd
== 0x01) {
335 } else if (cmd
== 0xff) {
338 DPRINTF("%s: Unknown (un)locking command\n", __func__
);
346 DPRINTF("%s: leaving query mode\n", __func__
);
355 case 0xe8: /* Block write */
356 pflash_data_write(pfl
, offset
, value
, width
, be
);
361 target_phys_addr_t mask
= pfl
->writeblock_size
- 1;
364 DPRINTF("%s: block write finished\n", __func__
);
366 /* Flush the entire write buffer onto backing storage. */
367 pflash_update(pfl
, offset
& mask
, pfl
->writeblock_size
);
376 case 3: /* Confirm mode */
378 case 0xe8: /* Block write */
383 DPRINTF("%s: unknown command for \"write block\"\n", __func__
);
384 PFLASH_BUG("Write block confirm");
393 /* Should never happen */
394 DPRINTF("%s: invalid write state\n", __func__
);
400 printf("%s: Unimplemented flash cmd sequence "
401 "(offset " TARGET_FMT_plx
", wcycle 0x%x cmd 0x%x value 0x%x)\n",
402 __func__
, offset
, pfl
->wcycle
, pfl
->cmd
, value
);
405 cpu_register_physical_memory(pfl
->base
, pfl
->total_len
,
406 pfl
->off
| IO_MEM_ROMD
| pfl
->fl_mem
);
415 static uint32_t pflash_readb_be(void *opaque
, target_phys_addr_t addr
)
417 return pflash_read(opaque
, addr
, 1, 1);
420 static uint32_t pflash_readb_le(void *opaque
, target_phys_addr_t addr
)
422 return pflash_read(opaque
, addr
, 1, 0);
425 static uint32_t pflash_readw_be(void *opaque
, target_phys_addr_t addr
)
427 pflash_t
*pfl
= opaque
;
429 return pflash_read(pfl
, addr
, 2, 1);
432 static uint32_t pflash_readw_le(void *opaque
, target_phys_addr_t addr
)
434 pflash_t
*pfl
= opaque
;
436 return pflash_read(pfl
, addr
, 2, 0);
439 static uint32_t pflash_readl_be(void *opaque
, target_phys_addr_t addr
)
441 pflash_t
*pfl
= opaque
;
443 return pflash_read(pfl
, addr
, 4, 1);
446 static uint32_t pflash_readl_le(void *opaque
, target_phys_addr_t addr
)
448 pflash_t
*pfl
= opaque
;
450 return pflash_read(pfl
, addr
, 4, 0);
453 static void pflash_writeb_be(void *opaque
, target_phys_addr_t addr
,
456 pflash_write(opaque
, addr
, value
, 1, 1);
459 static void pflash_writeb_le(void *opaque
, target_phys_addr_t addr
,
462 pflash_write(opaque
, addr
, value
, 1, 0);
465 static void pflash_writew_be(void *opaque
, target_phys_addr_t addr
,
468 pflash_t
*pfl
= opaque
;
470 pflash_write(pfl
, addr
, value
, 2, 1);
473 static void pflash_writew_le(void *opaque
, target_phys_addr_t addr
,
476 pflash_t
*pfl
= opaque
;
478 pflash_write(pfl
, addr
, value
, 2, 0);
481 static void pflash_writel_be(void *opaque
, target_phys_addr_t addr
,
484 pflash_t
*pfl
= opaque
;
486 pflash_write(pfl
, addr
, value
, 4, 1);
489 static void pflash_writel_le(void *opaque
, target_phys_addr_t addr
,
492 pflash_t
*pfl
= opaque
;
494 pflash_write(pfl
, addr
, value
, 4, 0);
497 static CPUWriteMemoryFunc
* const pflash_write_ops_be
[] = {
503 static CPUReadMemoryFunc
* const pflash_read_ops_be
[] = {
509 static CPUWriteMemoryFunc
* const pflash_write_ops_le
[] = {
515 static CPUReadMemoryFunc
* const pflash_read_ops_le
[] = {
521 /* Count trailing zeroes of a 32 bits quantity */
522 static int ctz32 (uint32_t n
)
547 #if 0 /* This is not necessary as n is never 0 */
555 pflash_t
*pflash_cfi01_register(target_phys_addr_t base
, ram_addr_t off
,
556 BlockDriverState
*bs
, uint32_t sector_len
,
557 int nb_blocs
, int width
,
558 uint16_t id0
, uint16_t id1
,
559 uint16_t id2
, uint16_t id3
,
563 target_phys_addr_t total_len
;
566 total_len
= sector_len
* nb_blocs
;
568 /* XXX: to be fixed */
570 if (total_len
!= (8 * 1024 * 1024) && total_len
!= (16 * 1024 * 1024) &&
571 total_len
!= (32 * 1024 * 1024) && total_len
!= (64 * 1024 * 1024))
575 pfl
= qemu_mallocz(sizeof(pflash_t
));
577 /* FIXME: Allocate ram ourselves. */
578 pfl
->storage
= qemu_get_ram_ptr(off
);
580 pfl
->fl_mem
= cpu_register_io_memory(pflash_read_ops_be
,
581 pflash_write_ops_be
, pfl
);
583 pfl
->fl_mem
= cpu_register_io_memory(pflash_read_ops_le
,
584 pflash_write_ops_le
, pfl
);
587 cpu_register_physical_memory(base
, total_len
,
588 off
| pfl
->fl_mem
| IO_MEM_ROMD
);
592 /* read the initial flash content */
593 ret
= bdrv_read(pfl
->bs
, 0, pfl
->storage
, total_len
>> 9);
595 cpu_unregister_io_memory(pfl
->fl_mem
);
600 #if 0 /* XXX: there should be a bit to set up read-only,
601 * the same way the hardware does (with WP pin).
607 pfl
->timer
= qemu_new_timer(vm_clock
, pflash_timer
, pfl
);
609 pfl
->sector_len
= sector_len
;
610 pfl
->total_len
= total_len
;
619 /* Hardcoded CFI table */
621 /* Standard "QRY" string */
622 pfl
->cfi_table
[0x10] = 'Q';
623 pfl
->cfi_table
[0x11] = 'R';
624 pfl
->cfi_table
[0x12] = 'Y';
625 /* Command set (Intel) */
626 pfl
->cfi_table
[0x13] = 0x01;
627 pfl
->cfi_table
[0x14] = 0x00;
628 /* Primary extended table address (none) */
629 pfl
->cfi_table
[0x15] = 0x31;
630 pfl
->cfi_table
[0x16] = 0x00;
631 /* Alternate command set (none) */
632 pfl
->cfi_table
[0x17] = 0x00;
633 pfl
->cfi_table
[0x18] = 0x00;
634 /* Alternate extended table (none) */
635 pfl
->cfi_table
[0x19] = 0x00;
636 pfl
->cfi_table
[0x1A] = 0x00;
638 pfl
->cfi_table
[0x1B] = 0x45;
640 pfl
->cfi_table
[0x1C] = 0x55;
641 /* Vpp min (no Vpp pin) */
642 pfl
->cfi_table
[0x1D] = 0x00;
643 /* Vpp max (no Vpp pin) */
644 pfl
->cfi_table
[0x1E] = 0x00;
646 pfl
->cfi_table
[0x1F] = 0x07;
647 /* Timeout for min size buffer write */
648 pfl
->cfi_table
[0x20] = 0x07;
649 /* Typical timeout for block erase */
650 pfl
->cfi_table
[0x21] = 0x0a;
651 /* Typical timeout for full chip erase (4096 ms) */
652 pfl
->cfi_table
[0x22] = 0x00;
654 pfl
->cfi_table
[0x23] = 0x04;
655 /* Max timeout for buffer write */
656 pfl
->cfi_table
[0x24] = 0x04;
657 /* Max timeout for block erase */
658 pfl
->cfi_table
[0x25] = 0x04;
659 /* Max timeout for chip erase */
660 pfl
->cfi_table
[0x26] = 0x00;
662 pfl
->cfi_table
[0x27] = ctz32(total_len
); // + 1;
663 /* Flash device interface (8 & 16 bits) */
664 pfl
->cfi_table
[0x28] = 0x02;
665 pfl
->cfi_table
[0x29] = 0x00;
666 /* Max number of bytes in multi-bytes write */
668 pfl
->cfi_table
[0x2A] = 0x08;
670 pfl
->cfi_table
[0x2A] = 0x0B;
672 pfl
->writeblock_size
= 1 << pfl
->cfi_table
[0x2A];
674 pfl
->cfi_table
[0x2B] = 0x00;
675 /* Number of erase block regions (uniform) */
676 pfl
->cfi_table
[0x2C] = 0x01;
677 /* Erase block region 1 */
678 pfl
->cfi_table
[0x2D] = nb_blocs
- 1;
679 pfl
->cfi_table
[0x2E] = (nb_blocs
- 1) >> 8;
680 pfl
->cfi_table
[0x2F] = sector_len
>> 8;
681 pfl
->cfi_table
[0x30] = sector_len
>> 16;
684 pfl
->cfi_table
[0x31] = 'P';
685 pfl
->cfi_table
[0x32] = 'R';
686 pfl
->cfi_table
[0x33] = 'I';
688 pfl
->cfi_table
[0x34] = '1';
689 pfl
->cfi_table
[0x35] = '1';
691 pfl
->cfi_table
[0x36] = 0x00;
692 pfl
->cfi_table
[0x37] = 0x00;
693 pfl
->cfi_table
[0x38] = 0x00;
694 pfl
->cfi_table
[0x39] = 0x00;
696 pfl
->cfi_table
[0x3a] = 0x00;
698 pfl
->cfi_table
[0x3b] = 0x00;
699 pfl
->cfi_table
[0x3c] = 0x00;