src/viewer.c

   1 /*
   2  * Functions necessary to display a deck of slides in different color modes
   3  * using ncurses. Only white, red, and blue are supported, as they can be
   4  * faded in 256 color mode.
   5  * Copyright (C) 2014 Michael Goehler
   6  *
   7  * This file is part of mdp.
   8  *
   9  * This program is free software: you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation, either version 3 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program. If not, see <http://www.gnu.org/licenses/>.
  21  *
  22  */
  23
  24 #include <ctype.h>  // isalnum
  25 #include <locale.h> // setlocale
  26 #include <string.h> // strchr
  27 #include <unistd.h> // usleep
  28
  29 #include "viewer.h"
  30
  31 // color ramp for fading from black to color
  32 static short white_ramp[24] = { 16, 232, 233, 234, 235, 236,
  33                                237, 238, 239, 240, 241, 242,
  34                                244, 245, 246, 247, 248, 249,
  35                                250, 251, 252, 253, 254, 255 };
  36
  37 static short blue_ramp[24]  = { 16,  17,  17,  18,  18,  19,
  38                                 19,  20,  20,  21,  27,  33,
  39                                 32,  39,  38,  45,  44,  44,
  40                                 81,  81,  51,  51, 123, 123 };
  41
  42 static short red_ramp[24]   = { 16,  52,  52,  53,  53,  89,
  43                                 89,  90,  90, 126, 127, 127,
  44                                163, 163, 164, 164, 200, 200,
  45                                201, 201, 207, 207, 213, 213 };
  46
  47 // color ramp for fading from white to color
  48 static short white_ramp_invert[24] = { 15, 255, 254, 254, 252, 251,
  49                                       250, 249, 248, 247, 246, 245,
  50                                       243, 242, 241, 240, 239, 238,
  51                                       237, 236, 235, 234, 233, 232};
  52
  53 static short blue_ramp_invert[24]  = { 15, 231, 231, 195, 195, 159,
  54                                       159, 123, 123,  87,  51,  44,
  55                                        45,  38,  39,  32,  33,  33,
  56                                        26,  26,  27,  27,  21,  21};
  57
  58 static short red_ramp_invert[24]   = { 15, 231, 231, 224, 224, 225,
  59                                       225, 218, 218, 219, 212, 213,
  60                                       206, 207, 201, 200, 199, 199,
  61                                       198, 198, 197, 197, 196, 196};
  62
  63 int ncurses_display(deck_t *deck, int notrans, int nofade, int invert, int reload, int noreload) {
  64
  65     int c = 0;          // char
  66     int i = 0;          // iterate
  67     int l = 0;          // line number
  68     int lc = 0;         // line count
  69     int sc = 1;         // slide count
  70     int colors = 0;     // amount of colors supported
  71     int fade = 0;       // disable color fading by default
  72     int trans = -1;     // enable transparency if term supports it
  73     int max_lines = 0;  // max lines per slide
  74     int max_cols = 0;   // max columns per line
  75     int offset;         // text offset
  76
  77     // header line 1 is displayed at the top
  78     int bar_top = (deck->headers > 0) ? 1 : 0;
  79     // header line 2 is displayed at the bottom
  80     // anyway we display the slide number at the bottom
  81     int bar_bottom = 1;
  82
  83     slide_t *slide = deck->slide;
  84     line_t *line;
  85
  86     // set locale to display UTF-8 correctly in ncurses
  87     setlocale(LC_CTYPE, "");
  88
  89     // init ncurses
  90     initscr();
  91
  92     while(slide) {
  93         lc = 0;
  94         line = slide->line;
  95
  96         while(line && line->text) {
  97
  98             if (line->text->text)
  99                 lc += url_count_inline(line->text->text);
 100
 101             if (line->text->text)
 102                 line->length -= url_len_inline(line->text->text);
 103
 104             if(line->length > COLS) {
 105                 i = line->length;
 106                 offset = 0;
 107                 while(i > COLS) {
 108
 109                     i = prev_blank(line->text, offset + COLS) - offset;
 110
 111                     // single word is > COLS
 112                     if(!i) {
 113                         // calculate min_width
 114                         i = next_blank(line->text, offset + COLS) - offset;
 115
 116                         // disable ncurses
 117                         endwin();
 118
 119                         // print error
 120                         fprintf(stderr, "Error: Terminal width (%i columns) too small. Need at least %i columns.\n", COLS, i);
 121                         fprintf(stderr, "You may need to shorten some lines by inserting line breaks.\n");
 122
 123                         // no reload
 124                         return 0;
 125                     }
 126
 127                     // set max_cols
 128                     max_cols = MAX(i, max_cols);
 129
 130                     // iterate to next line
 131                     offset = prev_blank(line->text, offset + COLS);
 132                     i = line->length - offset;
 133                     lc++;
 134                 }
 135                 // set max_cols one last time
 136                 max_cols = MAX(i, max_cols);
 137             } else {
 138                 // set max_cols
 139                 max_cols = MAX(line->length, max_cols);
 140             }
 141             lc++;
 142             line = line->next;
 143         }
 144
 145         max_lines = MAX(lc, max_lines);
 146
 147         slide = slide->next;
 148     }
 149
 150     // not enough lines
 151     if(max_lines + bar_top + bar_bottom > LINES) {
 152
 153         // disable ncurses
 154         endwin();
 155
 156         // print error
 157         fprintf(stderr, "Error: Terminal height (%i lines) too small. Need at least %i lines.\n", LINES, max_lines + bar_top + bar_bottom);
 158         fprintf(stderr, "You may need to add additional horizontal rules (---) to split your file in shorter slides.\n");
 159
 160         // no reload
 161         return 0;
 162     }
 163
 164     // disable cursor
 165     curs_set(0);
 166
 167     // disable output of keyboard typing
 168     noecho();
 169
 170     // make getch() process one char at a time
 171     cbreak();
 172
 173     // enable arrow keys
 174     keypad(stdscr,TRUE);
 175
 176     // set colors
 177     if(has_colors() == TRUE) {
 178         start_color();
 179         use_default_colors();
 180
 181         // 256 color mode
 182         if(COLORS == 256) {
 183
 184             if(notrans) {
 185                 if(invert) {
 186                     trans = 15; // white in 256 color mode
 187                 } else {
 188                     trans = 16; // black in 256 color mode
 189                 }
 190             }
 191
 192             if(invert) {
 193                 init_pair(CP_WHITE, 232, trans);
 194                 init_pair(CP_BLUE, 21, trans);
 195                 init_pair(CP_RED, 196, trans);
 196                 init_pair(CP_BLACK, 15, 232);
 197             } else {
 198                 init_pair(CP_WHITE, 255, trans);
 199                 init_pair(CP_BLUE, 123, trans);
 200                 init_pair(CP_RED, 213, trans);
 201                 init_pair(CP_BLACK, 16, 255);
 202             }
 203             init_pair(CP_YELLOW, 208, trans);
 204
 205             // enable color fading
 206             if(!nofade)
 207                 fade = true;
 208
 209         // 8 color mode
 210         } else {
 211
 212             if(notrans) {
 213                 if(invert) {
 214                     trans = 7; // white in 8 color mode
 215                 } else {
 216                     trans = 0; // black in 8 color mode
 217                 }
 218             }
 219
 220             if(invert) {
 221                 init_pair(CP_WHITE, 0, trans);
 222                 init_pair(CP_BLACK, 7, 0);
 223             } else {
 224                 init_pair(CP_WHITE, 7, trans);
 225                 init_pair(CP_BLACK, 0, 7);
 226             }
 227             init_pair(CP_BLUE, 4, trans);
 228             init_pair(CP_RED, 1, trans);
 229             init_pair(CP_YELLOW, 3, trans);
 230         }
 231
 232         colors = 1;
 233     }
 234
 235     // set background color of main window
 236     if(colors)
 237         wbkgd(stdscr, COLOR_PAIR(CP_YELLOW));
 238
 239     // setup main window
 240     WINDOW *content = newwin(LINES - bar_top - bar_bottom, COLS, 0 + bar_top, 0);
 241     if(colors)
 242         wbkgd(content, COLOR_PAIR(CP_WHITE));
 243
 244     slide = deck->slide;
 245
 246     // find slide to reload
 247     while(reload > 1 && reload <= deck->slides) {
 248         slide = slide->next;
 249         sc++;
 250         reload--;
 251     }
 252
 253     // reset reload indicator
 254     reload = 0;
 255
 256     while(slide) {
 257
 258         url_init();
 259
 260         // clear windows
 261         werase(content);
 262         werase(stdscr);
 263
 264         // always resize window in case terminal geometry has changed
 265         wresize(content, LINES - bar_top - bar_bottom, COLS);
 266
 267         // setup header
 268         if(bar_top) {
 269             line = deck->header;
 270             offset = next_blank(line->text, 0) + 1;
 271             // add text to header
 272             mvwprintw(stdscr,
 273                       0, (COLS - line->length + offset) / 2,
 274                       "%s", &line->text->text[offset]);
 275         }
 276
 277         // setup footer
 278         if(deck->headers > 1) {
 279             line = deck->header->next;
 280             offset = next_blank(line->text, 0) + 1;
 281             // add text to left footer
 282             mvwprintw(stdscr,
 283                       LINES - 1, 3,
 284                       "%s", &line->text->text[offset]);
 285         }
 286         // add slide number to right footer
 287         mvwprintw(stdscr,
 288                   LINES - 1, COLS - int_length(deck->slides) - int_length(sc) - 6,
 289                   "%d / %d", sc, deck->slides);
 290
 291         // make header + fooder visible
 292         wrefresh(content);
 293         wrefresh(stdscr);
 294
 295         line = slide->line;
 296         l = 0;
 297
 298         // print lines
 299         while(line) {
 300             add_line(content, l, (COLS - max_cols) / 2, line, max_cols, colors);
 301             l += (line->length / COLS) + 1;
 302             line = line->next;
 303         }
 304
 305         int i, ymax;
 306         getmaxyx( content, ymax, i );
 307         for (i = 0; i < url_get_amount(); i++) {
 308             mvwprintw(content, ymax - url_get_amount() - 1 + i, 3,
 309                       "[%d] %s", i, url_get_target(i));
 310         }
 311
 312         // make content visible
 313         wrefresh(content);
 314
 315         // fade in
 316         if(fade)
 317             fade_in(content, trans, colors, invert);
 318
 319         // re-enable fading after any undefined key press
 320         if(COLORS == 256 && !nofade)
 321             fade = true;
 322
 323         // wait for user input
 324         c = getch();
 325
 326         // evaluate user input
 327         i = 0;
 328         switch(c) {
 329
 330             // show previous slide
 331             case KEY_UP:
 332             case KEY_LEFT:
 333             case KEY_PPAGE:
 334             case 8:   // BACKSPACE (ascii)
 335             case 127: // BACKSPACE (xterm)
 336             case 263: // BACKSPACE (getty)
 337             case 'h':
 338             case 'k':
 339                 if(slide->prev) {
 340                     slide = slide->prev;
 341                     sc--;
 342                 } else {
 343                     fade = false;
 344                 }
 345                 break;
 346
 347             // show next slide
 348             case KEY_DOWN:
 349             case KEY_RIGHT:
 350             case KEY_NPAGE:
 351             case '\n': // ENTER
 352             case ' ':  // SPACE
 353             case 'j':
 354             case 'l':
 355                 if(slide->next) {
 356                     slide = slide->next;
 357                     sc++;
 358                 } else {
 359                     fade = false;
 360                 }
 361                 break;
 362
 363             // show slide n
 364             case '9':
 365             case '8':
 366             case '7':
 367             case '6':
 368             case '5':
 369             case '4':
 370             case '3':
 371             case '2':
 372             case '1':
 373                 i = get_slide_number(c);
 374                 if(i > 0 && i <= deck->slides) {
 375                     while(sc != i) {
 376                         // search forward
 377                         if(sc < i) {
 378                             if(slide->next) {
 379                                 slide = slide->next;
 380                                 sc++;
 381                             }
 382                         // search backward
 383                         } else {
 384                             if(slide->prev) {
 385                                 slide = slide->prev;
 386                                 sc--;
 387                             }
 388                         }
 389                     }
 390                 } else {
 391                     // disable fading if slide n doesn't exist
 392                     fade = false;
 393                 }
 394                 break;
 395
 396             // show first slide
 397             case 'g':
 398             case KEY_HOME:
 399                 slide = deck->slide;
 400                 sc = 1;
 401                 break;
 402
 403             // show last slide
 404             case 'G':
 405             case KEY_END:
 406                 for(i = sc; i <= deck->slides; i++) {
 407                     if(slide->next) {
 408                             slide = slide->next;
 409                             sc++;
 410                     }
 411                 }
 412                 break;
 413
 414             // reload
 415             case 'r':
 416                 if(noreload == 0) {
 417                     // reload slide N
 418                     reload = sc;
 419                     slide = NULL;
 420                 } else {
 421                     // disable fading if reload is not possible
 422                     fade = false;
 423                 }
 424                 break;
 425
 426             // quit
 427             case 'q':
 428                 // do not fade out on exit
 429                 fade = false;
 430                 // do not reload
 431                 reload = 0;
 432                 slide = NULL;
 433                 break;
 434
 435             default:
 436                 // disable fading on undefined key press
 437                 fade = false;
 438                 break;
 439         }
 440
 441         // fade out
 442         if(fade)
 443             fade_out(content, trans, colors, invert);
 444
 445         url_purge();
 446     }
 447
 448     // disable ncurses
 449     endwin();
 450
 451     // free ncurses memory
 452     delwin(content);
 453     if(reload == 0)
 454         delwin(stdscr);
 455
 456     // return reload indicator (0 means no reload)
 457     return reload;
 458 }
 459
 460 void add_line(WINDOW *window, int y, int x, line_t *line, int max_cols, int colors) {
 461
 462     if(!line->text->text) {
 463         return;
 464     }
 465
 466     int i; // increment
 467     int offset = 0; // text offset
 468
 469     // move the cursor in position
 470     wmove(window, y, x);
 471
 472     // IS_UNORDERED_LIST_3
 473     if(CHECK_BIT(line->bits, IS_UNORDERED_LIST_3)) {
 474         offset = next_nonblank(line->text, 0);
 475         char prompt[13];
 476         strcpy(&prompt[0], CHECK_BIT(line->bits, IS_UNORDERED_LIST_1)? " |  " : "    ");
 477         strcpy(&prompt[4], CHECK_BIT(line->bits, IS_UNORDERED_LIST_2)? " |  " : "    ");
 478
 479         if(CHECK_BIT(line->bits, IS_UNORDERED_LIST_EXT)) {
 480             strcpy(&prompt[8], line->next && CHECK_BIT(line->next->bits, IS_UNORDERED_LIST_3)? " |  " : "    ");
 481         } else {
 482             strcpy(&prompt[8], " +- ");
 483             offset += 2;
 484         }
 485
 486         wprintw(window,
 487                 "%s", prompt);
 488
 489         if(!CHECK_BIT(line->bits, IS_CODE))
 490             inline_display(window, &line->text->text[offset], colors);
 491
 492     // IS_UNORDERED_LIST_2
 493     } else if(CHECK_BIT(line->bits, IS_UNORDERED_LIST_2)) {
 494         offset = next_nonblank(line->text, 0);
 495         char prompt[9];
 496         strcpy(&prompt[0], CHECK_BIT(line->bits, IS_UNORDERED_LIST_1)? " |  " : "    ");
 497
 498         if(CHECK_BIT(line->bits, IS_UNORDERED_LIST_EXT)) {
 499             strcpy(&prompt[4], line->next && CHECK_BIT(line->next->bits, IS_UNORDERED_LIST_2)? " |  " : "    ");
 500         } else {
 501             strcpy(&prompt[4], " +- ");
 502             offset += 2;
 503         }
 504
 505         wprintw(window,
 506                 "%s", prompt);
 507
 508         if(!CHECK_BIT(line->bits, IS_CODE))
 509             inline_display(window, &line->text->text[offset], colors);
 510
 511     // IS_UNORDERED_LIST_1
 512     } else if(CHECK_BIT(line->bits, IS_UNORDERED_LIST_1)) {
 513         offset = next_nonblank(line->text, 0);
 514         char prompt[5];
 515
 516         if(CHECK_BIT(line->bits, IS_UNORDERED_LIST_EXT)) {
 517             strcpy(&prompt[0], line->next && CHECK_BIT(line->next->bits, IS_UNORDERED_LIST_1)? " |  " : "    ");
 518         } else {
 519             strcpy(&prompt[0], " +- ");
 520             offset += 2;
 521         }
 522
 523         wprintw(window,
 524                 "%s", prompt);
 525
 526         if(!CHECK_BIT(line->bits, IS_CODE))
 527             inline_display(window, &line->text->text[offset], colors);
 528     }
 529
 530     // IS_CODE
 531     if(CHECK_BIT(line->bits, IS_CODE)) {
 532
 533         // set static offset for code
 534         offset = CODE_INDENT;
 535
 536         // reverse color for code blocks
 537         if(colors)
 538             wattron(window, COLOR_PAIR(CP_BLACK));
 539
 540         // print whole lines
 541         wprintw(window,
 542                 "%s", &line->text->text[offset]);
 543     }
 544
 545     if(!CHECK_BIT(line->bits, IS_UNORDERED_LIST_1) &&
 546        !CHECK_BIT(line->bits, IS_UNORDERED_LIST_2) &&
 547        !CHECK_BIT(line->bits, IS_UNORDERED_LIST_3) &&
 548        !CHECK_BIT(line->bits, IS_CODE)) {
 549
 550         // IS_QUOTE
 551         if(CHECK_BIT(line->bits, IS_QUOTE)) {
 552             while(line->text->text[offset] == '>') {
 553                 // print a reverse color block
 554                 if(colors) {
 555                     wattron(window, COLOR_PAIR(CP_BLACK));
 556                     wprintw(window, "%s", " ");
 557                     wattron(window, COLOR_PAIR(CP_WHITE));
 558                     wprintw(window, "%s", " ");
 559                 } else {
 560                     wprintw(window, "%s", ">");
 561                 }
 562
 563                 // find next quote or break
 564                 offset++;
 565                 if(line->text->text[offset] == ' ')
 566                     offset = next_word(line->text, offset);
 567             }
 568
 569             inline_display(window, &line->text->text[offset], colors);
 570         } else {
 571
 572             // IS_CENTER
 573             if(CHECK_BIT(line->bits, IS_CENTER)) {
 574                 if(line->length < max_cols) {
 575                     wmove(window, y, x + ((max_cols - line->length) / 2));
 576                 }
 577             }
 578
 579             // IS_H1 || IS_H2
 580             if(CHECK_BIT(line->bits, IS_H1) || CHECK_BIT(line->bits, IS_H2)) {
 581
 582                 // set headline color
 583                 if(colors)
 584                     wattron(window, COLOR_PAIR(CP_BLUE));
 585
 586                 // enable underline for H1
 587                 if(CHECK_BIT(line->bits, IS_H1))
 588                     wattron(window, A_UNDERLINE);
 589
 590                 // skip hashes
 591                 while(line->text->text[offset] == '#')
 592                     offset = next_word(line->text, offset);
 593
 594                 // print whole lines
 595                 wprintw(window,
 596                         "%s", &line->text->text[offset]);
 597
 598                 wattroff(window, A_UNDERLINE);
 599
 600             // no line-wide markdown
 601             } else {
 602
 603                 inline_display(window, &line->text->text[offset], colors);
 604             }
 605         }
 606     }
 607
 608     // fill rest off line with spaces
 609     for(i = getcurx(window) - x; i < max_cols; i++)
 610         wprintw(window, "%s", " ");
 611
 612     // reset to default color
 613     if(colors)
 614         wattron(window, COLOR_PAIR(CP_WHITE));
 615     wattroff(window, A_UNDERLINE);
 616 }
 617
 618 void inline_display(WINDOW *window, const char *c, const int colors) {
 619     const static char *special = "\\*_`!["; // list of interpreted chars
 620     const char *i = c; // iterator
 621     const char *start_link_name, *start_url;
 622     int length_link_name, url_num;
 623     cstack_t *stack = cstack_init();
 624
 625
 626     // for each char in line
 627     for(; *i; i++) {
 628
 629         // if char is in special char list
 630         if(strchr(special, *i)) {
 631
 632             // closing special char (or second backslash)
 633             // only if not followed by :alnum:
 634             if((stack->top)(stack, *i) &&
 635                (!isalnum((int)i[1]) || *(i + 1) == '\0' || *i == '\\')) {
 636
 637                 switch(*i) {
 638                     // print escaped backslash
 639                     case '\\':
 640                         wprintw(window, "%c", *i);
 641                         break;
 642                     // disable highlight
 643                     case '*':
 644                         if(colors)
 645                             wattron(window, COLOR_PAIR(CP_WHITE));
 646                         break;
 647                     // disable underline
 648                     case '_':
 649                         wattroff(window, A_UNDERLINE);
 650                         break;
 651                     // disable inline code
 652                     case '`':
 653                         if(colors)
 654                             wattron(window, COLOR_PAIR(CP_WHITE));
 655                         break;
 656                 }
 657
 658                 // remove top special char from stack
 659                 (stack->pop)(stack);
 660
 661             // treat special as regular char
 662             } else if((stack->top)(stack, '\\')) {
 663                 wprintw(window, "%c", *i);
 664
 665                 // remove backslash from stack
 666                 (stack->pop)(stack);
 667
 668             // opening special char
 669             } else {
 670
 671                 // emphasis or code span can start after new-line or space only
 672                 // and of cause after another emphasis markup
 673                 //TODO this condition looks ugly
 674                 if(i == c ||
 675                    *(i - 1) == ' ' ||
 676                    ((*(i - 1) == '_' || *(i - 1) == '*') && ((i - 1) == c || *(i - 2) == ' ')) ||
 677                    *i == '\\') {
 678
 679                     // url in pandoc style
 680                     if ((*i == '[' && strchr(i, ']')) ||
 681                         (*i == '!' && *(i + 1) == '[' && strchr(i, ']'))) {
 682
 683                         if (*i == '!') i++;
 684
 685                         if (strchr(i, ']')[1] == '(') {
 686                             i++;
 687
 688                             // turn higlighting and underlining on
 689                             if (colors)
 690                                 wattron(window, COLOR_PAIR(CP_BLUE));
 691                             wattron(window, A_UNDERLINE);
 692
 693                             start_link_name = i;
 694
 695                             // print the content of the label
 696                             // the label is printed as is
 697                             do {
 698                                 wprintw(window, "%c", *i);
 699                                 i++;
 700                             } while (*i != ']');
 701
 702                             length_link_name = i - 1 - start_link_name;
 703
 704                             i++;
 705                             i++;
 706
 707                             start_url = i;
 708
 709                             while (*i != ')') i++;
 710
 711                             url_num = url_add(start_link_name, length_link_name, start_url, i - start_url, 0,0);
 712
 713                             wprintw(window, " [%d]", url_num);
 714
 715                             // turn highlighting and underlining off
 716                             wattroff(window, A_UNDERLINE);
 717                             wattron(window, COLOR_PAIR(CP_WHITE));
 718
 719                         } else {
 720                             wprintw(window, "[");
 721                         }
 722
 723                     } else switch(*i) {
 724                         // enable highlight
 725                         case '*':
 726                             if(colors)
 727                                 wattron(window, COLOR_PAIR(CP_RED));
 728                             break;
 729                         // enable underline
 730                         case '_':
 731                             wattron(window, A_UNDERLINE);
 732                             break;
 733                         // enable inline code
 734                         case '`':
 735                             if(colors)
 736                                 wattron(window, COLOR_PAIR(CP_BLACK));
 737                             break;
 738                         // do nothing for backslashes
 739                     }
 740
 741                     // push special char to stack
 742                     (stack->push)(stack, *i);
 743
 744                 } else {
 745                     wprintw(window, "%c", *i);
 746                 }
 747             }
 748
 749         } else {
 750             // remove backslash from stack
 751             if((stack->top)(stack, '\\'))
 752                 (stack->pop)(stack);
 753
 754             // print regular char
 755             wprintw(window, "%c", *i);
 756         }
 757     }
 758
 759     // pop stack until empty to prevent formated trailing spaces
 760     while(!(stack->empty)(stack)) {
 761         switch((stack->pop)(stack)) {
 762             // disable highlight
 763             case '*':
 764                 if(colors)
 765                     wattron(window, COLOR_PAIR(CP_WHITE));
 766                 break;
 767             // disable underline
 768             case '_':
 769                 wattroff(window, A_UNDERLINE);
 770                 break;
 771             // disable inline code
 772             case '`':
 773                 if(colors)
 774                     wattron(window, COLOR_PAIR(CP_WHITE));
 775                 break;
 776             // do nothing for backslashes
 777         }
 778     }
 779
 780     (stack->delete)(stack);
 781 }
 782
 783 void fade_out(WINDOW *window, int trans, int colors, int invert) {
 784     int i; // increment
 785     if(colors && COLORS == 256) {
 786         for(i = 22; i >= 0; i--) {
 787
 788             // dim color pairs
 789             if(invert) {
 790                 init_pair(CP_WHITE, white_ramp_invert[i], trans);
 791                 init_pair(CP_BLUE, blue_ramp_invert[i], trans);
 792                 init_pair(CP_RED, red_ramp_invert[i], trans);
 793                 init_pair(CP_BLACK, 15, white_ramp_invert[i]);
 794             } else {
 795                 init_pair(CP_WHITE, white_ramp[i], trans);
 796                 init_pair(CP_BLUE, blue_ramp[i], trans);
 797                 init_pair(CP_RED, red_ramp[i], trans);
 798                 init_pair(CP_BLACK, 16, white_ramp[i]);
 799             }
 800
 801             // refresh window with new color
 802             wrefresh(window);
 803
 804             // delay for our eyes to recognize the change
 805             usleep(FADE_DELAY);
 806         }
 807     }
 808 }
 809
 810 void fade_in(WINDOW *window, int trans, int colors, int invert) {
 811     int i; // increment
 812     if(colors && COLORS == 256) {
 813         for(i = 0; i <= 23; i++) {
 814
 815             // brighten color pairs
 816             if(invert) {
 817                 init_pair(CP_WHITE, white_ramp_invert[i], trans);
 818                 init_pair(CP_BLUE, blue_ramp_invert[i], trans);
 819                 init_pair(CP_RED, red_ramp_invert[i], trans);
 820                 init_pair(CP_BLACK, 15, white_ramp_invert[i]);
 821             } else {
 822                 init_pair(CP_WHITE, white_ramp[i], trans);
 823                 init_pair(CP_BLUE, blue_ramp[i], trans);
 824                 init_pair(CP_RED, red_ramp[i], trans);
 825                 init_pair(CP_BLACK, 16, white_ramp[i]);
 826             }
 827
 828             // refresh window with new color
 829             wrefresh(window);
 830
 831             // delay for our eyes to recognize the change
 832             usleep(FADE_DELAY);
 833         }
 834     }
 835 }
 836
 837 int int_length (int val) {
 838     int l = 1;
 839     while(val > 9) {
 840         l++;
 841         val /= 10;
 842     }
 843     return l;
 844 }
 845
 846 int get_slide_number(char init) {
 847     int retval = init - '0';
 848     char c;
 849     // block for tenths of a second when using getch, ERR if no input
 850     halfdelay(GOTO_SLIDE_DELAY);
 851     while((c = getch()) != ERR) {
 852         if (c < '0' || c > '9') {
 853             retval = -1;
 854             break;
 855         }
 856         retval = (retval * 10) + (c - '0');
 857     }
 858     nocbreak();     // cancel half delay mode
 859     cbreak();       // go back to cbreak
 860     return retval;
 861 }