1 /* 2 * Copyright 2013 Garrett D'Amore <garrett@damore.org> 3 * Copyright (c) 1989, 1993 4 * The Regents of the University of California. All rights reserved. 5 * (c) UNIX System Laboratories, Inc. 6 * All or some portions of this file are derived from material licensed 7 * to the University of California by American Telephone and Telegraph 8 * Co. or Unix System Laboratories, Inc. and are reproduced herein with 9 * the permission of UNIX System Laboratories, Inc. 10 * 11 * This code is derived from software contributed to Berkeley by 12 * Paul Borman at Krystal Technologies. 13 * 14 * Redistribution and use in source and binary forms, with or without 15 * modification, are permitted provided that the following conditions 16 * are met: 17 * 1. Redistributions of source code must retain the above copyright 18 * notice, this list of conditions and the following disclaimer. 19 * 2. Redistributions in binary form must reproduce the above copyright 20 * notice, this list of conditions and the following disclaimer in the 21 * documentation and/or other materials provided with the distribution. 22 * 4. Neither the name of the University nor the names of its contributors 23 * may be used to endorse or promote products derived from this software 24 * without specific prior written permission. 25 * 26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 29 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 36 * SUCH DAMAGE. 37 */ 38 39 /* 40 * Copyright 2010 Nexenta Systems, Inc. All rights reserved. 41 * Use is subject to license terms. 42 */ 43 44 #include "lint.h" 45 #include <wchar.h> 46 #include "_ctype.h" 47 #include "runetype.h" 48 #include "localeimpl.h" 49 50 #undef wcwidth 51 52 int 53 wcwidth_l(wchar_t wc, locale_t loc) 54 { 55 unsigned int x; 56 const _RuneLocale *rl = loc->runelocale; 57 58 if (wc == 0) 59 return (0); 60 61 x = ((wc < 0 || wc >= _CACHED_RUNES) ? __runetype(rl, wc) : 62 rl->__runetype[wc]) & (_CTYPE_SWM|_CTYPE_R); 63 64 if ((x & _CTYPE_SWM) != 0) 65 return ((x & _CTYPE_SWM) >> _CTYPE_SWS); 66 return ((x & _CTYPE_R) != 0 ? 1 : -1); 67 } 68 69 int 70 wcwidth(wchar_t wc) 71 { 72 return (wcwidth_l(wc, uselocale(NULL))); 73 } 74 75 #pragma weak _scrwidth = scrwidth 76 77 /* 78 * This is a Solaris extension. It never returns a negative width, even for 79 * non-printable characters. It is used internally by the printf 80 * implementation for %ws. 81 */ 82 int 83 scrwidth(wchar_t wc) 84 { 85 int v = wcwidth(wc); 86 return (v > 0 ? v : 0); 87 } 88