source: npl/mediabox/lcdproc_edwin/src/server/menu.c

/*
  menu.c

  Handles server-supplied menus defined by a table.  Read menu.h for
  more information.

  Menus are similar to "pull-down" menus, but have some extra features.
  They can contain "normal" menu items, checkboxes, sliders, "movers",
  etc..
  
  I should probably find a more elegant way of doing this in order
  to handle dynamically-changing menus such as the client list.  Tcl/Tk
  has neat ways to do it.  Hmm...
  
 */

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>

#include "parse.h"
#include "sock.h"
#include "render.h"
#include "main.h"

#include "drivers/lcd.h"
#include "menu.h"

// FIXME: Implement this where it is supposed to be...
#include <time.h>
void framedelay()
{
   sock_poll_clients();
   parse_all_client_messages();

   usleep(TIME_UNIT);
}

static void draw_heartbeat()
{
   static int timer = 0;
   
   if(heartbeat)
   {
         // Set this to pulsate like a real heart beat...
         // (binary is fun...  :)
         lcd.icon(!((timer+4)&5), 0);
         lcd.chr(lcd.wid, 1, 0);
   }
   lcd.flush();

   timer++;
   timer &= 0x0f;
}

static int PAD = 255;



typedef struct menu_info 
{
  int selected;
  int length;
} menu_info;



static int draw_menu(Menu menu, menu_info *info);
static int fill_menu_info(Menu menu, menu_info *info);
static int menu_handle_action(menu_item *item);

static int slid_func(menu_item *item);


int do_menu(Menu menu)
{
  menu_info info;
  int key=0;
  int status=MENU_OK;
  int done=0;

  int (*func)();
  int (*readfunc)(int);
  

  if(!menu) return MENU_ERROR;

  fill_menu_info(menu, &info);


  while(!done)
  {
     // Keep the cursor off titles... (?)
     while(menu[info.selected].type == TYPE_TITL)
     {
        info.selected++;
        // If the title is the last thing in the menu...
        if(!menu[info.selected].text) info.selected -= 2;
     }
    
      
     draw_menu(menu, &info);

     // FIXME: This should use a better keypress interface, which
     // FIXME: handles things according to keybindings...

     for(key = lcd.getkey(); key==0; key = lcd.getkey())
     {
        // sleep for 1/8th second...
        framedelay();
        // do the heartbeat...
        draw_heartbeat();
        // Check for client input...
     }
     
    
     // Handle the key according to the keybindings...
     switch(key)
     {
        case 'D': done=1; break;
        case 'B': if(info.selected > 0) info.selected--;
           while(menu[info.selected].type == TYPE_TITL)
           {
              if(info.selected > 0)
                 info.selected--;
              else break;
           }
           break;
        case 'C': if(menu[info.selected+1].text) info.selected++; break;
        case 'A':
           switch(menu[info.selected].type)
           {
              case TYPE_MENU: status = do_menu(menu[info.selected].data);
                 break;
              case TYPE_FUNC:
                 func = menu[info.selected].data;
                 if(func)
                    status = func();
                 break;
              case TYPE_CHEK:
                 readfunc = menu[info.selected].data;
                 if(readfunc)
                    status = readfunc(MENU_CHECK);
                 status &= 0xffff0000;
                 break;
              case TYPE_SLID:
                 func = menu[info.selected].data;
                 if(func)
                    status = slid_func(&menu[info.selected]);
                 break;
              default:
                 break;
           }
           
           switch(status)
           {
              case MENU_OK:
                 break;
              case MENU_CLOSE:
                 return MENU_OK;
              case MENU_QUIT:
                 return MENU_QUIT;
//        case MENU_KILL:
//          return MENU_KILL;
              case MENU_ERROR:
                 return MENU_ERROR;
           }
           
           // status = menu_handle_action(&menu[info.selected]);
           // TODO: It should now do special stuff for "mover" widgets,
           // TODO: and handle the return code appropriately.
           break;
        default: break;
     }
     
  }
  
  return status;
  
}

