OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [orpmon/] [cmds/] [memory.c] - Blame information for rev 828

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 809 simons
#include "common.h"
2
#include "support.h"
3
#include "spr_defs.h"
4
 
5 818 markom
void show_mem (int start, int stop)
6 809 simons
{
7 818 markom
  unsigned long i = start;
8
  if ((i & 0xf) != 0x0) printf ("\n%08lx: ", i);
9
  for(; i <= stop; i += 4) {
10
    if ((i & 0xf) == 0x0) printf ("\n%08lx: ", i);
11 809 simons
    /* Read one word */
12
    printf ("%08lx ", REG32(i));
13
  }
14
  printf ("\n");
15
}
16
 
17
void testram (unsigned long start_addr, unsigned long stop_addr, unsigned long testno)
18
{
19
  unsigned long addr;
20
  unsigned long err_addr = 0;
21
  unsigned long err_no = 0;
22
 
23
  /* Test 1: Write locations with their addresses */
24 818 markom
  if ((testno == 1) || (testno == 0)) {
25 809 simons
    printf ("\n1. Writing locations with their addresses: ");
26
    for (addr = start_addr; addr <= stop_addr; addr += 4)
27
      REG32(addr) = addr;
28
 
29
    /* Verify */
30
    for (addr = start_addr; addr <= stop_addr; addr += 4)
31 818 markom
      if (REG32(addr) != addr) {
32 809 simons
        err_no++;
33
        err_addr = addr;
34
      }
35 818 markom
    if (err_no) printf ("%04lx times failed. Last at location %08lx", err_no, err_addr);
36
    else printf ("Passed");
37 809 simons
    err_no = 0;
38
  }
39
 
40
  /* Test 2: Write locations with their inverse address */
41 818 markom
  if ((testno == 2) || (testno == 0)) {
42 809 simons
    printf ("\n2. Writing locations with their inverse addresses: ");
43
    for (addr = start_addr; addr <= stop_addr; addr += 4)
44
      REG32(addr) = ~addr;
45
 
46
    /* Verify */
47
    for (addr = start_addr; addr <= stop_addr; addr += 4)
48 818 markom
      if (REG32(addr) != ~addr) {
49 809 simons
        err_no++;
50
        err_addr = addr;
51
      }
52 818 markom
    if (err_no) printf ("%04lx times failed. Last at location %08lx", err_no, err_addr);
53
    else printf ("Passed");
54 809 simons
    err_no = 0;
55
  }
56
 
57
  /* Test 3: Write locations with walking ones */
58 818 markom
  if ((testno == 3) || (testno == 0)) {
59 809 simons
    printf ("\n3. Writing locations with walking ones: ");
60
    for (addr = start_addr; addr <= stop_addr; addr += 4)
61
      REG32(addr) = 1 << (addr >> 2);
62
 
63
    /* Verify */
64
    for (addr = start_addr; addr <= stop_addr; addr += 4)
65 818 markom
      if (REG32(addr) != (1 << (addr >> 2))) {
66 809 simons
        err_no++;
67
        err_addr = addr;
68
      }
69 818 markom
    if (err_no) printf ("%04lx times failed. Last at location %08lx", err_no, err_addr);
70
    else printf ("Passed");
71 809 simons
    err_no = 0;
72
  }
73
 
74
  /* Test 4: Write locations with walking zeros */
75 818 markom
  if ((testno == 4) || (testno == 0)) {
76 809 simons
    printf ("\n4. Writing locations with walking zeros: ");
77
    for (addr = start_addr; addr <= stop_addr; addr += 4)
78
      REG32(addr) = ~(1 << (addr >> 2));
79 818 markom
 
80 809 simons
    /* Verify */
81
    for (addr = start_addr; addr <= stop_addr; addr += 4)
82 818 markom
      if (REG32(addr) != ~(1 << (addr >> 2))) {
83 809 simons
        err_no++;
84
        err_addr = addr;
85
      }
86 818 markom
    if (err_no) printf ("%04lx times failed. Last at location %08lx", err_no, err_addr);
87
    else printf ("Passed");
88 809 simons
    err_no = 0;
89
  }
90
}
91
 
