[thirdparty/u-boot.git] / common / menu.c

// SPDX-License-Identifier: GPL-2.0+
/*
 * Copyright 2010-2011 Calxeda, Inc.
 */

#include <common.h>
#include <cli.h>
#include <malloc.h>
#include <errno.h>
#include <linux/list.h>

#include "menu.h"

/*
 * Internally, each item in a menu is represented by a struct menu_item.
 *
 * These items will be alloc'd and initialized by menu_item_add and destroyed
 * by menu_item_destroy, and the consumer of the interface never sees that
 * this struct is used at all.
 */
struct menu_item {
	char *key;
	void *data;
	struct list_head list;
};

/*
 * The menu is composed of a list of items along with settings and callbacks
 * provided by the user. An incomplete definition of this struct is available
 * in menu.h, but the full definition is here to prevent consumers from
 * relying on its contents.
 */
struct menu {
	struct menu_item *default_item;
	int timeout;
	char *title;
	int prompt;
	void (*item_data_print)(void *);
	char *(*item_choice)(void *);
	void *item_choice_data;
	struct list_head items;
};

/*
 * An iterator function for menu items. callback will be called for each item
 * in m, with m, a pointer to the item, and extra being passed to callback. If
 * callback returns a value other than NULL, iteration stops and the value
 * return by callback is returned from menu_items_iter.  This allows it to be
 * used for search type operations. It is also safe for callback to remove the
 * item from the list of items.
 */
static inline void *menu_items_iter(struct menu *m,
		void *(*callback)(struct menu *, struct menu_item *, void *),
		void *extra)
{
	struct list_head *pos, *n;
	struct menu_item *item;
	void *ret;

	list_for_each_safe(pos, n, &m->items) {
		item = list_entry(pos, struct menu_item, list);

		ret = callback(m, item, extra);

		if (ret)
			return ret;
	}

	return NULL;
}

/*
 * Print a menu_item. If the consumer provided an item_data_print function
 * when creating the menu, call it with a pointer to the item's private data.
 * Otherwise, print the key of the item.
 */
static inline void *menu_item_print(struct menu *m,
				struct menu_item *item,
				void *extra)
{
	if (!m->item_data_print) {
		puts(item->key);
		putc('\n');
	} else {
		m->item_data_print(item->data);
	}

	return NULL;
}

/*
 * Free the memory used by a menu item. This includes the memory used by its
 * key.
 */
static inline void *menu_item_destroy(struct menu *m,
				struct menu_item *item,
				void *extra)
{
	if (item->key)
		free(item->key);

	free(item);

	return NULL;
}

__weak void menu_display_statusline(struct menu *m)
{
}

/*
 * Display a menu so the user can make a choice of an item. First display its
 * title, if any, and then each item in the menu.
 */
static inline void menu_display(struct menu *m)
{
	if (m->title) {
		puts(m->title);
		putc('\n');
	}
	menu_display_statusline(m);

	menu_items_iter(m, menu_item_print, NULL);
}

/*
 * Check if an item's key matches a provided string, pointed to by extra. If
 * extra is NULL, an item with a NULL key will match. Otherwise, the item's
 * key has to match according to strcmp.
 *
 * This is called via menu_items_iter, so it returns a pointer to the item if
 * the key matches, and returns NULL otherwise.
 */
static inline void *menu_item_key_match(struct menu *m,
			struct menu_item *item, void *extra)
{
	char *item_key = extra;

	if (!item_key || !item->key) {
		if (item_key == item->key)
			return item;

		return NULL;
	}

	if (strcmp(item->key, item_key) == 0)
		return item;

	return NULL;
}

/*
 * Find the first item with a key matching item_key, if any exists.
 */
static inline struct menu_item *menu_item_by_key(struct menu *m,
							char *item_key)
{
	return menu_items_iter(m, menu_item_key_match, item_key);
}

/*
 * Set *choice to point to the default item's data, if any default item was
 * set, and returns 1. If no default item was set, returns -ENOENT.
 */
int menu_default_choice(struct menu *m, void **choice)
{
	if (m->default_item) {
		*choice = m->default_item->data;
		return 1;
	}

	return -ENOENT;
}

