150276Speter/**************************************************************************** 2178866Srafan * Copyright (c) 1998-2007,2008 Free Software Foundation, Inc. * 350276Speter * * 450276Speter * Permission is hereby granted, free of charge, to any person obtaining a * 550276Speter * copy of this software and associated documentation files (the * 650276Speter * "Software"), to deal in the Software without restriction, including * 750276Speter * without limitation the rights to use, copy, modify, merge, publish, * 850276Speter * distribute, distribute with modifications, sublicense, and/or sell * 950276Speter * copies of the Software, and to permit persons to whom the Software is * 1050276Speter * furnished to do so, subject to the following conditions: * 1150276Speter * * 1250276Speter * The above copyright notice and this permission notice shall be included * 1350276Speter * in all copies or substantial portions of the Software. * 1450276Speter * * 1550276Speter * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * 1650276Speter * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * 1750276Speter * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * 1850276Speter * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * 1950276Speter * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * 2050276Speter * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * 2150276Speter * THE USE OR OTHER DEALINGS IN THE SOFTWARE. * 2250276Speter * * 2350276Speter * Except as contained in this notice, the name(s) of the above copyright * 2450276Speter * holders shall not be used in advertising or otherwise to promote the * 2550276Speter * sale, use or other dealings in this Software without prior written * 2650276Speter * authorization. * 2750276Speter ****************************************************************************/ 2850276Speter 2950276Speter/**************************************************************************** 3050276Speter * Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995 * 3150276Speter * and: Eric S. Raymond <esr@snark.thyrsus.com> * 32178866Srafan * and: Thomas E. Dickey 1996-on * 3350276Speter ****************************************************************************/ 3450276Speter 3550276Speter/* 3650276Speter** lib_ungetch.c 3750276Speter** 3850276Speter** The routine ungetch(). 3950276Speter** 4050276Speter*/ 4150276Speter 4250276Speter#include <curses.priv.h> 4350276Speter 44184989SrafanMODULE_ID("$Id: lib_ungetch.c,v 1.11 2008/05/31 16:44:54 tom Exp $") 4550276Speter 4650276Speter#include <fifo_defs.h> 4750276Speter 4850276Speter#ifdef TRACE 4976726SpeterNCURSES_EXPORT(void) 50178866Srafan_nc_fifo_dump(SCREEN *sp) 5150276Speter{ 5276726Speter int i; 5376726Speter T(("head = %d, tail = %d, peek = %d", head, tail, peek)); 5476726Speter for (i = 0; i < 10; i++) 55184989Srafan T(("char %d = %s", i, _nc_tracechar(sp, sp->_fifo[i]))); 5650276Speter} 5750276Speter#endif /* TRACE */ 5850276Speter 5976726SpeterNCURSES_EXPORT(int) 60178866Srafan_nc_ungetch(SCREEN *sp, int ch) 6150276Speter{ 62178866Srafan int rc = ERR; 6397049Speter 64178866Srafan if (tail != -1) { 65178866Srafan if (head == -1) { 66178866Srafan head = 0; 67178866Srafan t_inc(); 6876726Speter peek = tail; /* no raw keys */ 69178866Srafan } else 70178866Srafan h_dec(); 7150276Speter 72178866Srafan sp->_fifo[head] = ch; 73184989Srafan T(("ungetch %s ok", _nc_tracechar(sp, ch))); 7450276Speter#ifdef TRACE 75178866Srafan if (USE_TRACEF(TRACE_IEVENT)) { 76178866Srafan _nc_fifo_dump(sp); 77178866Srafan _nc_unlock_global(tracef); 78178866Srafan } 79178866Srafan#endif 80178866Srafan rc = OK; 81174993Srafan } 82178866Srafan return rc; 8350276Speter} 84178866Srafan 85178866SrafanNCURSES_EXPORT(int) 86178866Srafanungetch(int ch) 87178866Srafan{ 88184989Srafan T((T_CALLED("ungetch(%s)"), _nc_tracechar(SP, ch))); 89178866Srafan returnCode(_nc_ungetch(SP, ch)); 90178866Srafan} 91