static int draw_menu(Menu menu, menu_info *info)
{
  int i;
  int x=1, y=1;
  int top=0, bottom=0;

  int (*readfunc)(int);
  
  // these should maybe be removed:
  int wid=lcd.wid, hgt=lcd.hgt;
  

  if(!menu) return MENU_ERROR;

  lcd.clear();

  
  // Scroll down until the selected item is centered, if possible...
  top = info->selected - (hgt/2);
  if(top<0) top=0;  
  bottom = top+hgt;
  if(bottom > info->length) bottom=info->length;
  top = bottom-hgt;
  if(top<0) top=0;  
  
  

  // Draw all visible items...
  for(i=top; i<bottom; i++, y++)
  {
    if(i == info->selected) lcd.chr(2,y,'>');
    
    switch(menu[i].type)
    {
      case TYPE_TITL:
        lcd.chr(1,y,PAD);
        lcd.chr(2,y,PAD);
        lcd.string(4,y,menu[i].text);
        for(x=strlen(menu[i].text)+5; x <= wid; x++)
          lcd.chr(x,y,PAD);
        break;
      case TYPE_MENU:
        lcd.string(3,y,menu[i].text);
        lcd.chr(wid,y,'>');
        break;
      case TYPE_FUNC:
        lcd.string(3,y,menu[i].text);
        break;
      case TYPE_CHEK:
        if(menu[i].data)
        {
          readfunc = menu[i].data;
          if(readfunc(MENU_READ))
            lcd.chr(wid,y,'Y');
          else
            lcd.chr(wid,y,'N');
        }
        lcd.string(3,y,menu[i].text);
        break;
      case TYPE_SLID:
        lcd.string(3,y,menu[i].text);
        break;
      case TYPE_MOVE:
        break;
      default:
        break;
    }
  }

  if(top != 0)
    lcd.chr(1,1,'^');
  if(bottom < info->length)
    lcd.chr(1,hgt,'v');
  
  
  draw_heartbeat();
  //lcd.flush();

  return 0;
}


static int fill_menu_info(Menu menu, menu_info *info)
{
  int i;

  info->selected = 0;
  
  // count the entries in the menu
  for(i=0; menu[i].text; i++);
  
  info->length = i;
  
  return 0;
  
}

static int menu_handle_action(menu_item *item)
{
  return MENU_OK;
}


static int slid_func(menu_item *item)
{
   char str[16];
   int key = 0;
   int value = 0;
   int x, y=1;
   int (*readfunc)(int);
   
   readfunc = item->data;

   lcd.init_hbar();
   
   while(key != 'A' && key != 'D')
   {
      // Draw the title...
      lcd.clear();
      lcd.chr(1,y,PAD);
      lcd.chr(2,y,PAD);
      lcd.string(4,y,item->text);
      for(x=strlen(item->text)+5; x <= lcd.wid; x++)
         lcd.chr(x,y,PAD);

      // Draw the slider now...
      value = readfunc(MENU_READ);
      if(value < 0  ||  value >= MENU_CLOSE)
         return value;
      sprintf(str, "%i", value);
      if(lcd.hgt >= 4)
      {
         lcd.string(8, 4, str);
         value = (lcd.wid * lcd.cellwid * value / 256);
         lcd.hbar(1, 3, value);
      }
      else
      {
         lcd.string(17, 2, str);
         value = ((lcd.wid-4) * lcd.cellwid * value / 256);
         lcd.hbar(1, 2, value);
      }
      //lcd.flush();
      
      for(key = lcd.getkey(); key==0; key = lcd.getkey())
      {
         // do the heartbeat...
         draw_heartbeat();
         // sleep for 1/8th second...
         framedelay();
         // Check for client input...
      }
      
      switch(key)
      {
         case 'B':
            value = readfunc(MENU_MINUS);
            break;
         case 'C':
            value = readfunc(MENU_PLUS);
            break;
      }

      if(value >= MENU_CLOSE
         || value < 0
         || key == 'A'
         || key == 'D')
         return value;
   }
   
   return MENU_OK;
}