Subversion Repositories openrisc

/*
 * $Id: tuidemo.c,v 1.1 2009/05/10 08:29:53 jld Exp $
 *
 * Author : P.J. Kunst <kunst@prl.philips.nl>
 * Date   : 25-02-93
 *
 * Purpose: This program demonstrates the use of the 'curses' library
 *          for the creation of (simple) menu-operated programs.
 *          In the PDCurses version, use is made of colors for the
 *          highlighting of subwindows (title bar, status bar etc).
 *
 * Acknowledgement: some ideas were borrowed from Mark Hessling's
 *                  version of the 'testcurs' program.
 */
 
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <locale.h>
#include "tui.h"
 
/* change this if source at other location */
 
#ifdef XCURSES
# define FNAME  "../demos/tui.c"
#else
# define FNAME  "..\\demos\\tui.c"
#endif
 
/**************************** strings entry box ***************************/
 
void address(void)
{
    char *fieldname[6] = 
    {
        "Name", "Street", "City", "State", "Country", (char *)0
    };
 
    char *fieldbuf[5];
    WINDOW *wbody = bodywin();
    int i, field = 50;
 
    for (i = 0; i < 5; i++)
        fieldbuf[i] = calloc(1, field + 1);
 
    if (getstrings(fieldname, fieldbuf, field) != KEY_ESC)
    {
        for (i = 0; fieldname[i]; i++)
            wprintw(wbody, "%10s : %s\n",
                fieldname[i], fieldbuf[i]);
 
        wrefresh(wbody);
    }
 
    for (i = 0; i < 5; i++)
        free(fieldbuf[i]);
}
 
/**************************** string entry box ****************************/
 
char *getfname(char *desc, char *fname, int field)
{
    char *fieldname[2];
    char *fieldbuf[1];
 
    fieldname[0] = desc;
    fieldname[1] = 0;
    fieldbuf[0] = fname;
 
    return (getstrings(fieldname, fieldbuf, field) == KEY_ESC) ? NULL : fname;
}
 
/**************************** a very simple file browser ******************/
 
void showfile(char *fname)
{
    int i, bh = bodylen();
    FILE *fp;
    char buf[MAXSTRLEN];
    bool ateof = FALSE;
 
    statusmsg("FileBrowser: Hit key to continue, Q to quit");
 
    if ((fp = fopen(fname, "r")) != NULL)   /* file available? */
    {
        while (!ateof)
        {
            clsbody();
 
            for (i = 0; i < bh - 1 && !ateof; i++)
            {
                buf[0] = '\0';
                fgets(buf, MAXSTRLEN, fp);
 
                if (strlen(buf))
                    bodymsg(buf);
                else
                    ateof = TRUE;
            }
 
            switch (waitforkey())
            {
            case 'Q':
            case 'q':
            case 0x1b:
                ateof = TRUE;
            }
        }
 
        fclose(fp);
    }
    else
    {
        sprintf(buf, "ERROR: file '%s' not found", fname);
        errormsg(buf);
    }
}
 
/***************************** forward declarations ***********************/
 
void sub0(void), sub1(void), sub2(void), sub3(void);
void func1(void), func2(void);
void subfunc1(void), subfunc2(void);
void subsub(void);
 
/***************************** menus initialization ***********************/
 
menu MainMenu[] =
{
    { "Asub", sub0, "Go inside first submenu" },
    { "Bsub", sub1, "Go inside second submenu" },
    { "Csub", sub2, "Go inside third submenu" },
    { "Dsub", sub3, "Go inside fourth submenu" },
    { "", (FUNC)0, "" }   /* always add this as the last item! */
};
 
menu SubMenu0[] =
{
    { "Exit", DoExit, "Terminate program" },
    { "", (FUNC)0, "" }
};
 
menu SubMenu1[] =
{
    { "OneBeep", func1, "Sound one beep" },
    { "TwoBeeps", func2, "Sound two beeps" },
    { "", (FUNC)0, "" }
};
 
menu SubMenu2[] =
{
    { "Browse", subfunc1, "Source file lister" },
    { "Input", subfunc2, "Interactive file lister" },
    { "Address", address, "Get address data" },
    { "", (FUNC)0, "" }
};
 
menu SubMenu3[] =
{
    { "SubSub", subsub, "Go inside sub-submenu" },
    { "", (FUNC)0, "" }
};
 
/***************************** main menu functions ************************/
 
void sub0(void)
{
    domenu(SubMenu0);
}
 
void sub1(void)
{
    domenu(SubMenu1);
}
 
void sub2(void)
{
    domenu(SubMenu2);
}
 
void sub3(void)
{
    domenu(SubMenu3);
}
 
/***************************** submenu1 functions *************************/
 
void func1(void)
{
    beep();
    bodymsg("One beep! ");
}
 
void func2(void)
{
    beep();
    bodymsg("Two beeps! ");
    beep();
}
 
/***************************** submenu2 functions *************************/
 
void subfunc1(void)
{
    showfile(FNAME);
}
 
void subfunc2(void)
{
    char fname[MAXSTRLEN];
 
    strcpy(fname, FNAME);
    if (getfname ("File to browse:", fname, 50))
        showfile(fname);
}
 
/***************************** submenu3 functions *************************/
 
void subsub(void)
{
    domenu(SubMenu2);
}
 
/***************************** start main menu  ***************************/
 
int main(int argc, char **argv)
{
    setlocale(LC_ALL, "");
 
    startmenu(MainMenu, "TUI - 'textual user interface' demonstration program");
 
    return 0;
}
 
#ifdef __ECOS__
# include "tui.c"
#endif