3 * Erik Theisen, Wave 7 Optics, etheisen@mindspring.com.
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,
25 * AMCC 4XX DCR Functions
32 unsigned long get_dcr (unsigned short);
33 unsigned long set_dcr (unsigned short, unsigned long);
35 /* =======================================================================
36 * Interpreter command to retrieve an AMCC PPC 4xx Device Control Register
37 * =======================================================================
39 int do_getdcr ( cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *argv
[] )
41 unsigned short dcrn
; /* Device Control Register Num */
42 unsigned long value
; /* DCR's value */
44 unsigned long get_dcr (unsigned short);
46 /* Validate arguments */
53 dcrn
= (unsigned short) simple_strtoul (argv
[1], NULL
, 16);
54 value
= get_dcr (dcrn
);
56 printf ("%04x: %08lx\n", dcrn
, value
);
62 /* ======================================================================
63 * Interpreter command to set an AMCC PPC 4xx Device Control Register
64 * ======================================================================
66 int do_setdcr (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
68 unsigned short dcrn
; /* Device Control Register Num */
73 extern char console_buffer
[];
75 /* Validate arguments */
82 dcrn
= (unsigned short) simple_strtoul (argv
[1], NULL
, 16);
84 value
= get_dcr (dcrn
);
85 printf ("%04x: %08lx", dcrn
, value
);
86 nbytes
= readline (" ? ");
89 * <CR> pressed as only input, don't modify current
90 * location and exit command.
98 i
= simple_strtoul (console_buffer
, &endp
, 16);
99 nbytes
= endp
- console_buffer
;
108 /* =======================================================================
109 * Interpreter command to retrieve an register value through AMCC PPC 4xx
110 * Device Control Register inderect addressing.
111 * =======================================================================
113 int do_getidcr (cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *argv
[])
115 unsigned short adr_dcrn
; /* Device Control Register Num for Address */
116 unsigned short dat_dcrn
; /* Device Control Register Num for Data */
117 unsigned short offset
; /* Register's offset */
118 unsigned long value
; /* Register's value */
122 /* Validate arguments */
128 /* Find out whether ther is '.' (dot) symbol in the first parameter. */
129 strncpy (buf
, argv
[1], sizeof(buf
)-1);
130 buf
[sizeof(buf
)-1] = 0; /* will guarantee zero-end string */
131 ptr
= strchr (buf
, '.');
134 /* First parameter has format adr_dcrn.dat_dcrn */
135 *ptr
++ = 0; /* erase '.', create zero-end string */
136 adr_dcrn
= (unsigned short) simple_strtoul (buf
, NULL
, 16);
137 dat_dcrn
= (unsigned short) simple_strtoul (ptr
, NULL
, 16);
140 * First parameter has format adr_dcrn; dat_dcrn will be
141 * calculated as adr_dcrn+1.
143 adr_dcrn
= (unsigned short) simple_strtoul (buf
, NULL
, 16);
144 dat_dcrn
= adr_dcrn
+1;
147 /* Register's offset */
148 offset
= (unsigned short) simple_strtoul (argv
[2], NULL
, 16);
150 /* Disable interrupts */
151 disable_interrupts ();
153 set_dcr (adr_dcrn
, offset
);
155 value
= get_dcr (dat_dcrn
);
156 /* Enable interrupts */
157 enable_interrupts ();
159 printf ("%04x.%04x-%04x Read %08lx\n", adr_dcrn
, dat_dcrn
, offset
, value
);
164 /* =======================================================================
165 * Interpreter command to update an register value through AMCC PPC 4xx
166 * Device Control Register inderect addressing.
167 * =======================================================================
169 int do_setidcr (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
171 unsigned short adr_dcrn
; /* Device Control Register Num for Address */
172 unsigned short dat_dcrn
; /* Device Control Register Num for Data */
173 unsigned short offset
; /* Register's offset */
174 unsigned long value
; /* Register's value */
178 /* Validate arguments */
184 /* Find out whether ther is '.' (dot) symbol in the first parameter. */
185 strncpy (buf
, argv
[1], sizeof(buf
)-1);
186 buf
[sizeof(buf
)-1] = 0; /* will guarantee zero-end string */
187 ptr
= strchr (buf
, '.');
190 /* First parameter has format adr_dcrn.dat_dcrn */
191 *ptr
++ = 0; /* erase '.', create zero-end string */
192 adr_dcrn
= (unsigned short) simple_strtoul (buf
, NULL
, 16);
193 dat_dcrn
= (unsigned short) simple_strtoul (ptr
, NULL
, 16);
196 * First parameter has format adr_dcrn; dat_dcrn will be
197 * calculated as adr_dcrn+1.
199 adr_dcrn
= (unsigned short) simple_strtoul (buf
, NULL
, 16);
200 dat_dcrn
= adr_dcrn
+1;
203 /* Register's offset */
204 offset
= (unsigned short) simple_strtoul (argv
[2], NULL
, 16);
206 value
= (unsigned long) simple_strtoul (argv
[3], NULL
, 16);
208 /* Disable interrupts */
209 disable_interrupts ();
211 set_dcr (adr_dcrn
, offset
);
213 set_dcr (dat_dcrn
, value
);
214 /* Enable interrupts */
215 enable_interrupts ();
217 printf ("%04x.%04x-%04x Write %08lx\n", adr_dcrn
, dat_dcrn
, offset
, value
);
222 /***************************************************/
225 getdcr
, 2, 1, do_getdcr
,
226 "Get an AMCC PPC 4xx DCR's value",
227 "dcrn - return a DCR's value."
230 setdcr
, 2, 1, do_setdcr
,
231 "Set an AMCC PPC 4xx DCR's value",
232 "dcrn - set a DCR's value."
236 getidcr
, 3, 1, do_getidcr
,
237 "Get a register value via indirect DCR addressing",
238 "adr_dcrn[.dat_dcrn] offset - write offset to adr_dcrn, read value from dat_dcrn."
242 setidcr
, 4, 1, do_setidcr
,
243 "Set a register value via indirect DCR addressing",
244 "adr_dcrn[.dat_dcrn] offset value - write offset to adr_dcrn, write value to dat_dcrn."