Upgrade grep version 2.9 to 2.12 on the vendor branch
[dragonfly.git] / contrib / grep / lib / closedir.c
1 /* Stop reading the entries of a directory.
2    Copyright (C) 2006-2012 Free Software Foundation, Inc.
3
4    This program is free software: you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; either version 3 of the License, or
7    (at your option) any later version.
8
9    This program is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12    GNU General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
16
17 #include <config.h>
18
19 /* Specification.  */
20 #include <dirent.h>
21
22 #if REPLACE_FCHDIR
23 # include <unistd.h>
24 #endif
25
26 #if HAVE_CLOSEDIR
27
28 /* Override closedir(), to keep track of the open file descriptors.
29    Needed because there is a function dirfd().  */
30
31 #else
32
33 # include <stdlib.h>
34
35 # include "dirent-private.h"
36
37 #endif
38
39 int
40 closedir (DIR *dirp)
41 {
42 # if REPLACE_FCHDIR
43   int fd = dirfd (dirp);
44 # endif
45   int retval;
46
47 #if HAVE_CLOSEDIR
48 # undef closedir
49
50   retval = closedir (dirp);
51
52 #else
53
54   if (dirp->current != INVALID_HANDLE_VALUE)
55     FindClose (dirp->current);
56   free (dirp);
57
58   retval = 0;
59
60 #endif
61
62 #if REPLACE_FCHDIR
63   if (retval >= 0)
64     _gl_unregister_fd (fd);
65 #endif
66   return retval;
67 }