[people/ms/u-boot.git] / board / mpl / vcma9 / cmd_vcma9.c

/*
 * (C) Copyright 2002
 * Denis Peter, MPL AG Switzerland, d.peter@mpl.ch
 *
 * adapted for VCMA9
 * David Mueller, ELSOFT AG, d.mueller@elsoft.ch
 *
 * See file CREDITS for list of people who contributed to this
 * project.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of
 * the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
 * MA 02111-1307 USA
 *
 */

#include <common.h>
#include <command.h>
#include "vcma9.h"
#include "../common/common_util.h"

#if defined(CONFIG_DRIVER_CS8900)
#include <../drivers/net/cs8900.h>

static uchar cs8900_chksum(ushort data)
{
	return((data >> 8) & 0x00FF) + (data & 0x00FF);
}

#endif

DECLARE_GLOBAL_DATA_PTR;

extern void print_vcma9_info(void);
extern int vcma9_cantest(int);
extern int vcma9_nandtest(void);
extern int vcma9_nanderase(void);
extern int vcma9_nandread(ulong);
extern int vcma9_nandwrite(ulong);
extern int vcma9_dactest(int);
extern int do_mplcommon(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);

/* ------------------------------------------------------------------------- */

int do_vcma9(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
{
	if (strcmp(argv[1], "info") == 0)
	{
		print_vcma9_info();
		return 0;
	}
#if defined(CONFIG_DRIVER_CS8900)
	if (strcmp(argv[1], "cs8900") == 0) {
		if (strcmp(argv[2], "read") == 0) {
			uchar addr; ushort data;

			addr = simple_strtoul(argv[3], NULL, 16);
			cs8900_e2prom_read(addr, &data);
			printf("0x%2.2X: 0x%4.4X\n", addr, data);
		} else if (strcmp(argv[2], "write") == 0) {
			uchar addr; ushort data;

			addr = simple_strtoul(argv[3], NULL, 16);
			data = simple_strtoul(argv[4], NULL, 16);
			cs8900_e2prom_write(addr, data);
		} else if (strcmp(argv[2], "setaddr") == 0) {
			uchar addr, i, csum; ushort data;

			/* check for valid ethaddr */
			for (i = 0; i < 6; i++)
				if (gd->bd->bi_enetaddr[i] != 0)
					break;

			if (i < 6) {
				addr = 1;
				data = 0x2158;
				cs8900_e2prom_write(addr, data);
				csum = cs8900_chksum(data);
				addr++;
				for (i = 0; i < 6; i+=2) {
					data = gd->bd->bi_enetaddr[i+1] << 8 |
					       gd->bd->bi_enetaddr[i];
					cs8900_e2prom_write(addr, data);
					csum += cs8900_chksum(data);
					addr++;
				}
				/* calculate header link byte */
				data = 0xA100 | (addr * 2);
				cs8900_e2prom_write(0, data);
				csum += cs8900_chksum(data);
				/* write checksum word */
				cs8900_e2prom_write(addr, (0 - csum) << 8);
			} else {
				puts("\nplease defined 'ethaddr'\n");
			}
		} else if (strcmp(argv[2], "dump") == 0) {
			uchar addr = 0, endaddr, csum; ushort data;

			puts("Dump of CS8900 config device: ");
			cs8900_e2prom_read(addr, &data);
			if ((data & 0xE000) == 0xA000) {
				endaddr = (data & 0x00FF) / 2;
				csum = cs8900_chksum(data);
				for (addr = 1; addr <= endaddr; addr++) {
					cs8900_e2prom_read(addr, &data);
					printf("\n0x%2.2X: 0x%4.4X", addr, data);
					csum += cs8900_chksum(data);
				}
				printf("\nChecksum: %s", (csum == 0) ? "ok" : "wrong");
			} else {
				puts("no valid config found");
			}
			puts("\n");
		}

		return 0;
	}
#endif
#if 0
	if (strcmp(argv[1], "cantest") == 0) {
		if (argc >= 3)
			vcma9_cantest(strcmp(argv[2], "s") ? 0 : 1);
		else
			vcma9_cantest(0);
		return 0;
	}
	if (strcmp(argv[1], "nandtest") == 0) {
		vcma9_nandtest();
		return 0;
	}
	if (strcmp(argv[1], "nanderase") == 0) {
		vcma9_nanderase();
		return 0;
	}
	if (strcmp(argv[1], "nandread") == 0) {
		ulong offset = 0;

		if (argc >= 3)
			offset = simple_strtoul(argv[2], NULL, 16);

		vcma9_nandread(offset);
		return 0;
	}
	if (strcmp(argv[1], "nandwrite") == 0) {
		ulong offset = 0;

		if (argc >= 3)
			offset = simple_strtoul(argv[2], NULL, 16);

		vcma9_nandwrite(offset);
		return 0;
	}
	if (strcmp(argv[1], "dactest") == 0) {
		if (argc >= 3)
			vcma9_dactest(strcmp(argv[2], "s") ? 0 : 1);
		else
		vcma9_dactest(0);
		return 0;
	}
#endif

	return (do_mplcommon(cmdtp, flag, argc, argv));
}

U_BOOT_CMD(
	vcma9, 6, 1, do_vcma9,
	"vcma9   - VCMA9 specific commands\n",
	"flash mem [SrcAddr]\n    - updates U-Boot with image in memory\n"
);
Commit	Line	Data
1cb8e980 WD	1	/*
	2	* (C) Copyright 2002
	3	* Denis Peter, MPL AG Switzerland, d.peter@mpl.ch
	4	*
	5	* adapted for VCMA9
	6	* David Mueller, ELSOFT AG, d.mueller@elsoft.ch
	7	*
	8	* See file CREDITS for list of people who contributed to this
	9	* project.
	10	*
	11	* This program is free software; you can redistribute it and/or
	12	* modify it under the terms of the GNU General Public License as
	13	* published by the Free Software Foundation; either version 2 of
	14	* the License, or (at your option) any later version.
	15	*
	16	* This program is distributed in the hope that it will be useful,
	17	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	18	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	19	* GNU General Public License for more details.
	20	*
	21	* You should have received a copy of the GNU General Public License
	22	* along with this program; if not, write to the Free Software
	23	* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
	24	* MA 02111-1307 USA
	25	*
	26	*/
	27
	28	#include <common.h>
	29	#include <command.h>
	30	#include "vcma9.h"
	31	#include "../common/common_util.h"
	32
	33	#if defined(CONFIG_DRIVER_CS8900)
2439e4bf	34	#include <../drivers/net/cs8900.h>
1cb8e980 WD	35
	36	static uchar cs8900_chksum(ushort data)
	37	{
	38	return((data >> 8) & 0x00FF) + (data & 0x00FF);
	39	}
	40
	41	#endif
	42
1218abf1 WD	43	DECLARE_GLOBAL_DATA_PTR;
1218abf1 WD	44
1cb8e980	45	extern void print_vcma9_info(void);
531716e1	46	extern int vcma9_cantest(int);
1cb8e980	47	extern int vcma9_nandtest(void);
531716e1 WD	48	extern int vcma9_nanderase(void);
	49	extern int vcma9_nandread(ulong);
	50	extern int vcma9_nandwrite(ulong);
	51	extern int vcma9_dactest(int);
1cb8e980 WD	52	extern int do_mplcommon(cmd_tbl_t cmdtp, int flag, int argc, char argv[]);
	53
	54	/* ------------------------------------------------------------------------- */
	55
	56	int do_vcma9(cmd_tbl_t cmdtp, int flag, int argc, char argv[])
	57	{
1cb8e980 WD	58	if (strcmp(argv[1], "info") == 0)
	59	{
	60	print_vcma9_info();
53677ef1 WD	61	return 0;
53677ef1 WD	62	}
1cb8e980	63	#if defined(CONFIG_DRIVER_CS8900)
a2663ea4	64	if (strcmp(argv[1], "cs8900") == 0) {
1cb8e980 WD	65	if (strcmp(argv[2], "read") == 0) {
	66	uchar addr; ushort data;
	67
	68	addr = simple_strtoul(argv[3], NULL, 16);
	69	cs8900_e2prom_read(addr, &data);
	70	printf("0x%2.2X: 0x%4.4X\n", addr, data);
	71	} else if (strcmp(argv[2], "write") == 0) {
	72	uchar addr; ushort data;
	73
	74	addr = simple_strtoul(argv[3], NULL, 16);
	75	data = simple_strtoul(argv[4], NULL, 16);
	76	cs8900_e2prom_write(addr, data);
	77	} else if (strcmp(argv[2], "setaddr") == 0) {
	78	uchar addr, i, csum; ushort data;
	79
	80	/* check for valid ethaddr */
	81	for (i = 0; i < 6; i++)
	82	if (gd->bd->bi_enetaddr[i] != 0)
	83	break;
	84
	85	if (i < 6) {
	86	addr = 1;
	87	data = 0x2158;
	88	cs8900_e2prom_write(addr, data);
	89	csum = cs8900_chksum(data);
	90	addr++;
	91	for (i = 0; i < 6; i+=2) {
	92	data = gd->bd->bi_enetaddr[i+1] << 8 \|
	93	gd->bd->bi_enetaddr[i];
	94	cs8900_e2prom_write(addr, data);
	95	csum += cs8900_chksum(data);
	96	addr++;
	97	}
	98	/* calculate header link byte */
	99	data = 0xA100 \| (addr * 2);
	100	cs8900_e2prom_write(0, data);
	101	csum += cs8900_chksum(data);
	102	/* write checksum word */
	103	cs8900_e2prom_write(addr, (0 - csum) << 8);
	104	} else {
a2663ea4	105	puts("\nplease defined 'ethaddr'\n");
1cb8e980 WD	106	}
1cb8e980 WD	107	} else if (strcmp(argv[2], "dump") == 0) {
06d01dbe	108	uchar addr = 0, endaddr, csum; ushort data;
1cb8e980	109
a2663ea4	110	puts("Dump of CS8900 config device: ");
1cb8e980 WD	111	cs8900_e2prom_read(addr, &data);
	112	if ((data & 0xE000) == 0xA000) {
	113	endaddr = (data & 0x00FF) / 2;
	114	csum = cs8900_chksum(data);
	115	for (addr = 1; addr <= endaddr; addr++) {
	116	cs8900_e2prom_read(addr, &data);
	117	printf("\n0x%2.2X: 0x%4.4X", addr, data);
	118	csum += cs8900_chksum(data);
	119	}
	120	printf("\nChecksum: %s", (csum == 0) ? "ok" : "wrong");
	121	} else {
a2663ea4	122	puts("no valid config found");
1cb8e980	123	}
a2663ea4	124	puts("\n");
1cb8e980 WD	125	}
	126
	127	return 0;
	128	}
	129	#endif
	130	#if 0
	131	if (strcmp(argv[1], "cantest") == 0) {
531716e1 WD	132	if (argc >= 3)
	133	vcma9_cantest(strcmp(argv[2], "s") ? 0 : 1);
	134	else
	135	vcma9_cantest(0);
1cb8e980 WD	136	return 0;
	137	}
	138	if (strcmp(argv[1], "nandtest") == 0) {
	139	vcma9_nandtest();
	140	return 0;
	141	}
531716e1 WD	142	if (strcmp(argv[1], "nanderase") == 0) {
	143	vcma9_nanderase();
	144	return 0;
	145	}
	146	if (strcmp(argv[1], "nandread") == 0) {
	147	ulong offset = 0;
	148
	149	if (argc >= 3)
	150	offset = simple_strtoul(argv[2], NULL, 16);
	151
	152	vcma9_nandread(offset);
	153	return 0;
	154	}
	155	if (strcmp(argv[1], "nandwrite") == 0) {
	156	ulong offset = 0;
	157
	158	if (argc >= 3)
	159	offset = simple_strtoul(argv[2], NULL, 16);
	160
	161	vcma9_nandwrite(offset);
	162	return 0;
	163	}
1cb8e980	164	if (strcmp(argv[1], "dactest") == 0) {
531716e1 WD	165	if (argc >= 3)
	166	vcma9_dactest(strcmp(argv[2], "s") ? 0 : 1);
	167	else
	168	vcma9_dactest(0);
1cb8e980 WD	169	return 0;
	170	}
	171	#endif
	172
	173	return (do_mplcommon(cmdtp, flag, argc, argv));
	174	}
531716e1 WD	175
	176	U_BOOT_CMD(
	177	vcma9, 6, 1, do_vcma9,
	178	"vcma9 - VCMA9 specific commands\n",
	179	"flash mem [SrcAddr]\n - updates U-Boot with image in memory\n"
	180	);