1166124Srafan/**************************************************************************** 2262685Sdelphij * Copyright (c) 2003-2002,2011 Free Software Foundation, Inc. * 3166124Srafan * * 4166124Srafan * Permission is hereby granted, free of charge, to any person obtaining a * 5166124Srafan * copy of this software and associated documentation files (the * 6166124Srafan * "Software"), to deal in the Software without restriction, including * 7166124Srafan * without limitation the rights to use, copy, modify, merge, publish, * 8166124Srafan * distribute, distribute with modifications, sublicense, and/or sell * 9166124Srafan * copies of the Software, and to permit persons to whom the Software is * 10166124Srafan * furnished to do so, subject to the following conditions: * 11166124Srafan * * 12166124Srafan * The above copyright notice and this permission notice shall be included * 13166124Srafan * in all copies or substantial portions of the Software. * 14166124Srafan * * 15166124Srafan * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * 16166124Srafan * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * 17166124Srafan * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * 18166124Srafan * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * 19166124Srafan * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * 20166124Srafan * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * 21166124Srafan * THE USE OR OTHER DEALINGS IN THE SOFTWARE. * 22166124Srafan * * 23166124Srafan * Except as contained in this notice, the name(s) of the above copyright * 24166124Srafan * holders shall not be used in advertising or otherwise to promote the * 25166124Srafan * sale, use or other dealings in this Software without prior written * 26166124Srafan * authorization. * 27166124Srafan ****************************************************************************/ 28166124Srafan 29166124Srafan/**************************************************************************** 30166124Srafan * Author: Thomas E. Dickey * 31166124Srafan ****************************************************************************/ 32166124Srafan 33166124Srafan/* 34166124Srafan * lib_slk_wset.c 35166124Srafan * Set soft label text. 36166124Srafan */ 37166124Srafan#include <curses.priv.h> 38166124Srafan 39166124Srafan#if HAVE_WCTYPE_H 40166124Srafan#include <wctype.h> 41166124Srafan#endif 42166124Srafan 43262685SdelphijMODULE_ID("$Id: lib_slk_wset.c,v 1.13 2011/10/22 15:52:20 tom Exp $") 44166124Srafan 45166124SrafanNCURSES_EXPORT(int) 46166124Srafanslk_wset(int i, const wchar_t *astr, int format) 47166124Srafan{ 48166124Srafan int result = ERR; 49166124Srafan size_t arglen; 50166124Srafan const wchar_t *str; 51166124Srafan char *mystr; 52166124Srafan mbstate_t state; 53166124Srafan 54166124Srafan T((T_CALLED("slk_wset(%d, %s, %d)"), i, _nc_viswbuf(astr), format)); 55166124Srafan 56262685Sdelphij if (astr != 0) { 57262685Sdelphij init_mb(state); 58262685Sdelphij str = astr; 59262685Sdelphij if ((arglen = wcsrtombs(NULL, &str, (size_t) 0, &state)) != (size_t) -1) { 60262685Sdelphij if ((mystr = (char *) _nc_doalloc(0, arglen + 1)) != 0) { 61262685Sdelphij str = astr; 62262685Sdelphij if (wcsrtombs(mystr, &str, arglen, &state) != (size_t) -1) { 63262685Sdelphij /* glibc documentation claims that the terminating L'\0' 64262685Sdelphij * is written, but it is not... 65262685Sdelphij */ 66262685Sdelphij mystr[arglen] = 0; 67262685Sdelphij result = slk_set(i, mystr, format); 68262685Sdelphij } 69262685Sdelphij free(mystr); 70166124Srafan } 71166124Srafan } 72166124Srafan } 73166124Srafan returnCode(result); 74166124Srafan} 75