File: closedir.c

package info (click to toggle)
libc-sparc 5.3.12-3
  • links: PTS
  • area: main
  • in suites: potato, slink
  • size: 17,608 kB
  • ctags: 44,718
  • sloc: ansic: 163,548; asm: 5,080; makefile: 3,340; lex: 521; sh: 439; yacc: 401; awk: 28
file content (54 lines) | stat: -rw-r--r-- 814 bytes parent folder | download | duplicates (7)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
#include <stdlib.h>
#include <unistd.h>
#include <errno.h>
#undef _POSIX_PTHREADS
#include <syscall.h>
#include "dirstream.h"

#ifdef __SVR4_I386_ABI_L1__
#define close	__libc_close
#else
static inline
_syscall1(int,close,int,fd)
#endif

#ifdef __ELF__
#pragma weak closedir = __libc_closedir
#endif

#ifdef _LIBPTHREAD
#define __libc_closedir closedir
#endif

int
__libc_closedir(DIR * dir)
{
  int fd;

  if (!dir) {
    errno = EBADF;
    return -1;
  }

#ifdef _LIBPTHREAD
  pthread_mutex_lock (dir->dd_lock);
#endif

  /* We need to check dd_fd. */
  if (dir->dd_fd == -1)
  {
    errno = EBADF;
    return -1;
  }
  fd = dir->dd_fd;
  dir->dd_fd = -1;
  free(dir->dd_buf);

  /* Other threads may wake up. */
#ifdef _LIBPTHREAD
  pthread_mutex_free (dir->dd_lock);
#endif

  free(dir);
  return close(fd);
}