1 | # wctob.m4 serial 13
|
---|
2 | dnl Copyright (C) 2008-2021 Free Software Foundation, Inc.
|
---|
3 | dnl This file is free software; the Free Software Foundation
|
---|
4 | dnl gives unlimited permission to copy and/or distribute it,
|
---|
5 | dnl with or without modifications, as long as this notice is preserved.
|
---|
6 |
|
---|
7 | AC_DEFUN([gl_FUNC_WCTOB],
|
---|
8 | [
|
---|
9 | AC_REQUIRE([gl_WCHAR_H_DEFAULTS])
|
---|
10 |
|
---|
11 | AC_CHECK_FUNCS_ONCE([wctob])
|
---|
12 | if test $ac_cv_func_wctob = no; then
|
---|
13 | HAVE_WCTOB=0
|
---|
14 | HAVE_DECL_WCTOB=0
|
---|
15 | else
|
---|
16 | HAVE_WCTOB=1
|
---|
17 |
|
---|
18 | dnl Solaris 9 has the wctob() function but it does not work.
|
---|
19 | dnl Cygwin 1.7.2 has the wctob() function but it clobbers caller-owned
|
---|
20 | dnl registers, see <https://cygwin.com/ml/cygwin/2010-05/msg00015.html>.
|
---|
21 | AC_REQUIRE([AC_PROG_CC])
|
---|
22 | AC_REQUIRE([gt_LOCALE_FR])
|
---|
23 | AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
|
---|
24 | AC_CACHE_CHECK([whether wctob works],
|
---|
25 | [gl_cv_func_wctob_works],
|
---|
26 | [
|
---|
27 | dnl Initial guess, used when cross-compiling or when no suitable locale
|
---|
28 | dnl is present.
|
---|
29 | changequote(,)dnl
|
---|
30 | case "$host_os" in
|
---|
31 | # Guess no on Solaris <= 9 and Cygwin.
|
---|
32 | solaris2.[1-9] | solaris2.[1-9].* | cygwin*)
|
---|
33 | gl_cv_func_wctob_works="guessing no" ;;
|
---|
34 | # Guess no on native Windows.
|
---|
35 | mingw*)
|
---|
36 | gl_cv_func_wctob_works="guessing no" ;;
|
---|
37 | # Guess yes otherwise.
|
---|
38 | *) gl_cv_func_wctob_works="guessing yes" ;;
|
---|
39 | esac
|
---|
40 | changequote([,])dnl
|
---|
41 | case "$host_os" in
|
---|
42 | cygwin*)
|
---|
43 | AC_RUN_IFELSE(
|
---|
44 | [AC_LANG_SOURCE([[
|
---|
45 | #include <locale.h>
|
---|
46 | #include <wchar.h>
|
---|
47 |
|
---|
48 | register long global __asm__ ("%ebx");
|
---|
49 |
|
---|
50 | int main ()
|
---|
51 | {
|
---|
52 | setlocale (LC_ALL, "en_US.UTF-8");
|
---|
53 |
|
---|
54 | global = 0x12345678;
|
---|
55 | if (wctob (0x00FC) != -1)
|
---|
56 | return 1;
|
---|
57 | if (global != 0x12345678)
|
---|
58 | return 2;
|
---|
59 | return 0;
|
---|
60 | }]])],
|
---|
61 | [:],
|
---|
62 | [gl_cv_func_wctob_works=no],
|
---|
63 | [:])
|
---|
64 | ;;
|
---|
65 | esac
|
---|
66 | if test "$gl_cv_func_wctob_works" != no && test $LOCALE_FR != none; then
|
---|
67 | AC_RUN_IFELSE(
|
---|
68 | [AC_LANG_SOURCE([[
|
---|
69 | #include <locale.h>
|
---|
70 | #include <stdlib.h>
|
---|
71 | #include <wchar.h>
|
---|
72 | int main ()
|
---|
73 | {
|
---|
74 | if (setlocale (LC_ALL, "$LOCALE_FR") != NULL)
|
---|
75 | {
|
---|
76 | wchar_t wc;
|
---|
77 |
|
---|
78 | if (mbtowc (&wc, "\374", 1) == 1)
|
---|
79 | if (wctob (wc) != (unsigned char) '\374')
|
---|
80 | return 1;
|
---|
81 | }
|
---|
82 | return 0;
|
---|
83 | }]])],
|
---|
84 | [gl_cv_func_wctob_works=yes],
|
---|
85 | [gl_cv_func_wctob_works=no],
|
---|
86 | [:])
|
---|
87 | fi
|
---|
88 | ])
|
---|
89 | case "$gl_cv_func_wctob_works" in
|
---|
90 | *yes) ;;
|
---|
91 | *) REPLACE_WCTOB=1 ;;
|
---|
92 | esac
|
---|
93 | if test $REPLACE_WCTOB = 0; then
|
---|
94 |
|
---|
95 | dnl IRIX 6.5 has the wctob() function but does not declare it.
|
---|
96 | AC_CHECK_DECLS([wctob], [], [], [[
|
---|
97 | #include <wchar.h>
|
---|
98 | ]])
|
---|
99 | if test $ac_cv_have_decl_wctob != yes; then
|
---|
100 | HAVE_DECL_WCTOB=0
|
---|
101 | fi
|
---|
102 | fi
|
---|
103 | fi
|
---|
104 | ])
|
---|
105 |
|
---|
106 | # Prerequisites of lib/wctob.c.
|
---|
107 | AC_DEFUN([gl_PREREQ_WCTOB], [
|
---|
108 | :
|
---|
109 | ])
|
---|