1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
|
/*
* MWDUMP Shell Command Implmentation
*
* Author: Fernando RUIZ CASAS
* Work: fernando.ruiz@ctv.es
* Home: correo@fernando-ruiz.com
*
* The license and distribution terms for this file may be
* found in the file LICENSE in this distribution or at
* http://www.rtems.com/license/LICENSE.
*
* $Id$
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <ctype.h>
#include <stdio.h>
#include <string.h>
#include <inttypes.h>
#include <rtems.h>
#include <rtems/shell.h>
#include <rtems/stringto.h>
#include "internal.h"
int rtems_shell_main_mwdump(
int argc,
char *argv[]
)
{
unsigned char n;
unsigned char m;
int max;
int res;
void *addr = 0;
unsigned char *pb;
if ( argc > 1 ) {
if ( rtems_string_to_pointer(argv[1], &addr, NULL) ) {
printf( "Address argument (%s) is not a number\n", argv[1] );
return -1;
}
}
if ( argc > 2 ) {
if ( rtems_string_to_int(argv[2], &max, NULL, 0) ) {
printf( "Address argument (%s) is not a number\n", argv[1] );
return -1;
}
if (max <= 0) {
max = 1; /* print 1 item if 0 or neg. */
res = 0;
} else {
max--;
res = max & 0xf;/* num bytes in last row */
max >>= 4; /* div by 16 */
max++; /* num of rows to print */
if (max > 20) { /* limit to 20 */
max = 20;
res = 0xf; /* 16 bytes print in last row */
}
}
} else {
max = 20;
res = 0xf;
}
pb = addr;
for (m=0;m<max;m++) {
printf("%10p ", pb);
for (n=0;n<=(m==(max-1)?res:0xf);n+=2)
printf("%04X%c",*((unsigned short*)(pb+n)),n==6?'-':' ');
for (;n<=0xf;n+=2)
printf(" %c", n==6?'-':' ');
for (n=0;n<=(m==(max-1)?res:0xf);n++) {
printf("%c", isprint(pb[n]) ? pb[n] : '.');
}
printf("\n");
pb += 16;
}
return 0;
}
rtems_shell_cmd_t rtems_shell_WDUMP_Command = {
"wdump", /* name */
"wdump [address [length]]", /* usage */
"mem", /* topic */
rtems_shell_main_mwdump, /* command */
NULL, /* alias */
NULL /* next */
};
|