3 * Denis Peter, MPL AG Switzerland, d.peter@mpl.ch
5 * See file CREDITS for list of people who contributed to this
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of
11 * the License, or (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
26 add following code to PIP405.c :
32 i = getenv_r ("testmem", s, 32);
34 i = (int) simple_strtoul (s, NULL, 10);
35 if ((i > 0) && (i < 0xf)) {
37 i = mem_test (0, ramsize, i);
50 #include <asm/processor.h>
51 #include <405gp_i2c.h>
57 #define TEST_SHOW_PROG 4
58 #define TEST_SHOW_ERR 2
59 #define TEST_SHOW_ALL 1
61 #define TESTPAT1 0xAA55AA55
62 #define TESTPAT2 0x55AA55AA
65 #define MEGABYTE (1024*1024)
72 volatile unsigned long pat1;
73 volatile unsigned long pat2;
74 } RAM_MEMTEST_PATTERN2;
77 volatile unsigned long addr;
78 } RAM_MEMTEST_ADDRLINE;
80 static __inline unsigned long Swap_32 (unsigned long val)
82 return (((val << 16) & 0xFFFF0000) | ((val >> 16) & 0x0000FFFF));
85 void testm_puts (int quiet, char *buf)
87 if ((quiet & TEST_SHOW_ALL) == TEST_SHOW_ALL)
92 void Write_Error (int mode, unsigned long addr, unsigned long expected,
98 sprintf (dispbuf, "\n ERROR @ 0x%08lX: (exp: 0x%08lX act: 0x%08lX) ",
99 addr, expected, actual);
100 testm_puts (((mode & TEST_SHOW_ERR) ==
101 TEST_SHOW_ERR) ? TEST_SHOW_ALL : mode, dispbuf);
106 * fills the memblock of <size> bytes from <startaddr> with pat1 and pat2
110 void RAM_MemTest_WritePattern2 (unsigned long startaddr,
111 unsigned long size, unsigned long pat1,
114 RAM_MEMTEST_PATTERN2 *p, *pe;
116 p = (RAM_MEMTEST_PATTERN2 *) startaddr;
117 pe = (RAM_MEMTEST_PATTERN2 *) (startaddr + size);
127 * checks the memblock of <size> bytes from <startaddr> with pat1 and pat2
128 * returns the address of the first error or NULL if all is well
131 void *RAM_MemTest_CheckPattern2 (int mode, unsigned long startaddr,
132 unsigned long size, unsigned long pat1,
135 RAM_MEMTEST_PATTERN2 *p, *pe;
136 unsigned long actual1, actual2;
138 p = (RAM_MEMTEST_PATTERN2 *) startaddr;
139 pe = (RAM_MEMTEST_PATTERN2 *) (startaddr + size);
145 if (actual1 != pat1) {
146 Write_Error (mode, (unsigned long) &(p->pat1), pat1, actual1);
147 return ((void *) &(p->pat1));
150 if (actual2 != pat2) {
151 Write_Error (mode, (unsigned long) &(p->pat2), pat2, actual2);
152 return ((void *) &(p->pat2));
162 * fills the memblock of <size> bytes from <startaddr> with the address
165 void RAM_MemTest_WriteAddrLine (unsigned long startaddr,
166 unsigned long size, int swapped)
168 RAM_MEMTEST_ADDRLINE *p, *pe;
170 p = (RAM_MEMTEST_ADDRLINE *) startaddr;
171 pe = (RAM_MEMTEST_ADDRLINE *) (startaddr + size);
175 p->addr = (unsigned long) p;
180 p->addr = Swap_32 ((unsigned long) p);
187 * checks the memblock of <size> bytes from <startaddr>
188 * returns the address of the error or NULL if all is well
191 void *RAM_MemTest_CheckAddrLine (int mode, unsigned long startaddr,
192 unsigned long size, int swapped)
194 RAM_MEMTEST_ADDRLINE *p, *pe;
195 unsigned long actual, expected;
197 p = (RAM_MEMTEST_ADDRLINE *) startaddr;
198 pe = (RAM_MEMTEST_ADDRLINE *) (startaddr + size);
203 expected = (unsigned long) p;
204 if (actual != expected) {
205 Write_Error (mode, (unsigned long) &(p->addr), expected,
207 return ((void *) &(p->addr));
214 expected = Swap_32 ((unsigned long) p);
215 if (actual != expected) {
216 Write_Error (mode, (unsigned long) &(p->addr), expected,
218 return ((void *) &(p->addr));
228 * checks the memblock of <size> bytes from <startaddr+size>
229 * returns the address of the error or NULL if all is well
232 void *RAM_MemTest_CheckAddrLineReverse (int mode, unsigned long startaddr,
233 unsigned long size, int swapped)
235 RAM_MEMTEST_ADDRLINE *p, *pe;
236 unsigned long actual, expected;
238 p = (RAM_MEMTEST_ADDRLINE *) (startaddr + size - sizeof (p->addr));
239 pe = (RAM_MEMTEST_ADDRLINE *) startaddr;
244 expected = (unsigned long) p;
245 if (actual != expected) {
246 Write_Error (mode, (unsigned long) &(p->addr), expected,
248 return ((void *) &(p->addr));
255 expected = Swap_32 ((unsigned long) p);
256 if (actual != expected) {
257 Write_Error (mode, (unsigned long) &(p->addr), expected,
259 return ((void *) &(p->addr));
269 * fills the memblock of <size> bytes from <startaddr> with walking bit pattern
272 void RAM_MemTest_WriteWalkBit (unsigned long startaddr, unsigned long size)
274 volatile unsigned long *p, *pe;
277 p = (unsigned long *) startaddr;
278 pe = (unsigned long *) (startaddr + size);
283 i = (i + 1 + (((unsigned long) p) >> 7)) % 32;
289 * checks the memblock of <size> bytes from <startaddr>
290 * returns the address of the error or NULL if all is well
293 void *RAM_MemTest_CheckWalkBit (int mode, unsigned long startaddr,
296 volatile unsigned long *p, *pe;
297 unsigned long actual, expected;
300 p = (unsigned long *) startaddr;
301 pe = (unsigned long *) (startaddr + size);
306 expected = (1UL << i);
307 if (actual != expected) {
308 Write_Error (mode, (unsigned long) p, expected, actual);
311 i = (i + 1 + (((unsigned long) p) >> 7)) % 32;
319 * fills the memblock of <size> bytes from <startaddr> with "random" pattern
322 void RAM_MemTest_WriteRandomPattern (unsigned long startaddr,
330 for (i = 0; i < (size / 4); i++) {
331 *(unsigned long *) (startaddr + i * 4) = p;
345 * checks the memblock of <size> bytes from <startaddr>
346 * returns the address of the error or NULL if all is well
349 void *RAM_MemTest_CheckRandomPattern (int mode, unsigned long startaddr,
354 unsigned long i, p, p1;
358 for (i = 0; i < (size / 4); i++) {
359 p1 = *(unsigned long *) (startaddr + i * 4);
362 Write_Error (mode, startaddr + i * 4, p, p1);
363 perr = (void *) (startaddr + i * 4);
382 void RAM_MemTest_WriteData1 (unsigned long startaddr, unsigned long size,
385 RAM_MemTest_WritePattern2 (startaddr, size, TESTPAT1, TESTPAT2);
388 void *RAM_MemTest_CheckData1 (int mode, unsigned long startaddr,
389 unsigned long size, unsigned long *pat)
391 return (RAM_MemTest_CheckPattern2
392 (mode, startaddr, size, TESTPAT1, TESTPAT2));
395 void RAM_MemTest_WriteData2 (unsigned long startaddr, unsigned long size,
398 RAM_MemTest_WritePattern2 (startaddr, size, TESTPAT2, TESTPAT1);
401 void *RAM_MemTest_CheckData2 (int mode, unsigned long startaddr,
402 unsigned long size, unsigned long *pat)
404 return (RAM_MemTest_CheckPattern2
405 (mode, startaddr, size, TESTPAT2, TESTPAT1));
408 void RAM_MemTest_WriteAddr1 (unsigned long startaddr, unsigned long size,
411 RAM_MemTest_WriteAddrLine (startaddr, size, FALSE);
414 void *RAM_MemTest_Check1Addr1 (int mode, unsigned long startaddr,
415 unsigned long size, unsigned long *pat)
417 return (RAM_MemTest_CheckAddrLine (mode, startaddr, size, FALSE));
420 void *RAM_MemTest_Check2Addr1 (int mode, unsigned long startaddr,
421 unsigned long size, unsigned long *pat)
423 return (RAM_MemTest_CheckAddrLineReverse
424 (mode, startaddr, size, FALSE));
427 void RAM_MemTest_WriteAddr2 (unsigned long startaddr, unsigned long size,
430 RAM_MemTest_WriteAddrLine (startaddr, size, TRUE);
433 void *RAM_MemTest_Check1Addr2 (int mode, unsigned long startaddr,
434 unsigned long size, unsigned long *pat)
436 return (RAM_MemTest_CheckAddrLine (mode, startaddr, size, TRUE));
439 void *RAM_MemTest_Check2Addr2 (int mode, unsigned long startaddr,
440 unsigned long size, unsigned long *pat)
442 return (RAM_MemTest_CheckAddrLineReverse
443 (mode, startaddr, size, TRUE));
449 void (*test_write) (unsigned long startaddr, unsigned long size,
451 char *test_write_desc;
452 void *(*test_check1) (int mode, unsigned long startaddr,
453 unsigned long size, unsigned long *pat);
454 void *(*test_check2) (int mode, unsigned long startaddr,
455 unsigned long size, unsigned long *pat);
459 #define TEST_STAGES 5
460 const RAM_MEMTEST_FUNC test_stage[TEST_STAGES] = {
461 {RAM_MemTest_WriteData1, "data test 1...\n", RAM_MemTest_CheckData1,
463 {RAM_MemTest_WriteData2, "data test 2...\n", RAM_MemTest_CheckData2,
465 {RAM_MemTest_WriteAddr1, "address line test...\n",
466 RAM_MemTest_Check1Addr1, RAM_MemTest_Check2Addr1},
467 {RAM_MemTest_WriteAddr2, "address line test (swapped)...\n",
468 RAM_MemTest_Check1Addr2, RAM_MemTest_Check2Addr2},
469 {RAM_MemTest_WriteRandomPattern, "random data test...\n",
470 RAM_MemTest_CheckRandomPattern, NULL}
475 int mem_test (unsigned long start, unsigned long ramsize, int quiet)
477 unsigned long errors, stage;
478 unsigned long startaddr, size, i;
479 const unsigned long blocksize = 0x80000; /* check in 512KB blocks */
481 unsigned long rdatapat;
483 int status = TEST_PASSED;
489 if ((quiet & TEST_SHOW_PROG) == TEST_SHOW_PROG) {
493 sprintf (dispbuf, "\nMemory Test: addr = 0x%lx size = 0x%lx\n",
495 testm_puts (quiet, dispbuf);
496 for (stage = 0; stage < TEST_STAGES; stage++) {
497 sprintf (dispbuf, test_stage[stage].test_write_desc);
498 testm_puts (quiet, dispbuf);
500 rdatapat = 0x12345678;
501 sprintf (dispbuf, "writing block: ");
502 testm_puts (quiet, dispbuf);
503 for (i = 0; i < size; i += blocksize) {
504 sprintf (dispbuf, "%04lX\b\b\b\b", i / blocksize);
505 testm_puts (quiet, dispbuf);
506 test_stage[stage].test_write (startaddr + i, blocksize,
509 sprintf (dispbuf, "\n");
510 testm_puts (quiet, dispbuf);
511 if ((quiet & TEST_SHOW_PROG) == TEST_SHOW_PROG) {
516 rdatapat = 0x12345678;
517 sprintf (dispbuf, "checking block: ");
518 testm_puts (quiet, dispbuf);
519 for (i = 0; i < size; i += blocksize) {
520 sprintf (dispbuf, "%04lX\b\b\b\b", i / blocksize);
521 testm_puts (quiet, dispbuf);
523 test_stage[stage].test_check1 (quiet, startaddr + i,
525 &rdatapat)) != NULL) {
526 status = TEST_FAILED;
529 sprintf (dispbuf, "\n");
530 testm_puts (quiet, dispbuf);
531 if ((quiet & TEST_SHOW_PROG) == TEST_SHOW_PROG) {
535 if (test_stage[stage].test_check2 != NULL) {
537 sprintf (dispbuf, "2nd checking block: ");
538 rdatapat = 0x12345678;
539 testm_puts (quiet, dispbuf);
540 for (i = 0; i < size; i += blocksize) {
541 sprintf (dispbuf, "%04lX\b\b\b\b", i / blocksize);
542 testm_puts (quiet, dispbuf);
544 test_stage[stage].test_check2 (quiet, startaddr + i,
546 &rdatapat)) != NULL) {
547 status = TEST_FAILED;
550 sprintf (dispbuf, "\n");
551 testm_puts (quiet, dispbuf);
552 if ((quiet & TEST_SHOW_PROG) == TEST_SHOW_PROG) {
559 if ((quiet & TEST_SHOW_PROG) == TEST_SHOW_PROG) {
564 if (status == TEST_FAILED)