xref: /freebsd/contrib/ncurses/ncurses/widechar/lib_unget_wch.c (revision 39f2269fcb4873fd97d70af944ec49f4230fadea)
139f2269fSPeter Wemm /****************************************************************************
239f2269fSPeter Wemm  * Copyright (c) 2002 Free Software Foundation, Inc.                        *
339f2269fSPeter Wemm  *                                                                          *
439f2269fSPeter Wemm  * Permission is hereby granted, free of charge, to any person obtaining a  *
539f2269fSPeter Wemm  * copy of this software and associated documentation files (the            *
639f2269fSPeter Wemm  * "Software"), to deal in the Software without restriction, including      *
739f2269fSPeter Wemm  * without limitation the rights to use, copy, modify, merge, publish,      *
839f2269fSPeter Wemm  * distribute, distribute with modifications, sublicense, and/or sell       *
939f2269fSPeter Wemm  * copies of the Software, and to permit persons to whom the Software is    *
1039f2269fSPeter Wemm  * furnished to do so, subject to the following conditions:                 *
1139f2269fSPeter Wemm  *                                                                          *
1239f2269fSPeter Wemm  * The above copyright notice and this permission notice shall be included  *
1339f2269fSPeter Wemm  * in all copies or substantial portions of the Software.                   *
1439f2269fSPeter Wemm  *                                                                          *
1539f2269fSPeter Wemm  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
1639f2269fSPeter Wemm  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
1739f2269fSPeter Wemm  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
1839f2269fSPeter Wemm  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
1939f2269fSPeter Wemm  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
2039f2269fSPeter Wemm  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
2139f2269fSPeter Wemm  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
2239f2269fSPeter Wemm  *                                                                          *
2339f2269fSPeter Wemm  * Except as contained in this notice, the name(s) of the above copyright   *
2439f2269fSPeter Wemm  * holders shall not be used in advertising or otherwise to promote the     *
2539f2269fSPeter Wemm  * sale, use or other dealings in this Software without prior written       *
2639f2269fSPeter Wemm  * authorization.                                                           *
2739f2269fSPeter Wemm  ****************************************************************************/
2839f2269fSPeter Wemm 
2939f2269fSPeter Wemm /****************************************************************************
3039f2269fSPeter Wemm  *  Author: Thomas E. Dickey 2002                                           *
3139f2269fSPeter Wemm  ****************************************************************************/
3239f2269fSPeter Wemm 
3339f2269fSPeter Wemm /*
3439f2269fSPeter Wemm **	lib_unget_wch.c
3539f2269fSPeter Wemm **
3639f2269fSPeter Wemm **	The routine unget_wch().
3739f2269fSPeter Wemm **
3839f2269fSPeter Wemm */
3939f2269fSPeter Wemm 
4039f2269fSPeter Wemm #include <curses.priv.h>
4139f2269fSPeter Wemm 
4239f2269fSPeter Wemm MODULE_ID("$Id: lib_unget_wch.c,v 1.2 2002/03/17 00:01:38 tom Exp $")
4339f2269fSPeter Wemm 
4439f2269fSPeter Wemm NCURSES_EXPORT(int)
4539f2269fSPeter Wemm unget_wch(const wchar_t wch)
4639f2269fSPeter Wemm {
4739f2269fSPeter Wemm     int result = OK;
4839f2269fSPeter Wemm     mbstate_t state;
4939f2269fSPeter Wemm     size_t length;
5039f2269fSPeter Wemm     int n;
5139f2269fSPeter Wemm 
5239f2269fSPeter Wemm     T((T_CALLED("unget_wch(%d)"), wch));
5339f2269fSPeter Wemm 
5439f2269fSPeter Wemm     memset(&state, 0, sizeof(state));
5539f2269fSPeter Wemm     length = wcrtomb(0, wch, &state);
5639f2269fSPeter Wemm 
5739f2269fSPeter Wemm     if (length != (size_t) (-1)
5839f2269fSPeter Wemm 	&& length != 0) {
5939f2269fSPeter Wemm 	char *string = malloc(length);
6039f2269fSPeter Wemm 
6139f2269fSPeter Wemm 	memset(&state, 0, sizeof(state));
6239f2269fSPeter Wemm 	wcrtomb(string, wch, &state);
6339f2269fSPeter Wemm 
6439f2269fSPeter Wemm 	for (n = (int) (length - 1); n >= 0; --n) {
6539f2269fSPeter Wemm 	    if (ungetch(string[n]) != OK) {
6639f2269fSPeter Wemm 		result = ERR;
6739f2269fSPeter Wemm 		break;
6839f2269fSPeter Wemm 	    }
6939f2269fSPeter Wemm 	}
7039f2269fSPeter Wemm 	free(string);
7139f2269fSPeter Wemm     } else {
7239f2269fSPeter Wemm 	result = ERR;
7339f2269fSPeter Wemm     }
7439f2269fSPeter Wemm 
7539f2269fSPeter Wemm     returnCode(result);
7639f2269fSPeter Wemm }
77