From: Bruno Haible <bruno@clisp.org>
Date: Fri, 2 Feb 2007 03:46:59 +0000 (+0000)
Subject: Turn the errors for use of strstr and similar into conditional warnings.
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=9f62a12a18eacd2e289aa1acbc5d7280f332f5a8;p=pspp

Turn the errors for use of strstr and similar into conditional warnings.
---

diff --git a/ChangeLog b/ChangeLog
index 165931e693..519bd57384 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2007-02-01  Bruno Haible  <bruno@clisp.org>
+
+	* lib/string_.h (GL_LINK_WARNING): New macro.
+	(strcasecmp, strstr, strcasestr): If provided by the system,
+	conditionally define as a macro that leads to a warning instead of to
+	an error.
+	(strncasecmp): Conditionally define as a macro that leads to a warning.
+
 2007-02-01  Jim Meyering  <jim@meyering.net>
 
 	Give tools a better chance to allocate space for very large buffers.
diff --git a/lib/string_.h b/lib/string_.h
index d7eaaf7d85..98fa31fcc3 100644
--- a/lib/string_.h
+++ b/lib/string_.h
@@ -21,6 +21,37 @@
 
 #include @ABSOLUTE_STRING_H@
 
+
+/* GL_LINK_WARNING("literal string") arranges to emit the literal string as
+   a linker warning on most glibc systems.
+   We use a linker warning rather than a preprocessor warning, because
+   #warning cannot be used inside macros.  */
+#ifndef GL_LINK_WARNING
+  /* This works on platforms with GNU ld and ELF object format.
+     Testing __GLIBC__ is sufficient for asserting that GNU ld is in use.
+     Testing __ELF__ guarantees the ELF object format.
+     Testing __GNUC__ is necessary for the compound expression syntax.  */
+# if defined __GLIBC__ && defined __ELF__ && defined __GNUC__
+#  define GL_LINK_WARNING(message) \
+     GL_LINK_WARNING1 (__FILE__, __LINE__, message)
+#  define GL_LINK_WARNING1(file, line, message) \
+     GL_LINK_WARNING2 (file, line, message)  /* macroexpand file and line */
+#  define GL_LINK_WARNING2(file, line, message) \
+     GL_LINK_WARNING3 (file ":" #line ": " message)
+#  define GL_LINK_WARNING3(message) \
+     ({ static const char warning[sizeof (message)]		\
+          __attribute__ ((__unused__,				\
+                          __section__ (".gnu.warning"),		\
+                          __aligned__ (1)))			\
+          = message "\n";					\
+        (void)0;						\
+     })
+# else
+#  define GL_LINK_WARNING(message) ((void) 0)
+# endif
+#endif
+
+
 #ifdef __cplusplus
 extern "C" {
 #endif
@@ -94,9 +125,11 @@ extern char *stpncpy (char *restrict __dst, char const *restrict __src,
 #  define strcasecmp rpl_strcasecmp
 extern int strcasecmp (char const *__s1, char const *__s2);
 # endif
-#else
+#elif defined GNULIB_POSIXCHECK
 # undef strcasecmp
-# define strcasecmp strcasecmp_is_unportable__use_gnulib_module_strcase_for_portability
+# define strcasecmp(a,b) \
+    (GL_LINK_WARNING ("strcasecmp is often incorrectly implemented for multibyte locales - use gnulib module 'strcase' for correct and portable internationalization"), \
+     strcasecmp (a, b))
 #endif
 
 /* Compare no more than N bytes of strings S1 and S2, ignoring case,
@@ -107,9 +140,12 @@ extern int strcasecmp (char const *__s1, char const *__s2);
 # if ! @HAVE_DECL_STRNCASECMP@
 extern int strncasecmp (char const *__s1, char const *__s2, size_t __n);
 # endif
-#else
+#endif
+#if defined GNULIB_POSIXCHECK
 # undef strncasecmp
-# define strncasecmp strncasecmp_is_unportable__use_gnulib_module_strcase_for_portability
+# define strncasecmp(a,b) \
+    (GL_LINK_WARNING ("strncasecmp cannot work correctly in multibyte locales - don't use it if you care about internationalization"), \
+     strncasecmp (a, b))
 #endif
 
 /* Find the first occurrence of C in S or the final NUL byte.  */
@@ -203,9 +239,11 @@ extern char *strsep (char **restrict __stringp, char const *restrict __delim);
 #  define strstr rpl_strstr
 extern char *strstr (char const *__haystack, char const *__needle);
 # endif
-#else
+#elif defined GNULIB_POSIXCHECK
 # undef strstr
-# define strstr strstr_is_unportable__use_gnulib_module_strstr_for_portability
+# define strstr(a,b) \
+    (GL_LINK_WARNING ("strstr is often incorrectly implemented for multibyte locales - use gnulib module 'strstr' for correct and portable internationalization"), \
+     strstr (a, b))
 #endif
 
 /* Find the first occurrence of NEEDLE in HAYSTACK, using case-insensitive
@@ -218,9 +256,11 @@ extern char *strstr (char const *__haystack, char const *__needle);
 #  define strcasestr rpl_strcasestr
 extern char *strcasestr (const char *haystack, const char *needle);
 # endif
-#else
+#elif defined GNULIB_POSIXCHECK
 # undef strcasestr
-# define strcasestr strcasestr_is_unportable__use_gnulib_module_strcasestr_for_portability
+# define strcasestr(a,b) \
+    (GL_LINK_WARNING ("strcasestr is often incorrectly implemented for multibyte locales - use gnulib module 'strcasestr' for correct and portable internationalization"), \
+     strcasestr (a, b))
 #endif
 
 /* Parse S into tokens separated by characters in DELIM.