/*
 * Displays the menu and asks the user to choose an item. *choice will point
 * to the private data of the item the user chooses. The user makes a choice
 * by inputting a string matching the key of an item. Invalid choices will
 * cause the user to be prompted again, repeatedly, until the user makes a
 * valid choice. The user can exit the menu without making a choice via ^c.
 *
 * Returns 1 if the user made a choice, or -EINTR if they bail via ^c.
 */
static inline int menu_interactive_choice(struct menu *m, void **choice)
{
	char cbuf[CONFIG_SYS_CBSIZE];
	struct menu_item *choice_item = NULL;
	int readret;

	while (!choice_item) {
		cbuf[0] = '\0';

		menu_display(m);

		if (!m->item_choice) {
			readret = cli_readline_into_buffer("Enter choice: ",
							   cbuf,
							   m->timeout / 10);

			if (readret >= 0) {
				choice_item = menu_item_by_key(m, cbuf);
				if (!choice_item)
					printf("%s not found\n", cbuf);
			} else if (readret == -1)  {
				printf("<INTERRUPT>\n");
				return -EINTR;
			} else {
				return menu_default_choice(m, choice);
			}
		} else {
			char *key = m->item_choice(m->item_choice_data);

			if (key)
				choice_item = menu_item_by_key(m, key);
		}

		if (!choice_item)
			m->timeout = 0;
	}

	*choice = choice_item->data;

	return 1;
}

/*
 * menu_default_set() - Sets the default choice for the menu. This is safe to
 * call more than once on a menu.
 *
 * m - Points to a menu created by menu_create().
 *
 * item_key - Points to a string that, when compared using strcmp, matches the
 * key for an existing item in the menu.
 *
 * Returns 1 if successful, -EINVAL if m is NULL, or -ENOENT if no item with a
 * key matching item_key is found.
 */
int menu_default_set(struct menu *m, char *item_key)
{
	struct menu_item *item;

	if (!m)
		return -EINVAL;

	item = menu_item_by_key(m, item_key);

	if (!item)
		return -ENOENT;

	m->default_item = item;

	return 1;
}

/*
 * menu_get_choice() - Returns the user's selected menu entry, or the default
 * if the menu is set to not prompt or the timeout expires. This is safe to
 * call more than once.
 *
 * m - Points to a menu created by menu_create().
 *
 * choice - Points to a location that will store a pointer to the selected
 * menu item. If no item is selected or there is an error, no value will be
 * written at the location it points to.
 *
 * Returns 1 if successful, -EINVAL if m or choice is NULL, -ENOENT if no
 * default has been set and the menu is set to not prompt or the timeout
 * expires, or -EINTR if the user exits the menu via ^c.
 */
int menu_get_choice(struct menu *m, void **choice)
{
	if (!m || !choice)
		return -EINVAL;

	if (!m->prompt)
		return menu_default_choice(m, choice);

	return menu_interactive_choice(m, choice);
}

/*
 * menu_item_add() - Adds or replaces a menu item. Note that this replaces the
 * data of an item if it already exists, but doesn't change the order of the
 * item.
 *
 * m - Points to a menu created by menu_create().
 *
 * item_key - Points to a string that will uniquely identify the item.  The
 * string will be copied to internal storage, and is safe to discard after
 * passing to menu_item_add.
 *
 * item_data - An opaque pointer associated with an item. It is never
 * dereferenced internally, but will be passed to the item_data_print, and
 * will be returned from menu_get_choice if the menu item is selected.
 *
 * Returns 1 if successful, -EINVAL if m is NULL, or -ENOMEM if there is
 * insufficient memory to add the menu item.
 */
int menu_item_add(struct menu *m, char *item_key, void *item_data)
{
	struct menu_item *item;

	if (!m)
		return -EINVAL;

	item = menu_item_by_key(m, item_key);

	if (item) {
		item->data = item_data;
		return 1;
	}

	item = malloc(sizeof *item);
	if (!item)
		return -ENOMEM;

	item->key = strdup(item_key);

	if (!item->key) {
		free(item);
		return -ENOMEM;
	}

	item->data = item_data;

	list_add_tail(&item->list, &m->items);

	return 1;
}

