blob: 568e22641354791764ec80262803e28f7b8b871d [file] [log] [blame]
wdenk38635852002-08-27 05:55:31 +00001/*
2 * (C) Copyright 2001
3 * Erik Theisen, Wave 7 Optics, etheisen@mindspring.com.
4 *
5 * See file CREDITS for list of people who contributed to this
6 * project.
7 *
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.
12 *
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.
17 *
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,
21 * MA 02111-1307 USA
22 */
23
24/*
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020025 * AMCC 4XX DCR Functions
wdenk38635852002-08-27 05:55:31 +000026 */
27
28#include <common.h>
29#include <config.h>
30#include <command.h>
wdenk38635852002-08-27 05:55:31 +000031
Stefan Roeseaf9e1f52006-10-17 06:14:31 +020032unsigned long get_dcr (unsigned short);
33unsigned long set_dcr (unsigned short, unsigned long);
34
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020035/* =======================================================================
36 * Interpreter command to retrieve an AMCC PPC 4xx Device Control Register
37 * =======================================================================
wdenk38635852002-08-27 05:55:31 +000038 */
Wolfgang Denk54841ab2010-06-28 22:00:46 +020039int do_getdcr ( cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[] )
wdenk38635852002-08-27 05:55:31 +000040{
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020041 unsigned short dcrn; /* Device Control Register Num */
42 unsigned long value; /* DCR's value */
wdenk38635852002-08-27 05:55:31 +000043
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020044 unsigned long get_dcr (unsigned short);
wdenk8bde7f72003-06-27 21:31:46 +000045
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020046 /* Validate arguments */
Wolfgang Denk47e26b12010-07-17 01:06:04 +020047 if (argc < 2)
48 return cmd_usage(cmdtp);
wdenk38635852002-08-27 05:55:31 +000049
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020050 /* Get a DCR */
51 dcrn = (unsigned short) simple_strtoul (argv[1], NULL, 16);
52 value = get_dcr (dcrn);
wdenk38635852002-08-27 05:55:31 +000053
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020054 printf ("%04x: %08lx\n", dcrn, value);
wdenk38635852002-08-27 05:55:31 +000055
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020056 return 0;
57}
wdenk38635852002-08-27 05:55:31 +000058
59
60/* ======================================================================
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020061 * Interpreter command to set an AMCC PPC 4xx Device Control Register
wdenk38635852002-08-27 05:55:31 +000062 * ======================================================================
63*/
Wolfgang Denk54841ab2010-06-28 22:00:46 +020064int do_setdcr (cmd_tbl_t * cmdtp, int flag, int argc, char * const argv[])
wdenk38635852002-08-27 05:55:31 +000065{
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020066 unsigned short dcrn; /* Device Control Register Num */
67 unsigned long value;
wdenk38635852002-08-27 05:55:31 +000068
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020069 /* DCR's value */
70 int nbytes;
wdenk38635852002-08-27 05:55:31 +000071
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020072 /* Validate arguments */
Wolfgang Denk47e26b12010-07-17 01:06:04 +020073 if (argc < 2)
74 return cmd_usage(cmdtp);
wdenk38635852002-08-27 05:55:31 +000075
Wolfgang Denk0c8721a2005-09-23 11:05:55 +020076 /* Set a DCR */
77 dcrn = (unsigned short) simple_strtoul (argv[1], NULL, 16);
78 do {
79 value = get_dcr (dcrn);
80 printf ("%04x: %08lx", dcrn, value);
81 nbytes = readline (" ? ");
82 if (nbytes == 0) {
83 /*
84 * <CR> pressed as only input, don't modify current
85 * location and exit command.
86 */
87 nbytes = 1;
88 return 0;
89 } else {
90 unsigned long i;
91 char *endp;
92
93 i = simple_strtoul (console_buffer, &endp, 16);
94 nbytes = endp - console_buffer;
95 if (nbytes)
96 set_dcr (dcrn, i);
97 }
98 } while (nbytes);
99
100 return 0;
101}
wdenk38635852002-08-27 05:55:31 +0000102
Stefan Roeseaf9e1f52006-10-17 06:14:31 +0200103/* =======================================================================
104 * Interpreter command to retrieve an register value through AMCC PPC 4xx
105 * Device Control Register inderect addressing.
106 * =======================================================================
107 */
Wolfgang Denk54841ab2010-06-28 22:00:46 +0200108int do_getidcr (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
Stefan Roeseaf9e1f52006-10-17 06:14:31 +0200109{
110 unsigned short adr_dcrn; /* Device Control Register Num for Address */
111 unsigned short dat_dcrn; /* Device Control Register Num for Data */
112 unsigned short offset; /* Register's offset */
113 unsigned long value; /* Register's value */
114 char *ptr = NULL;
115 char buf[80];
116
117 /* Validate arguments */
Wolfgang Denk47e26b12010-07-17 01:06:04 +0200118 if (argc < 3)
119 return cmd_usage(cmdtp);
Stefan Roeseaf9e1f52006-10-17 06:14:31 +0200120
121 /* Find out whether ther is '.' (dot) symbol in the first parameter. */
122 strncpy (buf, argv[1], sizeof(buf)-1);
123 buf[sizeof(buf)-1] = 0; /* will guarantee zero-end string */
124 ptr = strchr (buf, '.');
125
126 if (ptr != NULL) {
127 /* First parameter has format adr_dcrn.dat_dcrn */
128 *ptr++ = 0; /* erase '.', create zero-end string */
129 adr_dcrn = (unsigned short) simple_strtoul (buf, NULL, 16);
130 dat_dcrn = (unsigned short) simple_strtoul (ptr, NULL, 16);
131 } else {
132 /*
133 * First parameter has format adr_dcrn; dat_dcrn will be
134 * calculated as adr_dcrn+1.
135 */
136 adr_dcrn = (unsigned short) simple_strtoul (buf, NULL, 16);
137 dat_dcrn = adr_dcrn+1;
138 }
139
140 /* Register's offset */
141 offset = (unsigned short) simple_strtoul (argv[2], NULL, 16);
142
143 /* Disable interrupts */
144 disable_interrupts ();
145 /* Set offset */
146 set_dcr (adr_dcrn, offset);
147 /* get data */
148 value = get_dcr (dat_dcrn);
149 /* Enable interrupts */
150 enable_interrupts ();
151
152 printf ("%04x.%04x-%04x Read %08lx\n", adr_dcrn, dat_dcrn, offset, value);
153
154 return 0;
155}
156
157/* =======================================================================
158 * Interpreter command to update an register value through AMCC PPC 4xx
159 * Device Control Register inderect addressing.
160 * =======================================================================
161 */
Wolfgang Denk54841ab2010-06-28 22:00:46 +0200162int do_setidcr (cmd_tbl_t * cmdtp, int flag, int argc, char * const argv[])
Stefan Roeseaf9e1f52006-10-17 06:14:31 +0200163{
164 unsigned short adr_dcrn; /* Device Control Register Num for Address */
165 unsigned short dat_dcrn; /* Device Control Register Num for Data */
166 unsigned short offset; /* Register's offset */
167 unsigned long value; /* Register's value */
168 char *ptr = NULL;
169 char buf[80];
170
171 /* Validate arguments */
Wolfgang Denk47e26b12010-07-17 01:06:04 +0200172 if (argc < 4)
173 return cmd_usage(cmdtp);
Stefan Roeseaf9e1f52006-10-17 06:14:31 +0200174
175 /* Find out whether ther is '.' (dot) symbol in the first parameter. */
176 strncpy (buf, argv[1], sizeof(buf)-1);
177 buf[sizeof(buf)-1] = 0; /* will guarantee zero-end string */
178 ptr = strchr (buf, '.');
179
180 if (ptr != NULL) {
181 /* First parameter has format adr_dcrn.dat_dcrn */
182 *ptr++ = 0; /* erase '.', create zero-end string */
183 adr_dcrn = (unsigned short) simple_strtoul (buf, NULL, 16);
184 dat_dcrn = (unsigned short) simple_strtoul (ptr, NULL, 16);
185 } else {
186 /*
187 * First parameter has format adr_dcrn; dat_dcrn will be
188 * calculated as adr_dcrn+1.
189 */
Wolfgang Denk2b2a40b2006-10-26 16:24:31 +0200190 adr_dcrn = (unsigned short) simple_strtoul (buf, NULL, 16);
191 dat_dcrn = adr_dcrn+1;
192 }
Stefan Roeseaf9e1f52006-10-17 06:14:31 +0200193
194 /* Register's offset */
195 offset = (unsigned short) simple_strtoul (argv[2], NULL, 16);
196 /* New value */
197 value = (unsigned long) simple_strtoul (argv[3], NULL, 16);
198
199 /* Disable interrupts */
200 disable_interrupts ();
201 /* Set offset */
202 set_dcr (adr_dcrn, offset);
203 /* set data */
204 set_dcr (dat_dcrn, value);
205 /* Enable interrupts */
206 enable_interrupts ();
207
208 printf ("%04x.%04x-%04x Write %08lx\n", adr_dcrn, dat_dcrn, offset, value);
209
210 return 0;
211}
212
wdenk8bde7f72003-06-27 21:31:46 +0000213/***************************************************/
214
wdenk0d498392003-07-01 21:06:45 +0000215U_BOOT_CMD(
216 getdcr, 2, 1, do_getdcr,
Peter Tyser2fb26042009-01-27 18:03:12 -0600217 "Get an AMCC PPC 4xx DCR's value",
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200218 "dcrn - return a DCR's value."
wdenk8bde7f72003-06-27 21:31:46 +0000219);
wdenk0d498392003-07-01 21:06:45 +0000220U_BOOT_CMD(
221 setdcr, 2, 1, do_setdcr,
Peter Tyser2fb26042009-01-27 18:03:12 -0600222 "Set an AMCC PPC 4xx DCR's value",
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200223 "dcrn - set a DCR's value."
wdenk8bde7f72003-06-27 21:31:46 +0000224);
225
Stefan Roeseaf9e1f52006-10-17 06:14:31 +0200226U_BOOT_CMD(
227 getidcr, 3, 1, do_getidcr,
Peter Tyser2fb26042009-01-27 18:03:12 -0600228 "Get a register value via indirect DCR addressing",
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200229 "adr_dcrn[.dat_dcrn] offset - write offset to adr_dcrn, read value from dat_dcrn."
Stefan Roeseaf9e1f52006-10-17 06:14:31 +0200230);
231
232U_BOOT_CMD(
233 setidcr, 4, 1, do_setidcr,
Peter Tyser2fb26042009-01-27 18:03:12 -0600234 "Set a register value via indirect DCR addressing",
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200235 "adr_dcrn[.dat_dcrn] offset value - write offset to adr_dcrn, write value to dat_dcrn."
Stefan Roeseaf9e1f52006-10-17 06:14:31 +0200236);