[u-boot.git] / examples / api / demo.c

// SPDX-License-Identifier: GPL-2.0+
/*
 * (C) Copyright 2007-2008 Semihalf
 *
 * Written by: Rafal Jaworowski <[email protected]>
 */

#include <common.h>
#include <linux/types.h>
#include <api_public.h>

#include "glue.h"

#define errf(fmt, args...) do { printf("ERROR @ %s(): ", __func__); printf(fmt, ##args); } while (0)

#define BUF_SZ		2048
#define WAIT_SECS	5

void	test_dump_buf(void *, int);
void	test_dump_di(int);
void	test_dump_si(struct sys_info *);
void	test_dump_sig(struct api_signature *);

static char buf[BUF_SZ];

int main(int argc, char * const argv[])
{
	int rv = 0, h, i, j, devs_no;
	struct api_signature *sig = NULL;
	ulong start, now;
	struct device_info *di;
	lbasize_t rlen;
	struct display_info disinfo;

	if (!api_search_sig(&sig))
		return -1;

	syscall_ptr = sig->syscall;
	if (syscall_ptr == NULL)
		return -2;

	if (sig->version > API_SIG_VERSION)
		return -3;

	printf("API signature found @%x\n", (unsigned int)sig);
	test_dump_sig(sig);

	printf("\n*** Consumer API test ***\n");
	printf("syscall ptr 0x%08x@%08x\n", (unsigned int)syscall_ptr,
		(unsigned int)&syscall_ptr);

	/* console activities */
	ub_putc('B');

	printf("*** Press any key to continue ***\n");
	printf("got char 0x%x\n", ub_getc());

	/* system info */
	test_dump_si(ub_get_sys_info());

	/* timing */
	printf("\n*** Timing - wait a couple of secs ***\n");
	start = ub_get_timer(0);
	printf("\ntime: start %lu\n\n", start);
	for (i = 0; i < WAIT_SECS; i++)
		for (j = 0; j < 1000; j++)
			ub_udelay(1000);	/* wait 1 ms */

	/* this is the number of milliseconds that passed from ub_get_timer(0) */
	now = ub_get_timer(start);
	printf("\ntime: now %lu\n\n", now);

	/* enumerate devices */
	printf("\n*** Enumerate devices ***\n");
	devs_no = ub_dev_enum();

	printf("Number of devices found: %d\n", devs_no);
	if (devs_no == 0)
		return -1;

	printf("\n*** Show devices ***\n");
	for (i = 0; i < devs_no; i++) {
		test_dump_di(i);
		printf("\n");
	}

	printf("\n*** Operations on devices ***\n");

	/* test opening a device already opened */
	h = 0;
	if ((rv = ub_dev_open(h)) != 0) {
		errf("open device %d error %d\n", h, rv);
		return -1;
	}
	if ((rv = ub_dev_open(h)) != 0)
		errf("open device %d error %d\n", h, rv);

	ub_dev_close(h);

	/* test storage */
	printf("Trying storage devices...\n");
	for (i = 0; i < devs_no; i++) {
		di = ub_dev_get(i);

		if (di->type & DEV_TYP_STOR)
			break;

	}
	if (i == devs_no)
		printf("No storage devices available\n");
	else {
		memset(buf, 0, BUF_SZ);

		if ((rv = ub_dev_open(i)) != 0)
			errf("open device %d error %d\n", i, rv);

		else if ((rv = ub_dev_read(i, buf, 1, 0, &rlen)) != 0)
			errf("could not read from device %d, error %d\n", i, rv);
		else {
			printf("Sector 0 dump (512B):\n");
			test_dump_buf(buf, 512);
		}

		ub_dev_close(i);
	}

	/* test networking */
	printf("Trying network devices...\n");
	for (i = 0; i < devs_no; i++) {
		di = ub_dev_get(i);

		if (di->type == DEV_TYP_NET)
			break;

	}
	if (i == devs_no)
		printf("No network devices available\n");
	else {
		if ((rv = ub_dev_open(i)) != 0)
			errf("open device %d error %d\n", i, rv);
		else if ((rv = ub_dev_send(i, &buf, 2048)) != 0)
			errf("could not send to device %d, error %d\n", i, rv);

		ub_dev_close(i);
	}

	if (ub_dev_close(h) != 0)
		errf("could not close device %d\n", h);

	printf("\n*** Env vars ***\n");

	printf("ethact = %s\n", ub_env_get("ethact"));
	printf("old fileaddr = %s\n", ub_env_get("fileaddr"));
	ub_env_set("fileaddr", "deadbeef");
	printf("new fileaddr = %s\n", ub_env_get("fileaddr"));

	const char *env = NULL;

	while ((env = ub_env_enum(env)) != NULL)
		printf("%s = %s\n", env, ub_env_get(env));

	printf("\n*** Display ***\n");

	if (ub_display_get_info(DISPLAY_TYPE_LCD, &disinfo)) {
		printf("LCD info: failed\n");
	} else {
		printf("LCD info:\n");
		printf("  pixel width:  %d\n", disinfo.pixel_width);
		printf("  pixel height: %d\n", disinfo.pixel_height);
		printf("  screen rows:  %d\n", disinfo.screen_rows);
		printf("  screen cols:  %d\n", disinfo.screen_cols);
	}
	if (ub_display_get_info(DISPLAY_TYPE_VIDEO, &disinfo)) {
		printf("video info: failed\n");
	} else {
		printf("video info:\n");
		printf("  pixel width:  %d\n", disinfo.pixel_width);
		printf("  pixel height: %d\n", disinfo.pixel_height);
		printf("  screen rows:  %d\n", disinfo.screen_rows);
		printf("  screen cols:  %d\n", disinfo.screen_cols);
	}

	printf("*** Press any key to continue ***\n");
	printf("got char 0x%x\n", ub_getc());

	/*
	 * This only clears messages on screen, not on serial port. It is
	 * equivalent to a no-op if no display is available.
	 */
	ub_display_clear();

	/* reset */
	printf("\n*** Resetting board ***\n");
	ub_reset();
	printf("\nHmm, reset returned...?!\n");

	return rv;
}