/*
 * menu_create() - Creates a menu handle with default settings
 *
 * title - If not NULL, points to a string that will be displayed before the
 * list of menu items. It will be copied to internal storage, and is safe to
 * discard after passing to menu_create().
 *
 * timeout - A delay in seconds to wait for user input. If 0, timeout is
 * disabled, and the default choice will be returned unless prompt is 1.
 *
 * prompt - If 0, don't ask for user input unless there is an interrupted
 * timeout. If 1, the user will be prompted for input regardless of the value
 * of timeout.
 *
 * item_data_print - If not NULL, will be called for each item when the menu
 * is displayed, with the pointer to the item's data passed as the argument.
 * If NULL, each item's key will be printed instead.  Since an item's key is
 * what must be entered to select an item, the item_data_print function should
 * make it obvious what the key for each entry is.
 *
 * item_choice - If not NULL, will be called when asking the user to choose an
 * item. Returns a key string corresponding to the chosen item or NULL if
 * no item has been selected.
 *
 * item_choice_data - Will be passed as the argument to the item_choice function
 *
 * Returns a pointer to the menu if successful, or NULL if there is
 * insufficient memory available to create the menu.
 */
struct menu *menu_create(char *title, int timeout, int prompt,
				void (*item_data_print)(void *),
				char *(*item_choice)(void *),
				void *item_choice_data)
{
	struct menu *m;

	m = malloc(sizeof *m);

	if (!m)
		return NULL;

	m->default_item = NULL;
	m->prompt = prompt;
	m->timeout = timeout;
	m->item_data_print = item_data_print;
	m->item_choice = item_choice;
	m->item_choice_data = item_choice_data;

	if (title) {
		m->title = strdup(title);
		if (!m->title) {
			free(m);
			return NULL;
		}
	} else
		m->title = NULL;


	INIT_LIST_HEAD(&m->items);

	return m;
}

/*
 * menu_destroy() - frees the memory used by a menu and its items.
 *
 * m - Points to a menu created by menu_create().
 *
 * Returns 1 if successful, or -EINVAL if m is NULL.
 */
int menu_destroy(struct menu *m)
{
	if (!m)
		return -EINVAL;

	menu_items_iter(m, menu_item_destroy, NULL);

	if (m->title)
		free(m->title);

	free(m);

	return 1;
}
Commit	Line	Data
83d290c5	1	// SPDX-License-Identifier: GPL-2.0+
b69bf52d JH	2	/*
b69bf52d JH	3	* Copyright 2010-2011 Calxeda, Inc.
b69bf52d JH	4	*/
	5
	6	#include <common.h>
