1 /**************************************************************************** 2 * Copyright (c) 2002 Free Software Foundation, Inc. * 3 * * 4 * Permission is hereby granted, free of charge, to any person obtaining a * 5 * copy of this software and associated documentation files (the * 6 * "Software"), to deal in the Software without restriction, including * 7 * without limitation the rights to use, copy, modify, merge, publish, * 8 * distribute, distribute with modifications, sublicense, and/or sell * 9 * copies of the Software, and to permit persons to whom the Software is * 10 * furnished to do so, subject to the following conditions: * 11 * * 12 * The above copyright notice and this permission notice shall be included * 13 * in all copies or substantial portions of the Software. * 14 * * 15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * 16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * 17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * 18 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * 19 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * 20 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * 21 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. * 22 * * 23 * Except as contained in this notice, the name(s) of the above copyright * 24 * holders shall not be used in advertising or otherwise to promote the * 25 * sale, use or other dealings in this Software without prior written * 26 * authorization. * 27 ****************************************************************************/ 28 29 /**************************************************************************** 30 * Author: Thomas E. Dickey 2002 * 31 ****************************************************************************/ 32 33 /* 34 ** lib_unget_wch.c 35 ** 36 ** The routine unget_wch(). 37 ** 38 */ 39 40 #include <curses.priv.h> 41 42 MODULE_ID("$Id: lib_unget_wch.c,v 1.2 2002/03/17 00:01:38 tom Exp $") 43 44 NCURSES_EXPORT(int) 45 unget_wch(const wchar_t wch) 46 { 47 int result = OK; 48 mbstate_t state; 49 size_t length; 50 int n; 51 52 T((T_CALLED("unget_wch(%d)"), wch)); 53 54 memset(&state, 0, sizeof(state)); 55 length = wcrtomb(0, wch, &state); 56 57 if (length != (size_t) (-1) 58 && length != 0) { 59 char *string = malloc(length); 60 61 memset(&state, 0, sizeof(state)); 62 wcrtomb(string, wch, &state); 63 64 for (n = (int) (length - 1); n >= 0; --n) { 65 if (ungetch(string[n]) != OK) { 66 result = ERR; 67 break; 68 } 69 } 70 free(string); 71 } else { 72 result = ERR; 73 } 74 75 returnCode(result); 76 } 77