void test_dump_sig(struct api_signature *sig)
{
	printf("signature:\n");
	printf("  version\t= %d\n", sig->version);
	printf("  checksum\t= 0x%08x\n", sig->checksum);
	printf("  sc entry\t= 0x%08x\n", (unsigned int)sig->syscall);
}

void test_dump_si(struct sys_info *si)
{
	int i;

	printf("sys info:\n");
	printf("  clkbus\t= 0x%08x\n", (unsigned int)si->clk_bus);
	printf("  clkcpu\t= 0x%08x\n", (unsigned int)si->clk_cpu);
	printf("  bar\t\t= 0x%08x\n", (unsigned int)si->bar);

	printf("---\n");
	for (i = 0; i < si->mr_no; i++) {
		if (si->mr[i].flags == 0)
			break;

		printf("  start\t= 0x%08lx\n", si->mr[i].start);
		printf("  size\t= 0x%08lx\n", si->mr[i].size);

		switch(si->mr[i].flags & 0x000F) {
			case MR_ATTR_FLASH:
				printf("  type FLASH\n");
				break;
			case MR_ATTR_DRAM:
				printf("  type DRAM\n");
				break;
			case MR_ATTR_SRAM:
				printf("  type SRAM\n");
				break;
			default:
				printf("  type UNKNOWN\n");
		}
		printf("---\n");
	}
}

static char *test_stor_typ(int type)
{
	if (type & DT_STOR_IDE)
		return "IDE";

	if (type & DT_STOR_MMC)
		return "MMC";

	if (type & DT_STOR_SATA)
		return "SATA";

	if (type & DT_STOR_SCSI)
		return "SCSI";

	if (type & DT_STOR_USB)
		return "USB";

	return "Unknown";
}

void test_dump_buf(void *buf, int len)
{
	int i;
	int line_counter = 0;
	int sep_flag = 0;
	int addr = 0;

	printf("%07x:\t", addr);

	for (i = 0; i < len; i++) {
		if (line_counter++ > 15) {
			line_counter = 0;
			sep_flag = 0;
			addr += 16;
			i--;
			printf("\n%07x:\t", addr);
			continue;
		}

		if (sep_flag++ > 1) {
			sep_flag = 1;
			printf(" ");
		}

		printf("%02x", *((char *)buf++));
	}

	printf("\n");
}

