libpayload: Add PDCurses and ncurses' libform/libmenu

PDCurses provides an alternative implementation of the curses library
standard in addition to tinycurses.
Where tinycurses is really tiny, PDCurses is more complete and provides
virtually unlimited windows and the full API.
The PDCurses code is brought in "vanilla", with all local changes
residing in curses/pdcurses-backend/

In addition to a curses library, this change also provides libpanel (as
part of the PDCurses code), and libform and libmenu which were derived
from ncurses-5.9.
As they rely on ncurses internals (and PDCurses is not ncurses), more
changes were required for these libraries to work.

The build system is extended to install the right set of header files
depending on the selected curses implementation.

Change-Id: I9e5b920f94b6510da01da2f656196a993170d1c5
Signed-off-by: Patrick Georgi <patrick.georgi@secunet.com>
Reviewed-on: http://review.coreboot.org/106
Tested-by: build bot (Jenkins)
Reviewed-by: Marc Jones <marcj303@gmail.com>

1 files changed, 301 insertions, 0 deletions

diff --git a/payloads/libpayload/curses/PDCurses-3.4/sdl1/pdcdisp.c b/payloads/libpayload/curses/PDCurses-3.4/sdl1/pdcdisp.c
new file mode 100644
index 0000000000..3712e6622e
--- /dev/null
+++ b/payloads/libpayload/curses/PDCurses-3.4/sdl1/pdcdisp.c
@@ -0,0 +1,301 @@
+/* Public Domain Curses */
+
+#include "pdcsdl.h"
+
+RCSID("$Id: pdcdisp.c,v 1.35 2008/07/14 04:24:52 wmcbrine Exp $")
+
+#include <stdlib.h>
+#include <string.h>
+
+#ifdef CHTYPE_LONG
+
+# define A(x) ((chtype)x | A_ALTCHARSET)
+
+chtype acs_map[128] =
+{
+    A(0), A(1), A(2), A(3), A(4), A(5), A(6), A(7), A(8), A(9),
+    A(10), A(11), A(12), A(13), A(14), A(15), A(16), A(17), A(18),
+    A(19), A(20), A(21), A(22), A(23), A(24), A(25), A(26), A(27),
+    A(28), A(29), A(30), A(31), ' ', '!', '"', '#', '$', '%', '&',
+    '\'', '(', ')', '*',
+
+    A(0x1a), A(0x1b), A(0x18), A(0x19),
+
+    '/',
+
+    0xdb,
+
+    '1', '2', '3', '4', '5', '6', '7', '8', '9', ':', ';', '<', '=',
+    '>', '?', '@', 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J',
+    'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W',
+    'X', 'Y', 'Z', '[', '\\', ']', '^', '_',
+
+    A(0x04), 0xb1,
+
+    'b', 'c', 'd', 'e',
+
+    0xf8, 0xf1, 0xb0, A(0x0f), 0xd9, 0xbf, 0xda, 0xc0, 0xc5, 0x2d,
+    0x2d, 0xc4, 0x2d, 0x5f, 0xc3, 0xb4, 0xc1, 0xc2, 0xb3, 0xf3,
+    0xf2, 0xe3, 0xd8, 0x9c, 0xf9,
+
+    A(127)
+};
+
+# undef A
+
+#endif
+
+Uint32 pdc_lastupdate = 0;
+
+#define MAXRECT 200     /* maximum number of rects to queue up before
+                           an update is forced; the number was chosen
+                           arbitrarily */
+
+static SDL_Rect uprect[MAXRECT];       /* table of rects to update */
+static chtype oldch = (chtype)(-1);    /* current attribute */
+static int rectcount = 0;              /* index into uprect */
+static short foregr = -2, backgr = -2; /* current foreground, background */
+
+/* do the real updates on a delay */
+
+void PDC_update_rects(void)
+{
+    if (rectcount)
+    {
+        /* if the maximum number of rects has been reached, we're 
+           probably better off doing a full screen update */
+
+        if (rectcount == MAXRECT)
+            SDL_Flip(pdc_screen);
+        else
+            SDL_UpdateRects(pdc_screen, rectcount, uprect);
+
+        pdc_lastupdate = SDL_GetTicks();
+        rectcount = 0;
+    }
+}
+
+/* set the font colors to match the chtype's attribute */
+
+static void _set_attr(chtype ch)
+{
+    ch &= (A_COLOR|A_BOLD|A_BLINK|A_REVERSE);
+
+    if (oldch != ch)
+    {
+        short newfg, newbg;
+
+        if (SP->mono)
+            return;
+
+        PDC_pair_content(PAIR_NUMBER(ch), &newfg, &newbg);
+
+        newfg |= (ch & A_BOLD) ? 8 : 0;
+        newbg |= (ch & A_BLINK) ? 8 : 0;
+
+        if (ch & A_REVERSE)
+        {
+            short tmp = newfg;
+            newfg = newbg;
+            newbg = tmp;
+        }
+
+        if (newfg != foregr)
+        {
+            SDL_SetPalette(pdc_font, SDL_LOGPAL, 
+                           pdc_color + newfg, pdc_flastc, 1);
+            foregr = newfg;
+        }
+
+        if (newbg != backgr)
+        {
+            if (newbg == -1)
+                SDL_SetColorKey(pdc_font, SDL_SRCCOLORKEY, 0);
+            else
+            {
+                if (backgr == -1)
+                    SDL_SetColorKey(pdc_font, 0, 0);
+
+                SDL_SetPalette(pdc_font, SDL_LOGPAL,
+                               pdc_color + newbg, 0, 1);
+            }
+
+            backgr = newbg;
+        }
+
+        oldch = ch;
+    }
+}
+
+/* draw a cursor at (y, x) */
+
+void PDC_gotoyx(int row, int col)
+{
+    SDL_Rect src, dest;
+    chtype ch;
+    int oldrow, oldcol;
+
+    PDC_LOG(("PDC_gotoyx() - called: row %d col %d from row %d col %d\n",
+             row, col, SP->cursrow, SP->curscol));
+
+    if (SP->mono)
+        return;
+
+    oldrow = SP->cursrow;
+    oldcol = SP->curscol;
+
+    /* clear the old cursor */
+
+    PDC_transform_line(oldrow, oldcol, 1, curscr->_y[oldrow] + oldcol);
+
+    if (!SP->visibility)
+        return;
+
+    /* draw a new cursor by overprinting the existing character in 
+       reverse, either the full cell (when visibility == 2) or the 
+       lowest quarter of it (when visibility == 1) */
+
+    ch = curscr->_y[row][col] ^ A_REVERSE;
+
+    _set_attr(ch);
+
+#ifdef CHTYPE_LONG
+    if (ch & A_ALTCHARSET && !(ch & 0xff80))
+        ch = acs_map[ch & 0x7f];
+#endif
+    src.h = (SP->visibility == 1) ? pdc_fheight >> 2 : pdc_fheight;
+    src.w = pdc_fwidth;
+
+    dest.y = (row + 1) * pdc_fheight - src.h + pdc_yoffset;
+    dest.x = col * pdc_fwidth + pdc_xoffset;
+
+    src.x = (ch & 0xff) % 32 * pdc_fwidth;
+    src.y = (ch & 0xff) / 32 * pdc_fheight + (pdc_fheight - src.h);
+
+    SDL_BlitSurface(pdc_font, &src, pdc_screen, &dest);
+
+    if (oldrow != row || oldcol != col)
+    {
+        if (rectcount == MAXRECT)
+            PDC_update_rects();
+
+        uprect[rectcount++] = dest;
+    }
+}
+
+/* handle the A_*LINE attributes */
+
+static void _highlight(SDL_Rect *src, SDL_Rect *dest, chtype ch)
+{
+    short col = SP->line_color;
+
+    if (SP->mono)
+        return;
+
+    if (ch & A_UNDERLINE)
+    {
+        if (col != -1)
+            SDL_SetPalette(pdc_font, SDL_LOGPAL,
+                           pdc_color + col, pdc_flastc, 1);
+
+        src->x = '_' % 32 * pdc_fwidth;
+        src->y = '_' / 32 * pdc_fheight;
+
+        if (backgr != -1)
+            SDL_SetColorKey(pdc_font, SDL_SRCCOLORKEY, 0);
+
+        SDL_BlitSurface(pdc_font, src, pdc_screen, dest);
+
+        if (backgr != -1)
+            SDL_SetColorKey(pdc_font, 0, 0);
+
+        if (col != -1)
+            SDL_SetPalette(pdc_font, SDL_LOGPAL,
+                           pdc_color + foregr, pdc_flastc, 1);
+    }
+
+    if (ch & (A_LEFTLINE|A_RIGHTLINE))
+    {
+        if (col == -1)
+            col = foregr;
+
+        dest->w = 1;
+
+        if (ch & A_LEFTLINE)
+            SDL_FillRect(pdc_screen, dest, pdc_mapped[col]);
+
+        if (ch & A_RIGHTLINE)
+        {
+            dest->x += pdc_fwidth - 1;
+            SDL_FillRect(pdc_screen, dest, pdc_mapped[col]);
+            dest->x -= pdc_fwidth - 1;
+        }
+
+        dest->w = pdc_fwidth;
+    }
+}
+
+/* update the given physical line to look like the corresponding line in
+   curscr */
+
+void PDC_transform_line(int lineno, int x, int len, const chtype *srcp)
+{
+    SDL_Rect src, dest, lastrect;
+    int j;
+
+    PDC_LOG(("PDC_transform_line() - called: lineno=%d\n", lineno));
+
+    if (rectcount == MAXRECT)
+        PDC_update_rects();
+
+    src.h = pdc_fheight;
+    src.w = pdc_fwidth;
+
+    dest.y = pdc_fheight * lineno + pdc_yoffset;
+    dest.x = pdc_fwidth * x + pdc_xoffset;
+    dest.h = pdc_fheight;
+    dest.w = pdc_fwidth * len;
+
+    /* if the previous rect was just above this one, with the same width
+       and horizontal position, then merge the new one with it instead
+       of adding a new entry */
+
+    if (rectcount)
+        lastrect = uprect[rectcount - 1];
+
+    if (rectcount && lastrect.x == dest.x && lastrect.w == dest.w)
+    {
+        if (lastrect.y + lastrect.h == dest.y)
+            uprect[rectcount - 1].h = lastrect.h + pdc_fheight;
+        else
+            if (lastrect.y != dest.y)
+                uprect[rectcount++] = dest;
+    } 
+    else
+        uprect[rectcount++] = dest;
+
+    dest.w = pdc_fwidth;
+
+    for (j = 0; j < len; j++)
+    {
+        chtype ch = srcp[j];
+
+        _set_attr(ch);
+#ifdef CHTYPE_LONG
+        if (ch & A_ALTCHARSET && !(ch & 0xff80))
+            ch = (ch & (A_ATTRIBUTES ^ A_ALTCHARSET)) | acs_map[ch & 0x7f];
+#endif
+        if (backgr == -1)
+            SDL_LowerBlit(pdc_tileback, &dest, pdc_screen, &dest);
+
+        src.x = (ch & 0xff) % 32 * pdc_fwidth;
+        src.y = (ch & 0xff) / 32 * pdc_fheight;
+
+        SDL_LowerBlit(pdc_font, &src, pdc_screen, &dest);
+
+        if (ch & (A_UNDERLINE|A_LEFTLINE|A_RIGHTLINE))
+            _highlight(&src, &dest, ch);
+
+        dest.x += pdc_fwidth;
+    }
+}