util.c: Add locks around strftime() calls

Perl · May 5, 2021 · 7c1ad70 · 7c1ad70
1 parent 49b3bb5
commit 7c1ad70
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/util.c b/util.c
@@ -4219,7 +4219,9 @@ giving localized results.
 
   GCC_DIAG_IGNORE_STMT(-Wformat-nonliteral); /* fmt checked by caller */
 
+  STRFTIME_LOCK;
   len = strftime(buf, buflen, fmt, &mytm);
+  STRFTIME_UNLOCK;
 
   GCC_DIAG_RESTORE_STMT;
 
@@ -4248,7 +4250,9 @@ giving localized results.
     while (buf) {
 
       GCC_DIAG_IGNORE_STMT(-Wformat-nonliteral); /* fmt checked by caller */
+      STRFTIME_LOCK;
       buflen = strftime(buf, bufsize, fmt, &mytm);
+      STRFTIME_UNLOCK;
       GCC_DIAG_RESTORE_STMT;
 
       if (inRANGE(buflen, 1, bufsize - 1))