src/plugins/old/ncurses/ncurses-console.c

   1 #include <stdlib.h>
   2 #include <stdio.h>
   3 #include <string.h>
   4 #include <stdarg.h>
   5 #include <ncurses.h>
   6
   7 #include "slatevm.h"
   8 #include "image.h"
   9 #include "ncurses-console.h"
  10
  11 extern int setupterm(char* term, int fildes, int* errret);
  12
  13 // this is a copy paste from boot.c
  14 void
  15 error (const char * message, ...)
  16 {
  17         va_list args;
  18
  19         va_start (args, message);
  20         fprintf (stderr, "Slate: ");
  21     vfprintf (stderr, message, args);
  22         fputc ('\n', stderr);
  23         va_end (args);
  24     exit (EXIT_FAILURE);
  25 }
  26
  27 int
  28 sc_isAvailable ()
  29 {
  30   int err;
  31
  32   if (setupterm((char *)0, 1, &err) == ERR)
  33     return FALSE;
  34
  35   return tigetstr("cup") != NULL;
  36 }
  37
  38 int
  39 sc_enterStructuredMode ()
  40 {
  41   if (initscr() == NULL)
  42     return FALSE;
  43
  44   start_color();
  45
  46   scrollok(stdscr, TRUE);
  47   immedok(stdscr, FALSE);
  48   leaveok(stdscr, FALSE);
  49   idlok(stdscr, TRUE);
  50   idcok(stdscr, TRUE);
  51   intrflush(stdscr, FALSE);
  52   keypad(stdscr, FALSE);
  53
  54   notimeout(stdscr, FALSE);
  55
  56   raw();
  57   noecho();
  58   nl();
  59
  60   return TRUE;
  61 }
  62
  63 int
  64 sc_leaveStructuredMode ()
  65 {
  66   return (endwin() != ERR);
  67 }
  68
  69 // TODO: this assumes string = byte array vm setup
  70 char *
  71 sc_keySequenceOf(char *keyName)
  72 {
  73   char *keySequence = tigetstr(keyName);
  74   if ((int)keySequence == -1 || (int)keySequence == 0)
  75     return FALSE;
  76
  77   if (strlen(keySequence) > 1 && keySequence[0] == 27)
  78     keySequence += 1;
  79
  80   return keySequence;
  81 }
  82
  83 int
  84 sc_columns ()
  85 {
  86   int cols, lines;
  87   getmaxyx(stdscr, lines, cols);
  88
  89   return cols;
  90 }
  91
  92 int
  93 sc_rows ()
  94 {
  95   int cols, rows;
  96   getmaxyx(stdscr, rows, cols);
  97
  98   return rows;
  99 }
 100
 101 int
 102 sc_write (void *bytes, int size, int offset)
 103 {
 104   return (waddnstr(stdscr, ((const char *)bytes) + offset, size) != ERR);
 105 }
 106
 107 int
 108 sc_scroll (int lines)
 109 {
 110   return (wscrl(stdscr, lines) != ERR);
 111 }
 112
 113 int
 114 sc_clear ()
 115 {
 116   return (wclear(stdscr) != ERR);
 117 }
 118
 119 int
 120 sc_clearToEOS ()
 121 {
 122   return (wclrtobot(stdscr) != ERR);
 123 }
 124
 125 int
 126 sc_clearToEOL()
 127 {
 128   return (wclrtoeol(stdscr) != ERR);
 129 }
 130
 131 int
 132 sc_moveToXY (int x, int y)
 133 {
 134   return (wmove(stdscr, y, x) != ERR);
 135 }
 136
 137 int
 138 sc_cursorX ()
 139 {
 140   int x, y;
 141   getyx(stdscr, y, x);
 142   return x;
 143 }
 144
 145 int
 146 sc_cursorY ()
 147 {
 148   int x, y;
 149   getyx(stdscr, y, x);
 150   return y;
 151 }
 152
 153 int
 154 sc_nextEvent (int blockingMillisecs)
 155 {
 156   int ch;
 157
 158   wtimeout(stdscr, blockingMillisecs);
 159   ch = wgetch(stdscr);
 160   if (ch == ERR)
 161   {
 162     if (blockingMillisecs < 0)
 163       error("Error reading console?!");
 164     else
 165       return -1;
 166   }
 167   return ch;
 168 }
 169
 170 int
 171 sc_hasEvent ()
 172 {
 173   int ch;
 174
 175   wtimeout(stdscr, 0);
 176   ch = wgetch(stdscr);
 177   if (ch == ERR)
 178   {
 179     return FALSE;
 180   }
 181   else
 182   {
 183     ungetch(ch);
 184     return TRUE;
 185   }
 186 }
 187
 188 int
 189 sc_flush()
 190 {
 191   return (wrefresh(stdscr) != ERR);
 192 }
 193
 194 int
 195 sc_deleteChar()
 196 {
 197   return (wdelch(stdscr) != ERR);
 198 }
 199
 200 int
 201 sc_deleteLines(int lines)
 202 {
 203   return (winsdelln(stdscr, -lines) != ERR);
 204 }
 205
 206 int
 207 sc_insertLines(int lines)
 208 {
 209   return (winsdelln(stdscr, lines) != ERR);
 210 }
 211
 212 int
 213 sc_hideCursor()
 214 {
 215   return curs_set(0);
 216 }
 217
 218 int
 219 sc_showCursor()
 220 {
 221   return curs_set(1);
 222 }
 223
 224 int
 225 sc_initColorPair(int pair, int fg, int bg)
 226 {
 227   return (init_pair(pair, fg, bg) != ERR);
 228 }
 229
 230 int
 231 sc_maxColorPairs()
 232 {
 233   return COLOR_PAIRS;
 234 }
 235
 236 void
 237 sc_setAttributes(int mode, int pair)
 238 {
 239   wattrset(stdscr, (mode << 16) | COLOR_PAIR(pair));
 240 }
 241
 242 /*
 243 void
 244 sc_setColor(int foreground, int background)
 245 {
 246   short color;
 247   init_pair(color, foreground, background);
 248
 249   wcolor_set(stdscr, color, NULL);
 250 }
 251
 252 void
 253 sc_turnOnAttribute(int attribute)
 254 {
 255   wattron(stdscr, attribute);
 256 }
 257
 258 void
 259 sc_turnOffAttribute(int attribute)
 260 {
 261   wattr_off(stdscr, attribute);
 262 }
 263 */
 264