void test_dump_di(int handle)
{
	int i;
	struct device_info *di = ub_dev_get(handle);

	printf("device info (%d):\n", handle);
	printf("  cookie\t= 0x%08x\n", (uint32_t)di->cookie);
	printf("  type\t\t= 0x%08x\n", di->type);

	if (di->type == DEV_TYP_NET) {
		printf("  hwaddr\t= ");
		for (i = 0; i < 6; i++)
			printf("%02x ", di->di_net.hwaddr[i]);

		printf("\n");

	} else if (di->type & DEV_TYP_STOR) {
		printf("  type\t\t= %s\n", test_stor_typ(di->type));
		printf("  blk size\t\t= %d\n", (unsigned int)di->di_stor.block_size);
		printf("  blk count\t\t= %d\n", (unsigned int)di->di_stor.block_count);
	}
}
Commit	Line	Data
83d290c5	1	// SPDX-License-Identifier: GPL-2.0+
500856eb	2	/*
f2302d44	3	* (C) Copyright 2007-2008 Semihalf
500856eb RJ	4	*
500856eb RJ	5	* Written by: Rafal Jaworowski <[email protected]>
500856eb RJ	6	*/
	7
	8	#include <common.h>
	9	#include <linux/types.h>
	10	#include <api_public.h>
	11
	12	#include "glue.h"
	13
	14	#define errf(fmt, args...) do { printf("ERROR @ %s(): ", __func__); printf(fmt, ##args); } while (0)
	15
f2302d44 SR	16	#define BUF_SZ 2048
	17	#define WAIT_SECS 5
	18
	19	void test_dump_buf(void *, int);
