/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*	Copyright (c) 1988 AT&T	*/
/*	  All Rights Reserved  	*/


/*
 * Copyright (c) 1997, by Sun Mircrosystems, Inc.
 * All rights reserved.
 */

/*LINTLIBRARY*/

#include <sys/types.h>
#include "private.h"

void
_post_item(MENU *m, ITEM *k)
{
	int foreon = FALSE;
	int backon = FALSE;
	int greyon = FALSE;
	chtype c;
	int i;

	/* Display the mark region of the item */

	if (!Selectable(k)) {
		(void) wattron(Win(m), Grey(m));
		greyon = TRUE;
		for (i = Marklen(m); i > 0; i--) {
			(void) waddch(Win(m), ' ');
		}
	} else {
		if (Value(k) || k == Current(m)) {
			(void) wattron(Win(m), Fore(m));
			foreon = TRUE;
		} else {
			(void) wattron(Win(m), Back(m));
			backon = TRUE;
		}

		/* Display the mark */
		if (Value(k) || (OneValue(m) && k == Current(m))) {
			if (Marklen(m)) {
				(void) waddstr(Win(m), Mark(m));
			}
		} else {
			for (i = Marklen(m); i > 0; i--) {
				(void) waddch(Win(m), ' ');
			}
		}
	}

	/* Display the name */

	(void) waddnstr(Win(m), Name(k), MaxName(m));
	if (ShowDesc(m) && MaxDesc(m) != 0) {
		c = Pad(m);
	} else {
		c = ' ';
	}
	for (i = MaxName(m) - NameLen(k); i > 0; i--) {
		(void) waddch(Win(m), c);
	}

	/* Display the description */

	if (ShowDesc(m) && MaxDesc(m) != 0) {
		(void) waddch(Win(m), Pad(m));
		if (DescriptionLen(k) != 0) {
			(void) waddstr(Win(m), Description(k));
		}
		for (i = MaxDesc(m) - DescriptionLen(k); i > 0; i--) {
			(void) waddch(Win(m), ' ');
		}
	}
	if (foreon) {
		(void) wattroff(Win(m), Fore(m));
	}
	if (backon) {
		(void) wattroff(Win(m), Back(m));
	}
	if (greyon) {
		(void) wattroff(Win(m), Grey(m));
	}
}

void
_move_post_item(MENU *m, ITEM *k)
{
	(void) wmove(Win(m), Y(k), X(k) * (Itemlen(m)+1));
	_post_item(m, k);
}

int
unpost_menu(MENU *m)
{
	if (!m) {
		return (E_BAD_ARGUMENT);
	}
	if (Indriver(m)) {
		return (E_BAD_STATE);
	}
	if (!Posted(m)) {
		return (E_NOT_POSTED);
	}
	Iterm(m);
	Mterm(m);
	(void) werase(US(m));
	wsyncup(US(m));
	(void) delwin(Sub(m));
	Sub(m) = (WINDOW *) NULL;
	(void) delwin(Win(m));
	Win(m) = (WINDOW *) NULL;
	ResetPost(m);
	return (E_OK);
}

/*
 * This routine draws the item indicated by oldcur first and then
 * draws the item indicated by Current.  This will have the affect
 * of unselecting the first item and selecting the next.
 */
void
_movecurrent(MENU *m, ITEM *oldcur)
{
	if (oldcur != Current(m)) {
		_move_post_item(m, oldcur);
		_move_post_item(m, Current(m));
	}
}

/*
 * Draw the entire menu into the super window
 * This routine assumes all items have been linked and
 * that the menu is in at least a pre-post state.
 */

void
_draw(MENU *m)
{
	int k;
	ITEM *i, *j;
	ITEM *si, *sj;

	k = 0;		/* Line number */
	i = IthItem(m, 0);
	si = Cyclic(m) ? i : (ITEM *) NULL;
	do {
		(void) wmove(Win(m), k++, 0);
		j = i;
		sj = Cyclic(m) ? j : (ITEM *) NULL;
		do {
			_post_item(m, j);
			if ((j = Right(j)) != sj) {
				(void) waddch(Win(m), ' ');
			}
		} while (j != sj);
	} while ((i = Down(i)) != si);
}

int
post_menu(MENU *m)
{
	ITEM **ip;
	int r, c;		/* visible # of rows and cols */

	if (!m) {
		return (E_BAD_ARGUMENT);
	}
	if (Indriver(m)) {
		return (E_BAD_STATE);
	}
	if (Posted(m)) {
		return (E_POSTED);
	}
	/* Make sure there is at least one item present */
	if (Items(m) && IthItem(m, 0)) {
		getmaxyx(US(m), r, c);

		/* Make sure the menu fits into the window horizontally */
		if (c < Width(m) || r < Height(m)) {
			return (E_NO_ROOM);
		}

		/* Create the menu window and derived windows */
		if ((Win(m) = newwin(Rows(m), Width(m), 0, 0)) ==
		    (WINDOW *) NULL) {
			return (E_SYSTEM_ERROR);
		}

		/*
		 * Take the minimum of the height of the menu (Height), the
		 * physical height of the window (r), and the number of rows
		 * in the menu (Rows).
		 */
		r = min(min(r, Rows(m)), Height(m));

		if ((Sub(m) = derwin(Win(m), r, Width(m), 0, 0)) ==
		    (WINDOW *)  NULL) {
			return (E_SYSTEM_ERROR);
		}

		/* If needed, link all items in the menu */
		if (LinkNeeded(m)) {
			_link_items(m);
		}

		SetPost(m);

		/* If only one value can be set then unset all values */
		/* to start. */
		if (OneValue(m)) {
			for (ip = Items(m); *ip; ip++) {
				Value(*ip) = FALSE;
			}
		}

		/* Go do the drawing of the menu */
		_draw(m);

		Minit(m);
		Iinit(m);
		_show(m);		/* Display the menu */
		return (E_OK);
	}
	return (E_NOT_CONNECTED);
}