1 //===-- Implementation of closedir ----------------------------------------===// 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 //===----------------------------------------------------------------------===// 8 9 #include "closedir.h" 10 11 #include "src/__support/File/dir.h" 12 #include "src/__support/common.h" 13 #include "src/errno/libc_errno.h" 14 15 #include <dirent.h> 16 17 namespace LIBC_NAMESPACE { 18 19 LLVM_LIBC_FUNCTION(int, closedir, (::DIR * dir)) { 20 auto *d = reinterpret_cast<LIBC_NAMESPACE::Dir *>(dir); 21 int retval = d->close(); 22 if (retval != 0) { 23 libc_errno = retval; 24 return -1; 25 } 26 return 0; 27 } 28 29 } // namespace LIBC_NAMESPACE 30