92
int dm_cmd (int argc, char *argv[])
93
{
94 818 markom
  switch (argc) {
95
    case 1: show_mem (strtoul (argv[0], 0, 0), strtoul (argv[0], 0, 0)); return 0;
96
    case 2: show_mem (strtoul (argv[0], 0, 0), strtoul (argv[1], 0, 0)); return 0;
97
    default: return -1;
98
  }
99 809 simons
}
100
 
101
int pm_cmd (int argc, char *argv[])
102
{
103 818 markom
  unsigned long addr, stop_addr, value;
104 812 markom
  if ((argc == 3) || (argc == 2)) {
105 818 markom
    addr = strtoul (argv[0], 0, 0);
106
 
107
    if (argc == 2) {
108
      stop_addr = strtoul (argv[0], 0, 0);
109
      value = strtoul (argv[1], 0, 0);
110
    } else {
111
      stop_addr = strtoul (argv[1], 0, 0);
112
      value = strtoul (argv[2], 0, 0);
113
    }
114
 
115
    for (; addr <= stop_addr; addr += 4) REG32(addr) = value;
116
 
117
    /*show_mem(strtoul (argv[0], 0, 0), stop_addr);*/
118
  } else return -1;
119
  return 0;
120
}
121 809 simons
 
122 818 markom
int ram_test_cmd (int argc, char *argv[])
123
{
124
  switch (argc) {
125
    case 2: testram(strtoul (argv[0], 0, 0), strtoul (argv[1], 0, 0), 0); return 0;
126
    case 3: testram(strtoul (argv[0], 0, 0), strtoul (argv[1], 0, 0), strtoul (argv[2], 0, 0)); return 0;
127
    default: return -1;
128
  }
129
}
130 809 simons
 
131 818 markom
unsigned long crc32 (unsigned long crc, const unsigned char *buf, unsigned long len)
132
{
133
  /* Create bitwise CRC table first */
134
  unsigned long crc_table[256];
135
  int i, k;
136
  for (i = 0; i < 256; i++) {
137
    unsigned long c = (unsigned long)i;
138
    for (k = 0; k < 8; k++) c = c & 1 ? 0xedb88320 ^ (c >> 1) : c >> 1;
139
    crc_table[i] = c;
140
  }
141
 
142
  /* Calculate crc on buf */
143
  crc = crc ^ 0xffffffffL;
144
  while (len--) crc = crc_table[((int)crc ^ (*buf++)) & 0xff] ^ (crc >> 8);
145
  return crc ^ 0xffffffffL;
146 809 simons
}
147
 
148 818 markom
int crc_cmd (int argc, char *argv[])
149 809 simons
{
150 818 markom
  unsigned long addr = global.src_addr;
151
  unsigned long len = global.length;
152
  unsigned long init_crc = 0;
153
 
154
  switch (argc) {
155
    case 3: init_crc = strtoul (argv[2], 0, 0);
156
    case 2: len = strtoul (argv[1], 0, 0);
157
    case 1: addr = strtoul (argv[0], 0, 0);
158
    case 0:
159 828 markom
      printf ("CRC [%08lx-%08lx] = %08lx\n", addr, addr + len - 1, crc32 (init_crc, (unsigned char *)addr, len));
160 818 markom
      return 0;
161
  }
162
  return -1;
163 809 simons
}
164
 
165
void module_memory_init (void)
166
{
167 818 markom
  register_command ("dm", "<start addr> [<end addr>]", "display 32-bit memory location(s)", dm_cmd);
168
  register_command ("pm", "<addr> [<stop_addr>] <value>", "patch 32-bit memory location(s)", pm_cmd);
169 809 simons
  register_command ("ram_test", "<start_addr> <stop_addr> [<test_no>]", "run a simple RAM test\n", ram_test_cmd);
170 818 markom
  register_command ("crc", "[<src_addr> [<length> [<init_crc>]]]", "Calculates a 32-bit CRC on specified memory region\n", crc_cmd);
171 809 simons
}

powered by: WebSVN 2.1.0

© copyright 1999-2025 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.