18d66533	7	#include <cli.h>
b69bf52d JH	8	#include <malloc.h>
	9	#include <errno.h>
	10	#include <linux/list.h>
	11
	12	#include "menu.h"
	13
	14	/*
	15	* Internally, each item in a menu is represented by a struct menu_item.
	16	*
	17	* These items will be alloc'd and initialized by menu_item_add and destroyed
	18	* by menu_item_destroy, and the consumer of the interface never sees that
	19	* this struct is used at all.
	20	*/
	21	struct menu_item {
	22	char *key;
	23	void *data;
	24	struct list_head list;
	25	};
	26
	27	/*
	28	* The menu is composed of a list of items along with settings and callbacks
	29	* provided by the user. An incomplete definition of this struct is available
	30	* in menu.h, but the full definition is here to prevent consumers from
	31	* relying on its contents.
	32	*/
	33	struct menu {
	34	struct menu_item *default_item;
b41bc5a8	35	int timeout;
b69bf52d JH	36	char *title;
	37	int prompt;
	38	void (item_data_print)(void );
fc9d64ff T	39	char (item_choice)(void *);
fc9d64ff T	40	void *item_choice_data;
b69bf52d JH	41	struct list_head items;
	42	};
	43
	44	/*
	45	* An iterator function for menu items. callback will be called for each item
	46	* in m, with m, a pointer to the item, and extra being passed to callback. If
	47	* callback returns a value other than NULL, iteration stops and the value
	48	* return by callback is returned from menu_items_iter. This allows it to be
	49	* used for search type operations. It is also safe for callback to remove the
	50	* item from the list of items.
	51	*/
	52	static inline void menu_items_iter(struct menu m,
	53	void (callback)(struct menu , struct menu_item , void *),
	54	void *extra)
	55	{
	56	struct list_head pos, n;
	57	struct menu_item *item;
	58	void *ret;
	59
	60	list_for_each_safe(pos, n, &m->items) {
	61	item = list_entry(pos, struct menu_item, list);
	62
	63	ret = callback(m, item, extra);
	64
	65	if (ret)
	66	return ret;
	67	}
	68
	69	return NULL;
	70	}
	71
	72	/*
	73	* Print a menu_item. If the consumer provided an item_data_print function
	74	* when creating the menu, call it with a pointer to the item's private data.
	75	* Otherwise, print the key of the item.
	76	*/
	77	static inline void menu_item_print(struct menu m,
	78	struct menu_item *item,
	79	void *extra)
	80	{
d887ad54	81	if (!m->item_data_print) {
21574976	82	puts(item->key);
d887ad54 WD	83	putc('\n');
d887ad54 WD	84	} else {
b69bf52d	85	m->item_data_print(item->data);
d887ad54	86	}
b69bf52d JH	87
	88	return NULL;
	89	}
	90
	91	/*
	92	* Free the memory used by a menu item. This includes the memory used by its
	93	* key.
	94	*/
	95	static inline void menu_item_destroy(struct menu m,
	96	struct menu_item *item,
	97	void *extra)
	98	{
	99	if (item->key)
	100	free(item->key);
	101
	102	free(item);
	103
	104	return NULL;
	105	}
	106
002ad7b8	107	__weak void menu_display_statusline(struct menu *m)
e0611dd9	108	{
e0611dd9	109	}
e0611dd9	110
b69bf52d JH	111	/*
	112	* Display a menu so the user can make a choice of an item. First display its
	113	* title, if any, and then each item in the menu.
	114	*/
	115	static inline void menu_display(struct menu *m)
	116	{
d887ad54 WD	117	if (m->title) {
	118	puts(m->title);
	119	putc('\n');
	120	}
e0611dd9	121	menu_display_statusline(m);
b69bf52d JH	122
	123	menu_items_iter(m, menu_item_print, NULL);
	124	}
	125
	126	/*
	127	* Check if an item's key matches a provided string, pointed to by extra. If
	128	* extra is NULL, an item with a NULL key will match. Otherwise, the item's
	129	* key has to match according to strcmp.
	130	*
	131	* This is called via menu_items_iter, so it returns a pointer to the item if
	132	* the key matches, and returns NULL otherwise.
	133	*/
	134	static inline void menu_item_key_match(struct menu m,
	135	struct menu_item item, void extra)
	136	{
	137	char *item_key = extra;
	138
	139	if (!item_key \|\| !item->key) {
	140	if (item_key == item->key)
	141	return item;
	142
	143	return NULL;
	144	}
	145
	146	if (strcmp(item->key, item_key) == 0)
	147	return item;
	148
	149	return NULL;
	150	}
	151
	152	/*
	153	* Find the first item with a key matching item_key, if any exists.
	154	*/
	155	static inline struct menu_item menu_item_by_key(struct menu m,
	156	char *item_key)
	157	{
	158	return menu_items_iter(m, menu_item_key_match, item_key);
	159	}
	160
b69bf52d JH	161	/*
	162	* Set *choice to point to the default item's data, if any default item was
	163	* set, and returns 1. If no default item was set, returns -ENOENT.
	164	*/
