1 |
|
|
/* $OpenBSD: lib_ungetch.c,v 1.3 2010/01/12 23:22:06 nicm Exp $ */ |
2 |
|
|
|
3 |
|
|
/**************************************************************************** |
4 |
|
|
* Copyright (c) 1998-2007,2008 Free Software Foundation, Inc. * |
5 |
|
|
* * |
6 |
|
|
* Permission is hereby granted, free of charge, to any person obtaining a * |
7 |
|
|
* copy of this software and associated documentation files (the * |
8 |
|
|
* "Software"), to deal in the Software without restriction, including * |
9 |
|
|
* without limitation the rights to use, copy, modify, merge, publish, * |
10 |
|
|
* distribute, distribute with modifications, sublicense, and/or sell * |
11 |
|
|
* copies of the Software, and to permit persons to whom the Software is * |
12 |
|
|
* furnished to do so, subject to the following conditions: * |
13 |
|
|
* * |
14 |
|
|
* The above copyright notice and this permission notice shall be included * |
15 |
|
|
* in all copies or substantial portions of the Software. * |
16 |
|
|
* * |
17 |
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * |
18 |
|
|
* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * |
19 |
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * |
20 |
|
|
* IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * |
21 |
|
|
* DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * |
22 |
|
|
* OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * |
23 |
|
|
* THE USE OR OTHER DEALINGS IN THE SOFTWARE. * |
24 |
|
|
* * |
25 |
|
|
* Except as contained in this notice, the name(s) of the above copyright * |
26 |
|
|
* holders shall not be used in advertising or otherwise to promote the * |
27 |
|
|
* sale, use or other dealings in this Software without prior written * |
28 |
|
|
* authorization. * |
29 |
|
|
****************************************************************************/ |
30 |
|
|
|
31 |
|
|
/**************************************************************************** |
32 |
|
|
* Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995 * |
33 |
|
|
* and: Eric S. Raymond <esr@snark.thyrsus.com> * |
34 |
|
|
* and: Thomas E. Dickey 1996-on * |
35 |
|
|
****************************************************************************/ |
36 |
|
|
|
37 |
|
|
/* |
38 |
|
|
** lib_ungetch.c |
39 |
|
|
** |
40 |
|
|
** The routine ungetch(). |
41 |
|
|
** |
42 |
|
|
*/ |
43 |
|
|
|
44 |
|
|
#include <curses.priv.h> |
45 |
|
|
|
46 |
|
|
MODULE_ID("$Id: lib_ungetch.c,v 1.3 2010/01/12 23:22:06 nicm Exp $") |
47 |
|
|
|
48 |
|
|
#include <fifo_defs.h> |
49 |
|
|
|
50 |
|
|
#ifdef TRACE |
51 |
|
|
NCURSES_EXPORT(void) |
52 |
|
|
_nc_fifo_dump(SCREEN *sp) |
53 |
|
|
{ |
54 |
|
|
int i; |
55 |
|
|
T(("head = %d, tail = %d, peek = %d", head, tail, peek)); |
56 |
|
|
for (i = 0; i < 10; i++) |
57 |
|
|
T(("char %d = %s", i, _nc_tracechar(sp, sp->_fifo[i]))); |
58 |
|
|
} |
59 |
|
|
#endif /* TRACE */ |
60 |
|
|
|
61 |
|
|
NCURSES_EXPORT(int) |
62 |
|
|
_nc_ungetch(SCREEN *sp, int ch) |
63 |
|
|
{ |
64 |
|
|
int rc = ERR; |
65 |
|
|
|
66 |
|
|
if (tail != -1) { |
67 |
|
|
if (head == -1) { |
68 |
|
|
head = 0; |
69 |
|
|
t_inc(); |
70 |
|
|
peek = tail; /* no raw keys */ |
71 |
|
|
} else |
72 |
|
|
h_dec(); |
73 |
|
|
|
74 |
|
|
sp->_fifo[head] = ch; |
75 |
|
|
T(("ungetch %s ok", _nc_tracechar(sp, ch))); |
76 |
|
|
#ifdef TRACE |
77 |
|
|
if (USE_TRACEF(TRACE_IEVENT)) { |
78 |
|
|
_nc_fifo_dump(sp); |
79 |
|
|
_nc_unlock_global(tracef); |
80 |
|
|
} |
81 |
|
|
#endif |
82 |
|
|
rc = OK; |
83 |
|
|
} |
84 |
|
|
return rc; |
85 |
|
|
} |
86 |
|
|
|
87 |
|
|
NCURSES_EXPORT(int) |
88 |
|
|
ungetch(int ch) |
89 |
|
|
{ |
90 |
|
|
T((T_CALLED("ungetch(%s)"), _nc_tracechar(SP, ch))); |
91 |
|
|
returnCode(_nc_ungetch(SP, ch)); |
92 |
|
|
} |