500856eb	20	void test_dump_di(int);
f2302d44	21	void test_dump_si(struct sys_info *);
500856eb RJ	22	void test_dump_sig(struct api_signature *);
500856eb RJ	23
f2302d44	24	static char buf[BUF_SZ];
500856eb	25
54841ab5	26	int main(int argc, char * const argv[])
500856eb	27	{
923aa481	28	int rv = 0, h, i, j, devs_no;
500856eb RJ	29	struct api_signature *sig = NULL;
	30	ulong start, now;
	31	struct device_info *di;
923aa481	32	lbasize_t rlen;
a2a5729f	33	struct display_info disinfo;
500856eb RJ	34
	35	if (!api_search_sig(&sig))
	36	return -1;
	37
	38	syscall_ptr = sig->syscall;
	39	if (syscall_ptr == NULL)
	40	return -2;
	41
	42	if (sig->version > API_SIG_VERSION)
	43	return -3;
	44
f2302d44	45	printf("API signature found @%x\n", (unsigned int)sig);
500856eb RJ	46	test_dump_sig(sig);
	47
	48	printf("\n* Consumer API test *\n");
f2302d44 SR	49	printf("syscall ptr 0x%08x@%08x\n", (unsigned int)syscall_ptr,
f2302d44 SR	50	(unsigned int)&syscall_ptr);
500856eb RJ	51
	52	/* console activities */
	53	ub_putc('B');
	54
	55	printf("* Press any key to continue *\n");
	56	printf("got char 0x%x\n", ub_getc());
	57
	58	/* system info */
	59	test_dump_si(ub_get_sys_info());
	60
	61	/* timing */
	62	printf("\n* Timing - wait a couple of secs *\n");
	63	start = ub_get_timer(0);
	64	printf("\ntime: start %lu\n\n", start);
	65	for (i = 0; i < WAIT_SECS; i++)
	66	for (j = 0; j < 1000; j++)
	67	ub_udelay(1000); /* wait 1 ms */
	68
	69	/* this is the number of milliseconds that passed from ub_get_timer(0) */
	70	now = ub_get_timer(start);
	71	printf("\ntime: now %lu\n\n", now);
	72
	73	/* enumerate devices */
	74	printf("\n* Enumerate devices *\n");
	75	devs_no = ub_dev_enum();
d3a6532c	76
500856eb RJ	77	printf("Number of devices found: %d\n", devs_no);
	78	if (devs_no == 0)
	79	return -1;
	80
500856eb RJ	81	printf("\n* Show devices *\n");
	82	for (i = 0; i < devs_no; i++) {
	83	test_dump_di(i);
	84	printf("\n");
	85	}
	86
	87	printf("\n* Operations on devices *\n");
	88
	89	/* test opening a device already opened */
	90	h = 0;
	91	if ((rv = ub_dev_open(h)) != 0) {
	92	errf("open device %d error %d\n", h, rv);
	93	return -1;
	94	}
	95	if ((rv = ub_dev_open(h)) != 0)
	96	errf("open device %d error %d\n", h, rv);
	97
	98	ub_dev_close(h);
	99
	100	/* test storage */
	101	printf("Trying storage devices...\n");
	102	for (i = 0; i < devs_no; i++) {
	103	di = ub_dev_get(i);
	104
	105	if (di->type & DEV_TYP_STOR)
	106	break;
	107
	108	}
	109	if (i == devs_no)
	110	printf("No storage devices available\n");
	111	else {
f2302d44 SR	112	memset(buf, 0, BUF_SZ);
f2302d44 SR	113
500856eb RJ	114	if ((rv = ub_dev_open(i)) != 0)
500856eb RJ	115	errf("open device %d error %d\n", i, rv);
f2302d44	116
923aa481	117	else if ((rv = ub_dev_read(i, buf, 1, 0, &rlen)) != 0)
500856eb	118	errf("could not read from device %d, error %d\n", i, rv);
44a94e59 RJ	119	else {
	120	printf("Sector 0 dump (512B):\n");
	121	test_dump_buf(buf, 512);
	122	}
f2302d44	123
500856eb RJ	124	ub_dev_close(i);
	125	}
	126
	127	/* test networking */
	128	printf("Trying network devices...\n");
	129	for (i = 0; i < devs_no; i++) {
	130	di = ub_dev_get(i);
	131
	132	if (di->type == DEV_TYP_NET)
	133	break;
	134
	135	}
	136	if (i == devs_no)
	137	printf("No network devices available\n");
	138	else {
	139	if ((rv = ub_dev_open(i)) != 0)
	140	errf("open device %d error %d\n", i, rv);
	141	else if ((rv = ub_dev_send(i, &buf, 2048)) != 0)
	142	errf("could not send to device %d, error %d\n", i, rv);
	143
	144	ub_dev_close(i);
	145	}
	146
	147	if (ub_dev_close(h) != 0)
	148	errf("could not close device %d\n", h);
	149
	150	printf("\n* Env vars *\n");
	151
	152	printf("ethact = %s\n", ub_env_get("ethact"));
	153	printf("old fileaddr = %s\n", ub_env_get("fileaddr"));
	154	ub_env_set("fileaddr", "deadbeef");
	155	printf("new fileaddr = %s\n", ub_env_get("fileaddr"));
	156
	157	const char *env = NULL;
	158
	159	while ((env = ub_env_enum(env)) != NULL)
	160	printf("%s = %s\n", env, ub_env_get(env));
	161
a2a5729f CLC	162	printf("\n* Display *\n");
	163
	164	if (ub_display_get_info(DISPLAY_TYPE_LCD, &disinfo)) {
	165	printf("LCD info: failed\n");
	166	} else {
	167	printf("LCD info:\n");
	168	printf(" pixel width: %d\n", disinfo.pixel_width);
	169	printf(" pixel height: %d\n", disinfo.pixel_height);
	170	printf(" screen rows: %d\n", disinfo.screen_rows);
	171	printf(" screen cols: %d\n", disinfo.screen_cols);
	172	}
	173	if (ub_display_get_info(DISPLAY_TYPE_VIDEO, &disinfo)) {
	174	printf("video info: failed\n");
	175	} else {
	176	printf("video info:\n");
	177	printf(" pixel width: %d\n", disinfo.pixel_width);
	178	printf(" pixel height: %d\n", disinfo.pixel_height);
	179	printf(" screen rows: %d\n", disinfo.screen_rows);
	180	printf(" screen cols: %d\n", disinfo.screen_cols);
	181	}
	182
	183	printf("* Press any key to continue *\n");
	184	printf("got char 0x%x\n", ub_getc());
	185
	186	/*
	187	* This only clears messages on screen, not on serial port. It is
	188	* equivalent to a no-op if no display is available.
	189	*/
	190	ub_display_clear();
	191
500856eb	192	/* reset */
44a94e59	193	printf("\n* Resetting board *\n");
500856eb RJ	194	ub_reset();
	195	printf("\nHmm, reset returned...?!\n");
	196
	197	return rv;
	198	}
	199
	200	void test_dump_sig(struct api_signature *sig)
	201	{
	202	printf("signature:\n");
	203	printf(" version\t= %d\n", sig->version);
	204	printf(" checksum\t= 0x%08x\n", sig->checksum);
f2302d44	205	printf(" sc entry\t= 0x%08x\n", (unsigned int)sig->syscall);
500856eb RJ	206	}
	207
	208	void test_dump_si(struct sys_info *si)
	209	{
	210	int i;
	211
	212	printf("sys info:\n");
f2302d44 SR	213	printf(" clkbus\t= 0x%08x\n", (unsigned int)si->clk_bus);
	214	printf(" clkcpu\t= 0x%08x\n", (unsigned int)si->clk_cpu);
	215	printf(" bar\t\t= 0x%08x\n", (unsigned int)si->bar);
500856eb RJ	216
	217	printf("---\n");
	218	for (i = 0; i < si->mr_no; i++) {
	219	if (si->mr[i].flags == 0)
	220	break;
	221
	222	printf(" start\t= 0x%08lx\n", si->mr[i].start);
	223	printf(" size\t= 0x%08lx\n", si->mr[i].size);
	224
	225	switch(si->mr[i].flags & 0x000F) {
	226	case MR_ATTR_FLASH:
	227	printf(" type FLASH\n");
	228	break;
	229	case MR_ATTR_DRAM:
	230	printf(" type DRAM\n");
	231	break;
	232	case MR_ATTR_SRAM:
	233	printf(" type SRAM\n");
	234	break;
	235	default:
	236	printf(" type UNKNOWN\n");
	237	}
	238	printf("---\n");
	239	}
	240	}
	241
