[libc][stdlib][annex_k] Add set_constraint_handler_s.

Author: bassiounix

libc/config/linux/aarch64/entrypoints.txt

@@ -2,6 +2,7 @@ set(TARGET_ANNEX_K_ENTRYPOINTS
     # stdlib.h entrypoints
     libc.src.stdlib.abort_handler_s
     libc.src.stdlib.ignore_handler_s
+    libc.src.stdlib.set_constraint_handler_s
 )
 
 set(TARGET_LIBC_ENTRYPOINTS

libc/config/linux/riscv/entrypoints.txt

@@ -2,6 +2,7 @@ set(TARGET_ANNEX_K_ENTRYPOINTS
     # stdlib.h entrypoints
     libc.src.stdlib.abort_handler_s
     libc.src.stdlib.ignore_handler_s
+    libc.src.stdlib.set_constraint_handler_s
 )
 
 set(TARGET_LIBC_ENTRYPOINTS

libc/config/linux/x86_64/entrypoints.txt

@@ -2,6 +2,7 @@ set(TARGET_ANNEX_K_ENTRYPOINTS
     # stdlib.h entrypoints
     libc.src.stdlib.abort_handler_s
     libc.src.stdlib.ignore_handler_s
+    libc.src.stdlib.set_constraint_handler_s
 )
 
 set(TARGET_LIBC_ENTRYPOINTS

libc/include/stdlib.yaml

@@ -202,6 +202,13 @@ functions:
       - type: void *__restrict
       - type: errno_t
     guard: 'LIBC_HAS_ANNEX_K'
+  - name: set_constraint_handler_s
+    standards:
+      - stdc
+    return_type: constraint_handler_t
+    arguments:
+      - type: constraint_handler_t
+    guard: 'LIBC_HAS_ANNEX_K'
   - name: srand
     standards:
       - stdc

libc/src/stdlib/CMakeLists.txt

@@ -664,6 +664,17 @@ add_entrypoint_object(
     .${LIBC_TARGET_OS}.system
 )
 
+add_entrypoint_object(
+  set_constraint_handler_s
+  SRCS
+    set_constraint_handler_s.cpp
+  HDRS
+    set_constraint_handler_s.h
+  DEPENDS
+    libc.src.__support.annex_k.abort_handler_s
+    libc.src.__support.annex_k.libc_constraint_handler
+)
+
 add_entrypoint_object(
   ignore_handler_s
   HDRS

libc/src/stdlib/set_constraint_handler_s.cpp

@@ -0,0 +1,28 @@
+//===-- Implementation of set_constraint_handler_s ------------------------===//
+//
+// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
+// See https://llvm.org/LICENSE.txt for license information.
+// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
+//
+//===----------------------------------------------------------------------===//
+
+#include "set_constraint_handler_s.h"
+#include "src/__support/annex_k/abort_handler_s.h"
+#include "src/__support/annex_k/libc_constraint_handler.h"
+
+namespace LIBC_NAMESPACE_DECL {
+
+LLVM_LIBC_FUNCTION(constraint_handler_t, set_constraint_handler_s,
+                   (constraint_handler_t handler)) {
+  auto previous_handler = annex_k::libc_constraint_handler;
+
+  if (!handler) {
+    annex_k::libc_constraint_handler = &annex_k::abort_handler_s;
+  } else {
+    annex_k::libc_constraint_handler = handler;
+  }
+
+  return previous_handler;
+}
+
+} // namespace LIBC_NAMESPACE_DECL

libc/src/stdlib/set_constraint_handler_s.h

@@ -0,0 +1,21 @@
+//===-- Implementation header for set_constraint_handler_s ------*- C++ -*-===//
+//
+// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
+// See https://llvm.org/LICENSE.txt for license information.
+// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
+//
+//===----------------------------------------------------------------------===//
+
+#ifndef LLVM_LIBC_SRC_STDLIB_SET_CONSTRAINT_HANDLER_S_H
+#define LLVM_LIBC_SRC_STDLIB_SET_CONSTRAINT_HANDLER_S_H
+
+#include "hdr/types/constraint_handler_t.h"
+#include "src/__support/macros/config.h"
+
+namespace LIBC_NAMESPACE_DECL {
+
+constraint_handler_t set_constraint_handler_s(constraint_handler_t handler);
+
+} // namespace LIBC_NAMESPACE_DECL
+
+#endif // LLVM_LIBC_SRC_STDLIB_SET_CONSTRAINT_HANDLER_S_H