Work around MacOS X wcwidth(0x0301) bug.
[pspp] / lib / wcwidth.c
1 /* Determine the number of screen columns needed for a character.
2    Copyright (C) 2006, 2007 Free Software Foundation, Inc.
3
4    This program is free software; you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; either version 2, or (at your option)
7    any later version.
8
9    This program is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12    GNU General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program; if not, write to the Free Software Foundation,
16    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
17
18 #include <config.h>
19
20 /* Specification.  */
21 #include <wchar.h>
22
23 /* Get iswprint.  */
24 #include <wctype.h>
25
26 #include "localcharset.h"
27 #include "streq.h"
28 #include "uniwidth.h"
29
30 #undef wcwidth
31
32 int
33 rpl_wcwidth (wchar_t wc)
34 {
35   /* In UTF-8 locales, use a Unicode aware width function.  */
36   const char *encoding = locale_charset ();
37   if (STREQ (encoding, "UTF-8", 'U', 'T', 'F', '-', '8', 0, 0, 0 ,0))
38     {
39       /* We assume that in a UTF-8 locale, a wide character is the same as a
40          Unicode character.  */
41       return uc_width (wc, encoding);
42     }
43   else
44     {
45       /* Otherwise, fall back to the system's wcwidth function.  */
46 #if HAVE_WCWIDTH
47       return wcwidth (wc);
48 #else
49       return wc == 0 ? 0 : iswprint (wc) ? 1 : -1;
50 #endif
51     }
52 }