6a3439fd	165	int menu_default_choice(struct menu m, void *choice)
b69bf52d JH	166	{
	167	if (m->default_item) {
	168	*choice = m->default_item->data;
	169	return 1;
	170	}
	171
	172	return -ENOENT;
	173	}
	174
	175	/*
	176	* Displays the menu and asks the user to choose an item. *choice will point
	177	* to the private data of the item the user chooses. The user makes a choice
	178	* by inputting a string matching the key of an item. Invalid choices will
	179	* cause the user to be prompted again, repeatedly, until the user makes a
	180	* valid choice. The user can exit the menu without making a choice via ^c.
	181	*
	182	* Returns 1 if the user made a choice, or -EINTR if they bail via ^c.
	183	*/
	184	static inline int menu_interactive_choice(struct menu m, void *choice)
	185	{
	186	char cbuf[CONFIG_SYS_CBSIZE];
	187	struct menu_item *choice_item = NULL;
	188	int readret;
	189
	190	while (!choice_item) {
	191	cbuf[0] = '\0';
	192
	193	menu_display(m);
	194
fc9d64ff	195	if (!m->item_choice) {
e1bf824d SG	196	readret = cli_readline_into_buffer("Enter choice: ",
	197	cbuf,
	198	m->timeout / 10);
b69bf52d	199
fc9d64ff T	200	if (readret >= 0) {
	201	choice_item = menu_item_by_key(m, cbuf);
	202	if (!choice_item)
	203	printf("%s not found\n", cbuf);
9b081d88 TT	204	} else if (readret == -1) {
	205	printf("<INTERRUPT>\n");
	206	return -EINTR;
fc9d64ff T	207	} else {
fc9d64ff T	208	return menu_default_choice(m, choice);
fc4fa6a1	209	}
fc9d64ff T	210	} else {
	211	char *key = m->item_choice(m->item_choice_data);
	212
	213	if (key)
	214	choice_item = menu_item_by_key(m, key);
	215	}
	216
	217	if (!choice_item)
	218	m->timeout = 0;
b69bf52d JH	219	}
	220
	221	*choice = choice_item->data;
	222
	223	return 1;
	224	}
	225
	226	/*
	227	* menu_default_set() - Sets the default choice for the menu. This is safe to
	228	* call more than once on a menu.
	229	*
	230	* m - Points to a menu created by menu_create().
	231	*
	232	* item_key - Points to a string that, when compared using strcmp, matches the
	233	* key for an existing item in the menu.
	234	*
	235	* Returns 1 if successful, -EINVAL if m is NULL, or -ENOENT if no item with a
	236	* key matching item_key is found.
	237	*/
	238	int menu_default_set(struct menu m, char item_key)
	239	{
	240	struct menu_item *item;
	241
	242	if (!m)
	243	return -EINVAL;
	244
	245	item = menu_item_by_key(m, item_key);
	246
	247	if (!item)
	248	return -ENOENT;
	249
	250	m->default_item = item;
	251
	252	return 1;
	253	}
	254
	255	/*
	256	* menu_get_choice() - Returns the user's selected menu entry, or the default
b41bc5a8 JH	257	* if the menu is set to not prompt or the timeout expires. This is safe to
b41bc5a8 JH	258	* call more than once.
b69bf52d JH	259	*
	260	* m - Points to a menu created by menu_create().
	261	*
	262	* choice - Points to a location that will store a pointer to the selected
	263	* menu item. If no item is selected or there is an error, no value will be
	264	* written at the location it points to.
	265	*
	266	* Returns 1 if successful, -EINVAL if m or choice is NULL, -ENOENT if no
b41bc5a8 JH	267	* default has been set and the menu is set to not prompt or the timeout
b41bc5a8 JH	268	* expires, or -EINTR if the user exits the menu via ^c.
b69bf52d JH	269	*/
	270	int menu_get_choice(struct menu m, void *choice)
	271	{
	272	if (!m \|\| !choice)
	273	return -EINVAL;
	274
8594753b	275	if (!m->prompt)
b69bf52d JH	276	return menu_default_choice(m, choice);
	277
	278	return menu_interactive_choice(m, choice);
	279	}
	280
	281	/*
	282	* menu_item_add() - Adds or replaces a menu item. Note that this replaces the
	283	* data of an item if it already exists, but doesn't change the order of the
	284	* item.
	285	*
	286	* m - Points to a menu created by menu_create().
	287	*
	288	* item_key - Points to a string that will uniquely identify the item. The
	289	* string will be copied to internal storage, and is safe to discard after
	290	* passing to menu_item_add.
	291	*
	292	* item_data - An opaque pointer associated with an item. It is never
	293	* dereferenced internally, but will be passed to the item_data_print, and
	294	* will be returned from menu_get_choice if the menu item is selected.
	295	*
	296	* Returns 1 if successful, -EINVAL if m is NULL, or -ENOMEM if there is
	297	* insufficient memory to add the menu item.
	298	*/
	299	int menu_item_add(struct menu m, char item_key, void *item_data)
	300	{
	301	struct menu_item *item;
	302
	303	if (!m)
	304	return -EINVAL;
	305
	306	item = menu_item_by_key(m, item_key);
	307
	308	if (item) {
	309	item->data = item_data;
	310	return 1;
	311	}
	312
	313	item = malloc(sizeof *item);
	314	if (!item)
	315	return -ENOMEM;
	316
	317	item->key = strdup(item_key);
	318
	319	if (!item->key) {
	320	free(item);
	321	return -ENOMEM;
	322	}
	323
	324	item->data = item_data;
	325
	326	list_add_tail(&item->list, &m->items);
	327
	328	return 1;
	329	}
	330
	331	/*
	332	* menu_create() - Creates a menu handle with default settings
	333	*
	334	* title - If not NULL, points to a string that will be displayed before the
	335	* list of menu items. It will be copied to internal storage, and is safe to
	336	* discard after passing to menu_create().
	337	*
b41bc5a8 JH	338	* timeout - A delay in seconds to wait for user input. If 0, timeout is
	339	* disabled, and the default choice will be returned unless prompt is 1.
	340	*
	341	* prompt - If 0, don't ask for user input unless there is an interrupted
	342	* timeout. If 1, the user will be prompted for input regardless of the value
	343	* of timeout.
b69bf52d JH	344	*
	345	* item_data_print - If not NULL, will be called for each item when the menu
	346	* is displayed, with the pointer to the item's data passed as the argument.
	347	* If NULL, each item's key will be printed instead. Since an item's key is
	348	* what must be entered to select an item, the item_data_print function should
	349	* make it obvious what the key for each entry is.
	350	*
fc9d64ff	351	* item_choice - If not NULL, will be called when asking the user to choose an
dd8d8da3	352	* item. Returns a key string corresponding to the chosen item or NULL if
fc9d64ff T	353	* no item has been selected.
	354	*
	355	* item_choice_data - Will be passed as the argument to the item_choice function
	356	*
b69bf52d JH	357	* Returns a pointer to the menu if successful, or NULL if there is
	358	* insufficient memory available to create the menu.
	359	*/
