/* Close the directory stream DIRP. Return 0 if successful, -1 if not. */ int __closedir (DIR *dirp) { error_t err; if (dirp == NULL) { errno = EINVAL; return -1; } __libc_lock_lock (dirp->__lock); err = __vm_deallocate (__mach_task_self (), (vm_address_t) dirp->__data, dirp->__allocation); dirp->__data = NULL; err = _hurd_fd_close (dirp->__fd); if (err) { /* Unlock the DIR. A failing closedir can be repeated (and may fail again, but shouldn't deadlock). */ __libc_lock_unlock (dirp->__lock); return __hurd_fail (err); } /* Clean up the lock and free the structure. */ __libc_lock_fini (dirp->__lock); free (dirp); return 0; }
/* Close the file descriptor FD. */ int __close (int fd) { error_t err; err = HURD_FD_USE (fd, _hurd_fd_close (descriptor)); return err ? __hurd_fail (err) : 0; }