f2302d44	242	static char *test_stor_typ(int type)
500856eb RJ	243	{
	244	if (type & DT_STOR_IDE)
	245	return "IDE";
	246
f2302d44 SR	247	if (type & DT_STOR_MMC)
	248	return "MMC";
	249
	250	if (type & DT_STOR_SATA)
	251	return "SATA";
	252
500856eb RJ	253	if (type & DT_STOR_SCSI)
	254	return "SCSI";
	255
	256	if (type & DT_STOR_USB)
	257	return "USB";
	258
500856eb RJ	259	return "Unknown";
	260	}
	261
f2302d44 SR	262	void test_dump_buf(void *buf, int len)
	263	{
	264	int i;
	265	int line_counter = 0;
	266	int sep_flag = 0;
	267	int addr = 0;
	268
	269	printf("%07x:\t", addr);
	270
	271	for (i = 0; i < len; i++) {
	272	if (line_counter++ > 15) {
	273	line_counter = 0;
	274	sep_flag = 0;
	275	addr += 16;
	276	i--;
	277	printf("\n%07x:\t", addr);
	278	continue;
	279	}
	280
	281	if (sep_flag++ > 1) {
	282	sep_flag = 1;
	283	printf(" ");
	284	}
	285
	286	printf("%02x", ((char )buf++));
	287	}
	288
	289	printf("\n");
	290	}
	291
500856eb RJ	292	void test_dump_di(int handle)
	293	{
	294	int i;
	295	struct device_info *di = ub_dev_get(handle);
	296
	297	printf("device info (%d):\n", handle);
	298	printf(" cookie\t= 0x%08x\n", (uint32_t)di->cookie);
	299	printf(" type\t\t= 0x%08x\n", di->type);
	300
	301	if (di->type == DEV_TYP_NET) {
	302	printf(" hwaddr\t= ");
	303	for (i = 0; i < 6; i++)
	304	printf("%02x ", di->di_net.hwaddr[i]);
	305
	306	printf("\n");
	307
	308	} else if (di->type & DEV_TYP_STOR) {
	309	printf(" type\t\t= %s\n", test_stor_typ(di->type));
f2302d44 SR	310	printf(" blk size\t\t= %d\n", (unsigned int)di->di_stor.block_size);
f2302d44 SR	311	printf(" blk count\t\t= %d\n", (unsigned int)di->di_stor.block_count);
500856eb RJ	312	}
500856eb RJ	313	}