b41bc5a8	360	struct menu menu_create(char title, int timeout, int prompt,
fc9d64ff T	361	void (item_data_print)(void ),
	362	char (item_choice)(void *),
	363	void *item_choice_data)
b69bf52d JH	364	{
	365	struct menu *m;
	366
	367	m = malloc(sizeof *m);
	368
	369	if (!m)
	370	return NULL;
	371
	372	m->default_item = NULL;
	373	m->prompt = prompt;
b41bc5a8	374	m->timeout = timeout;
b69bf52d	375	m->item_data_print = item_data_print;
fc9d64ff T	376	m->item_choice = item_choice;
fc9d64ff T	377	m->item_choice_data = item_choice_data;
b69bf52d JH	378
	379	if (title) {
	380	m->title = strdup(title);
	381	if (!m->title) {
	382	free(m);
	383	return NULL;
	384	}
	385	} else
	386	m->title = NULL;
	387
	388
	389	INIT_LIST_HEAD(&m->items);
	390
	391	return m;
	392	}
	393
	394	/*
	395	* menu_destroy() - frees the memory used by a menu and its items.
	396	*
	397	* m - Points to a menu created by menu_create().
	398	*
	399	* Returns 1 if successful, or -EINVAL if m is NULL.
	400	*/
	401	int menu_destroy(struct menu *m)
	402	{
	403	if (!m)
	404	return -EINVAL;
	405
	406	menu_items_iter(m, menu_item_destroy, NULL);
	407
	408	if (m->title)
	409	free(m->title);
	410
	411	free(m);
	412
	413	return 1;
	414	}