[flang] Use object before converts in fir.dispatch (#68589)
[llvm-project.git] / libc / src / sys / mman / linux / mprotect.cpp
blob2e6f2a369c1d89cb352843a12f1255d9a58c1c86
1 //===---------- Linux implementation of the POSIX mprotect function -------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
9 #include "src/sys/mman/mprotect.h"
11 #include "src/__support/OSUtil/syscall.h" // For internal syscall function.
12 #include "src/__support/common.h"
14 #include "src/errno/libc_errno.h"
15 #include <sys/syscall.h> // For syscall numbers.
17 namespace LIBC_NAMESPACE {
19 // This function is currently linux only. It has to be refactored suitably if
20 // mprotect is to be supported on non-linux operating systems also.
21 LLVM_LIBC_FUNCTION(int, mprotect, (void *addr, size_t size, int prot)) {
22 int ret = LIBC_NAMESPACE::syscall_impl<int>(
23 SYS_mprotect, reinterpret_cast<long>(addr), size, prot);
25 // A negative return value indicates an error with the magnitude of the
26 // value being the error code.
27 if (ret < 0) {
28 libc_errno = -ret;
29 return -1;
32 return 0;
35 } // namespace LIBC_NAMESPACE