Prefer strerror_r over strerror for thread-safe errno (#14764)

Prefer the thread safe `strerror_r` C call over the thread unsafe `strerror`.

Author: ysbaddaden

src/errno.cr

@@ -45,8 +45,17 @@ enum Errno
 
   # :nodoc:
   def unsafe_message(&)
-    pointer = LibC.strerror(value)
-    yield Bytes.new(pointer, LibC.strlen(pointer))
+    {% if LibC.has_method?(:strerror_r) %}
+      buffer = uninitialized UInt8[256]
+      if LibC.strerror_r(value, buffer, buffer.size) == 0
+        yield Bytes.new(buffer.to_unsafe, LibC.strlen(buffer))
+      else
+        yield "(???)".to_slice
+      end
+    {% else %}
+      pointer = LibC.strerror(value)
+      yield Bytes.new(pointer, LibC.strlen(pointer))
+    {% end %}
   end
 
   # returns the value of libc's errno.

src/lib_c/aarch64-android/c/string.cr

@@ -5,5 +5,6 @@ lib LibC
   fun memcmp(__lhs : Void*, __rhs : Void*, __n : SizeT) : Int
   fun strcmp(__lhs : Char*, __rhs : Char*) : Int
   fun strerror(__errno_value : Int) : Char*
+  fun strerror_r(Int, Char*, SizeT) : Int
   fun strlen(__s : Char*) : SizeT
 end

src/lib_c/aarch64-darwin/c/string.cr

@@ -5,5 +5,6 @@ lib LibC
   fun memcmp(x0 : Void*, x1 : Void*, x2 : SizeT) : Int
   fun strcmp(x0 : Char*, x1 : Char*) : Int
   fun strerror(x0 : Int) : Char*
+  fun strerror_r(Int, Char*, SizeT) : Int
   fun strlen(x0 : Char*) : SizeT
 end

src/lib_c/aarch64-linux-gnu/c/string.cr

@@ -5,5 +5,6 @@ lib LibC
   fun memcmp(s1 : Void*, s2 : Void*, n : SizeT) : Int
   fun strcmp(s1 : Char*, s2 : Char*) : Int
   fun strerror(errnum : Int) : Char*
+  fun strerror_r = __xpg_strerror_r(Int, Char*, SizeT) : Int
   fun strlen(s : Char*) : SizeT
 end

src/lib_c/aarch64-linux-musl/c/string.cr

@@ -5,5 +5,6 @@ lib LibC
   fun memcmp(x0 : Void*, x1 : Void*, x2 : SizeT) : Int
   fun strcmp(x0 : Char*, x1 : Char*) : Int
   fun strerror(x0 : Int) : Char*
+  fun strerror_r(Int, Char*, SizeT) : Int
   fun strlen(x0 : Char*) : SizeT
 end

src/lib_c/arm-linux-gnueabihf/c/string.cr

@@ -5,5 +5,6 @@ lib LibC
   fun memcmp(s1 : Void*, s2 : Void*, n : SizeT) : Int
   fun strcmp(s1 : Char*, s2 : Char*) : Int
   fun strerror(errnum : Int) : Char*
+  fun strerror_r = __xpg_strerror_r(Int, Char*, SizeT) : Int
   fun strlen(s : Char*) : SizeT
 end

src/lib_c/i386-linux-gnu/c/string.cr

@@ -5,5 +5,6 @@ lib LibC
   fun memcmp(s1 : Void*, s2 : Void*, n : SizeT) : Int
   fun strcmp(s1 : Char*, s2 : Char*) : Int
   fun strerror(errnum : Int) : Char*
+  fun strerror_r = __xpg_strerror_r(Int, Char*, SizeT) : Int
   fun strlen(s : Char*) : SizeT
 end

src/lib_c/i386-linux-musl/c/string.cr

@@ -5,5 +5,6 @@ lib LibC
   fun memcmp(x0 : Void*, x1 : Void*, x2 : SizeT) : Int
   fun strcmp(x0 : Char*, x1 : Char*) : Int
   fun strerror(x0 : Int) : Char*
+  fun strerror_r(Int, Char*, SizeT) : Int
   fun strlen(x0 : Char*) : SizeT
 end

src/lib_c/wasm32-wasi/c/string.cr

@@ -5,5 +5,6 @@ lib LibC
   fun memcmp(x0 : Void*, x1 : Void*, x2 : SizeT) : Int
   fun strcmp(x0 : Char*, x1 : Char*) : Int
   fun strerror(x0 : Int) : Char*
+  fun strerror_r(Int, Char*, SizeT) : Int
   fun strlen(x0 : Char*) : ULong
 end

src/lib_c/x86_64-darwin/c/string.cr

@@ -5,5 +5,6 @@ lib LibC
   fun memcmp(x0 : Void*, x1 : Void*, x2 : SizeT) : Int
   fun strcmp(x0 : Char*, x1 : Char*) : Int
   fun strerror(x0 : Int) : Char*
+  fun strerror_r(Int, Char*, SizeT) : Int
   fun strlen(x0 : Char*) : SizeT
 end