NetBSD/lib/libmenu/driver.c
1999-11-24 12:43:15 +00:00

257 lines
7.1 KiB
C

/* $NetBSD: driver.c,v 1.2 1999/11/24 12:43:15 kleink Exp $ */
/*-
* Copyright (c) 1998-1999 Brett Lymn (blymn@baea.com.au, brett_lymn@yahoo.com)
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. The name of the author may not be used to endorse or promote products
* derived from this software withough specific prior written permission
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*
*
*/
#include <menu.h>
#include <ctype.h>
#include <stdlib.h>
#include "internals.h"
/*
* The guts of the menu library. This function processes the character
* in c and performs actions based on the value of the character. If the
* character is a normal one then the driver attempts to match the character
* against the items. If the character is a recognised request then the
* request is processed by the driver, if the character is not a recognised
* request and is not printable then it assumed to be a user defined command.
*/
int
menu_driver(menu, c)
MENU *menu;
int c;
{
int top_row, scroll, it, status = E_OK;
ITEM *new_item;
if (menu == NULL)
return E_BAD_ARGUMENT;
if (menu->posted == 0)
return E_NOT_POSTED;
if (menu->items == NULL)
return E_NOT_CONNECTED;
if (*menu->items == NULL)
return E_NOT_CONNECTED;
if (menu->in_init == 1)
return E_BAD_STATE;
/* this one should never happen but just in case.... */
if (menu->items[menu->cur_item] == NULL) return E_SYSTEM_ERROR;
new_item = menu->items[menu->cur_item];
it = menu->cur_item;
top_row = menu->top_row;
if ((c > REQ_BASE_NUM) && (c <= MAX_COMMAND)) {
/* is a known driver request - first check if the pattern
* buffer needs to be cleared, we do this on non-search
* type requests.
*/
if (! ((c == REQ_BACK_PATTERN) || (c == REQ_NEXT_MATCH) ||
(c == REQ_PREV_MATCH))) {
if ((c == REQ_CLEAR_PATTERN)
&& (menu->pattern == NULL))
return E_REQUEST_DENIED;
free(menu->pattern);
menu->pattern = NULL;
menu->plen = 0;
menu->match_len = 0;
}
switch (c) {
case REQ_LEFT_ITEM:
new_item = new_item->left;
break;
case REQ_RIGHT_ITEM:
new_item = new_item->right;
break;
case REQ_UP_ITEM:
new_item = new_item->up;
break;
case REQ_DOWN_ITEM:
new_item = new_item->down;
break;
case REQ_SCR_ULINE:
if (top_row == 0)
return E_REQUEST_DENIED;
top_row--;
new_item = new_item->up;
break;
case REQ_SCR_DLINE:
top_row++;
if ((top_row + menu->rows - 1)> menu->item_rows)
return E_REQUEST_DENIED;
new_item = new_item->down;
break;
case REQ_SCR_DPAGE:
scroll = menu->item_rows - menu->rows
- menu->top_row;
if (scroll > menu->rows) {
scroll = menu->rows;
}
if (scroll <= 0) {
return E_REQUEST_DENIED;
} else {
top_row += scroll;
while (scroll-- > 0)
new_item = new_item->down;
}
break;
case REQ_SCR_UPAGE:
if (menu->rows < menu->top_row) {
scroll = menu->rows;
} else {
scroll = menu->top_row;
}
if (scroll == 0)
return E_REQUEST_DENIED;
top_row -= scroll;
while (scroll-- > 0)
new_item = new_item->up;
break;
case REQ_FIRST_ITEM:
new_item = menu->items[0];
break;
case REQ_LAST_ITEM:
new_item = menu->items[menu->item_count - 1];
break;
case REQ_NEXT_ITEM:
if ((menu->cur_item + 1) >= menu->item_count) {
if ((menu->opts & O_NONCYCLIC)
== O_NONCYCLIC) {
return E_REQUEST_DENIED;
} else {
new_item = menu->items[0];
}
} else {
new_item = menu->items[menu->cur_item + 1];
}
break;
case REQ_PREV_ITEM:
if (menu->cur_item == 0) {
if ((menu->opts & O_NONCYCLIC)
== O_NONCYCLIC) {
return E_REQUEST_DENIED;
} else {
new_item = menu->items[
menu->item_count - 1];
}
} else {
new_item = menu->items[menu->cur_item - 1];
}
break;
case REQ_TOGGLE_ITEM:
if ((menu->opts & O_ONEVALUE) == O_ONEVALUE) {
return E_REQUEST_DENIED;
} else {
if ((new_item->opts
& O_SELECTABLE) == O_SELECTABLE) {
/* toggle select flag */
new_item->selected ^= 1;
/* update item in menu */
__menui_draw_item(menu,
new_item->index);
} else {
return E_NOT_SELECTABLE;
}
}
break;
case REQ_CLEAR_PATTERN:
/* this action is taken before the
case statement */
break;
case REQ_BACK_PATTERN:
if (menu->pattern == NULL)
return E_REQUEST_DENIED;
if (menu->plen == 0)
return E_REQUEST_DENIED;
menu->pattern[menu->plen--] = '\0';
break;
case REQ_NEXT_MATCH:
if (menu->pattern == NULL)
return E_REQUEST_DENIED;
status = __menui_match_pattern(menu, 0,
MATCH_NEXT_FORWARD,
&it);
new_item = menu->items[it];
break;
case REQ_PREV_MATCH:
if (menu->pattern == NULL)
return E_REQUEST_DENIED;
status = __menui_match_pattern(menu, 0,
MATCH_NEXT_REVERSE,
&it);
new_item = menu->items[it];
break;
}
} else if (c > MAX_COMMAND) {
/* must be a user command */
return E_UNKNOWN_COMMAND;
} else if (isprint((char) c)) {
/* otherwise search items for the character. */
status = __menui_match_pattern(menu, c, MATCH_FORWARD,
&it);
new_item = menu->items[it];
/* update the position of the cursor if we are doing
* show match and the current item has not changed. If
* we don't do this here it won't get done since the
* display will not be updated due to the current item
* not changing.
*/
if ((new_item->index == menu->cur_item)
&& ((menu->opts & O_SHOWMATCH) == O_SHOWMATCH)) {
pos_menu_cursor(menu);
}
} else {
/* bad character */
return E_BAD_ARGUMENT;
}
if (new_item == NULL) return E_REQUEST_DENIED;
if (new_item->row < top_row) top_row = new_item->row;
if (new_item->row >= (top_row + menu->rows))
top_row = new_item->row - menu->rows + 1;
if ((new_item->index != menu->cur_item) || (top_row != menu->top_row))
__menui_goto_item(menu, new_item, top_row);
return status;
}