diff options
author | Andy Dougherty <doughera@lafayette.edu> | 2019-01-22 14:17:05 -0500 |
---|---|---|
committer | Andy Dougherty <doughera@lafayette.edu> | 2019-01-22 14:17:05 -0500 |
commit | ca152fd8207cf53816b1407d5f54f6ea160a3ef8 (patch) | |
tree | f8de4b2c3b03e8df5406cd4639ef19a8bf5eda93 /Configure | |
parent | 129da27a6cbce7395f91b30779d708adc609e29c (diff) | |
download | perl-ca152fd8207cf53816b1407d5f54f6ea160a3ef8.tar.gz |
Improve Configure detection of memmem() [perl #133760].
Linux systems have memmem, but the header prototype is only visible if
the C library, but didn't check if the correct prototype is available.
This patch compiles & runs a test program that will fail if the prototype
is needed but not available.
This does not completely close [perl #133760]. The tests for strlcat()
and strlcpy() may also need to be similarly changed. Also, this patch
does not change whether _GNU_SOURCE is defined or not. Presumably that
would be done separately in the linux hints file.
Diffstat (limited to 'Configure')
-rwxr-xr-x | Configure | 43 |
1 files changed, 41 insertions, 2 deletions
@@ -16155,8 +16155,47 @@ set mbtowc d_mbtowc eval $inlibc : see if memmem exists -set memmem d_memmem -eval $inlibc +echo " " +echo "Checking if you have a working memmem()" >&4 +$cat >try.c <<EOCP +#$d_gnulibc HAS_GNULIBC /**/ +#if defined(HAS_GNULIBC) && !defined(_GNU_SOURCE) +# define _GNU_SOURCE +#endif +#include <stdio.h> +#include <stdlib.h> +#include <stddef.h> +#include <string.h> +int main(int argc, char **argv) +{ + char *big = "abcdefghiabcdefghi"; + char *little = "def"; + char *rtn; + ptrdiff_t diff; + rtn = (char *) memmem(big, strlen(big), little, strlen(little)); + diff = rtn - big; + exit(diff == 3 ? EXIT_SUCCESS : EXIT_FAILURE); +} +EOCP +set try +if eval $compile; then + `$run ./try` + rc=$? + case "$rc" in + 0) echo "Yes, you do." >&4 + val="$define" + ;; + *) echo "Well, you have memmem, but it isn't working." >&4 + val="$undef" + ;; + esac +else + echo "No, you do not." >&4 + val="$undef" +fi +set d_memmem +eval $setvar +$rm_try : see if memrchr exists set memrchr d_memrchr |