Function wgetch

Utilities/cmpdcurses/pdcurses/getch.c:323–467

}

int wgetch(WINDOW *win)
{
    int key, waitcount;

    PDC_LOG(("wgetch() - called\n"));

    if (!win || !SP)
        return ERR;

    waitcount = 0;

    /* set the number of 1/20th second napms() calls */

    if (SP->delaytenths)
        waitcount = 2 * SP->delaytenths;
    else
        if (win->_delayms)
        {
            /* Can't really do millisecond intervals, so delay in
               1/20ths of a second (50ms) */

            waitcount = win->_delayms / 50;
            if (!waitcount)
                waitcount = 1;
        }

    /* refresh window when wgetch is called if there have been changes
       to it and it is not a pad */

    if (!(win->_flags & _PAD) && ((!win->_leaveit &&
         (win->_begx + win->_curx != SP->curscol ||
          win->_begy + win->_cury != SP->cursrow)) || is_wintouched(win)))
        wrefresh(win);

    /* if ungotten char exists, remove and return it */

    if (SP->c_ungind)
        return SP->c_ungch[--(SP->c_ungind)];

    /* if normal and data in buffer */

    if ((!SP->raw_inp && !SP->cbreak) && (SP->c_gindex < SP->c_pindex))
        return SP->c_buffer[SP->c_gindex++];

    /* prepare to buffer data */

    SP->c_pindex = 0;
    SP->c_gindex = 0;

    /* to get here, no keys are buffered. go and get one. */

    for (;;)            /* loop for any buffering */
    {
        /* is there a keystroke ready? */

        if (!PDC_check_key())
        {
            /* if not, handle timeout() and halfdelay() */