BRL-CAD
uce-dirent.h
Go to the documentation of this file.
1 /*
2  * uce-dirent.h - operating system independent dirent implementation
3  *
4  * Copyright (C) 1998-2002 Toni Ronkko
5  *
6  * Permission is hereby granted, free of charge, to any person obtaining
7  * a copy of this software and associated documentation files (the
8  * ``Software''), to deal in the Software without restriction, including
9  * without limitation the rights to use, copy, modify, merge, publish,
10  * distribute, sublicense, and/or sell copies of the Software, and to
11  * permit persons to whom the Software is furnished to do so, subject to
12  * the following conditions:
13  *
14  * The above copyright notice and this permission notice shall be included
15  * in all copies or substantial portions of the Software.
16  *
17  * THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND, EXPRESS
18  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
19  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
20  * IN NO EVENT SHALL TONI RONKKO BE LIABLE FOR ANY CLAIM, DAMAGES OR
21  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
22  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
23  * OTHER DEALINGS IN THE SOFTWARE.
24  *
25  *
26  * May 28 1998, Toni Ronkko <tronkko@messi.uku.fi>
27  *
28  * $Id: uce-dirent.h,v 1.7 2002/05/13 10:48:35 tr Exp $
29  *
30  * $Log: uce-dirent.h,v $
31  * Revision 1.7 2002/05/13 10:48:35 tr
32  * embedded some source code directly to the header so that no source
33  * modules need to be included in the MS Visual C project using the
34  * interface, removed all the dependencies to other headers of the `uce'
35  * library so that the header can be made public
36  *
37  * Revision 1.6 2002/04/12 16:22:04 tr
38  * Unified Compiling Environment (UCE) replaced `std' library
39  *
40  * Revision 1.5 2001/07/20 16:33:40 tr
41  * moved to `std' library and re-named defines accordingly
42  *
43  * Revision 1.4 2001/07/10 16:47:18 tronkko
44  * revised comments
45  *
46  * Revision 1.3 2001/01/11 13:16:43 tr
47  * using ``uce-machine.h'' for finding out defines such as `FREEBSD'
48  *
49  * Revision 1.2 2000/10/08 16:00:41 tr
50  * copy of FreeBSD man page
51  *
52  * Revision 1.1 2000/07/10 05:53:16 tr
53  * Initial revision
54  *
55  * Revision 1.2 1998/07/19 18:29:14 tr
56  * Added error reporting capabilities and some asserts.
57  *
58  * Revision 1.1 1998/07/04 16:27:51 tr
59  * Initial revision
60  *
61  *
62  * MSVC 1.0 scans automatic dependencies incorrectly when your project
63  * contains this very header. The problem is that MSVC cannot handle
64  * include directives inside #if..#endif block those are never entered.
65  * Since this header ought to compile in many different operating systems,
66  * there had to be several conditional blocks that are compiled only in
67  * operating systems for what they were designed for. MSVC 1.0 cannot
68  * handle inclusion of sys/dir.h in a part that is compiled only in Apollo
69  * operating system. To fix the problem you need to insert DIR.H into
70  * SYSINCL.DAT located in MSVC\BIN directory and restart visual C++.
71  * Consult manuals for more information about the problem.
72  *
73  * Since many UNIX systems have dirent.h we assume to have one also.
74  * However, if your UNIX system does not have dirent.h you can download one
75  * for example at: http://ftp.uni-mannheim.de/ftp/GNU/dirent/dirent.tar.gz.
76  * You can also see if you have one of dirent.h, direct.h, dir.h, ndir.h,
77  * sys/dir.h and sys/ndir.h somewhere. Try defining HAVE_DIRENT_H,
78  * HAVE_DIRECT_H, HAVE_DIR_H, HAVE_NDIR_H, HAVE_SYS_DIR_H and
79  * HAVE_SYS_NDIR_H according to the files found.
80  */
81 #ifndef LIBBU_UCE_DIRENT_H
82 #define LIBBU_UCE_DIRENT_H
83 #define DIRENT_H_INCLUDED
84 
85 /* find out platform */
86 #if defined(MSDOS) /* MS-DOS */
87 #elif defined(__MSDOS__) /* Turbo C/Borland */
88 # define MSDOS
89 #elif defined(__DOS__) /* Watcom */
90 # define MSDOS
91 #endif
92 
93 #if defined(WIN32) /* MS-Windows */
94 #elif defined(__NT__) /* Watcom */
95 # define WIN32
96 #elif defined(_WIN32) /* Microsoft */
97 # define WIN32
98 #elif defined(__WIN32__) /* Borland */
99 # define WIN32
100 #endif
101 
102 /*
103  * See what kind of dirent interface we have unless autoconf has already
104  * determined that.
105  */
106 #if !defined(HAVE_DIRENT_H) && !defined(HAVE_DIRECT_H) && !defined(HAVE_SYS_DIR_H) && !defined(HAVE_NDIR_H) && !defined(HAVE_SYS_NDIR_H) && !defined(HAVE_DIR_H)
107 # if defined(_MSC_VER) /* Microsoft C/C++ */
108  /* no dirent.h */
109 # elif defined(__BORLANDC__) /* Borland C/C++ */
110 # define HAVE_DIRENT_H
111 # define VOID_CLOSEDIR
112 # elif defined(__TURBOC__) /* Borland Turbo C */
113  /* no dirent.h */
114 # elif defined(__WATCOMC__) /* Watcom C/C++ */
115 # define HAVE_DIRECT_H
116 # elif defined(__apollo) /* Apollo */
117 # define HAVE_SYS_DIR_H
118 # elif defined(__hpux) /* HP-UX */
119 # define HAVE_DIRENT_H
120 # elif defined(__sgi) /* Silicon Graphics */
121 # define HAVE_DIRENT_H
122 # elif defined(sun) || defined(_sun) /* Sun Solaris */
123 # define HAVE_DIRENT_H
124 # elif defined(__FreeBSD__) /* FreeBSD */
125 # define HAVE_DIRENT_H
126 # elif defined(__linux__) /* Linux */
127 # define HAVE_DIRENT_H
128 # elif defined(__GNUC__) /* GNU C/C++ */
129 # define HAVE_DIRENT_H
130 # else
131 # error "not implemented"
132 # endif
133 #endif
134 
135 /* include proper interface headers */
136 #if defined(HAVE_DIRENT_H)
137 # include <dirent.h>
138 # ifdef FREEBSD
139 # define NAMLEN(dp) ((int)((dp)->d_namlen))
140 # else
141 # define NAMLEN(dp) ((int)(strlen((dp)->d_name)))
142 # endif
143 
144 #elif defined(HAVE_NDIR_H)
145 # include <ndir.h>
146 # define NAMLEN(dp) ((int)((dp)->d_namlen))
147 
148 #elif defined(HAVE_SYS_NDIR_H)
149 # include <sys/ndir.h>
150 # define NAMLEN(dp) ((int)((dp)->d_namlen))
151 
152 #elif defined(HAVE_DIRECT_H) && !defined(_MSC_VER)
153 # include <direct.h>
154 # define NAMLEN(dp) ((int)((dp)->d_namlen))
155 
156 #elif defined(HAVE_DIR_H)
157 # include <dir.h>
158 # define NAMLEN(dp) ((int)((dp)->d_namlen))
159 
160 #elif defined(HAVE_SYS_DIR_H)
161 # include <sys/types.h>
162 # include <sys/dir.h>
163 # ifndef dirent
164 # define dirent direct
165 # endif
166 # define NAMLEN(dp) ((int)((dp)->d_namlen))
167 
168 #elif defined(MSDOS) || defined(WIN32)
169 
170  /* figure out type of underlying directory interface to be used */
171 # if defined(HAVE_DIRECT_H)
172 # include <direct.h>
173 # endif
174 # if defined(WIN32)
175 # define DIRENT_WIN32_INTERFACE
176 # elif defined(MSDOS)
177 # define DIRENT_MSDOS_INTERFACE
178 # else
179 # error "missing native dirent interface"
180 # endif
181 
182  /*** WIN32 specifics ***/
183 # if defined(DIRENT_WIN32_INTERFACE)
184 # include <windows.h>
185 # if !defined(DIRENT_MAXNAMLEN)
186 # define DIRENT_MAXNAMLEN (MAX_PATH)
187 # endif
188 
189 
190  /*** MS-DOS specifics ***/
191 # elif defined(DIRENT_MSDOS_INTERFACE)
192 # include <dos.h>
193 
194  /* Borland defines file length macros in dir.h */
195 # if defined(__BORLANDC__)
196 # include <dir.h>
197 # if !defined(DIRENT_MAXNAMLEN)
198 # define DIRENT_MAXNAMLEN ((MAXFILE)+(MAXEXT))
199 # endif
200 # if !defined(_find_t)
201 # define _find_t find_t
202 # endif
203 
204  /* Turbo C defines ffblk structure in dir.h */
205 # elif defined(__TURBOC__)
206 # include <dir.h>
207 # if !defined(DIRENT_MAXNAMLEN)
208 # define DIRENT_MAXNAMLEN ((MAXFILE)+(MAXEXT))
209 # endif
210 # define DIRENT_USE_FFBLK
211 
212  /* MSVC */
213 # elif defined(_MSC_VER)
214 # if !defined(DIRENT_MAXNAMLEN)
215 # define DIRENT_MAXNAMLEN (12)
216 # endif
217 
218  /* Watcom */
219 # elif defined(__WATCOMC__)
220 # if !defined(DIRENT_MAXNAMLEN)
221 # if defined(__OS2__) || defined(__NT__)
222 # define DIRENT_MAXNAMLEN (255)
223 # else
224 # define DIRENT_MAXNAMLEN (12)
225 # endif
226 # endif
227 
228 # endif
229 # endif
230 
231  /*** generic MS-DOS and MS-Windows stuff ***/
232 # if !defined(NAME_MAX) && defined(DIRENT_MAXNAMLEN)
233 # define NAME_MAX DIRENT_MAXNAMLEN
234 # endif
235 # if NAME_MAX < DIRENT_MAXNAMLEN
236 # error "assertion failed: NAME_MAX >= DIRENT_MAXNAMLEN"
237 # endif
238 
239  /*
240  * Substitute for real dirent structure. Note that `d_name' field is a
241  * true character array although we have it copied in the implementation
242  * dependent data. We could save some memory if we had declared `d_name'
243  * as a pointer referencing the name within implementation dependent data.
244  * We have not done that since some code may rely on sizeof(d_name) to be
245  * something other than four. Besides, directory entries are typically so
246  * small that it takes virtually no time to copy them from place to place.
247  */
248  typedef struct dirent {
249  char d_name[NAME_MAX + 1];
250 
251  /*** Operating system specific part ***/
252 # if defined(DIRENT_WIN32_INTERFACE) /*WIN32*/
253  WIN32_FIND_DATA data;
254 # elif defined(DIRENT_MSDOS_INTERFACE) /*MSDOS*/
255 # if defined(DIRENT_USE_FFBLK)
256  struct ffblk data;
257 # else
258  struct _find_t data;
259 # endif
260 # endif
261  } dirent;
262 
263  /* DIR substitute structure containing directory name. The name is
264  * essential for the operation of ``rewinddir'' function. */
265  typedef struct DIR {
266  char *dirname; /* directory being scanned */
267  dirent current; /* current entry */
268  int dirent_filled; /* is current un-processed? */
269 
270  /*** Operating system specific part ***/
271 # if defined(DIRENT_WIN32_INTERFACE)
272  HANDLE search_handle;
273 # elif defined(DIRENT_MSDOS_INTERFACE)
274 # endif
275  } DIR;
276 
277 # ifdef __cplusplus
278 extern "C" {
279 # endif
280 
281 /* supply prototypes for dirent functions */
282 static DIR *opendir (const char *dirname);
283 static struct dirent *readdir (DIR *dirp);
284 static int closedir (DIR *dirp);
285 static void rewinddir (DIR *dirp);
286 
287 /*
288  * Implement dirent interface as static functions so that the user does not
289  * need to change his project in any way to use dirent function. With this
290  * it is sufficient to include this very header from source modules using
291  * dirent functions and the functions will be pulled in automatically.
292  */
293 #include <stdio.h>
294 #include <stdlib.h>
295 #include <string.h>
296 #include <assert.h>
297 #include <errno.h>
298 
299 /* use ffblk instead of _find_t if requested */
300 #if defined(DIRENT_USE_FFBLK)
301 # define _A_ARCH (FA_ARCH)
302 # define _A_HIDDEN (FA_HIDDEN)
303 # define _A_NORMAL (0)
304 # define _A_RDONLY (FA_RDONLY)
305 # define _A_SUBDIR (FA_DIREC)
306 # define _A_SYSTEM (FA_SYSTEM)
307 # define _A_VOLID (FA_LABEL)
308 # define _dos_findnext(dest) findnext(dest)
309 # define _dos_findfirst(name,flags,dest) findfirst(name,dest,flags)
310 #endif
311 
312 static int _initdir (DIR *p);
313 static const char *_getdirname (const struct dirent *dp);
314 static void _setdirname (struct DIR *dirp);
315 
316 /*
317  * <function name="opendir">
318  * <intro>open directory stream for reading
319  * <syntax>DIR *opendir (const char *dirname);
320  *
321  * <desc>Open named directory stream for read and return pointer to the
322  * internal working area that is used for retrieving individual directory
323  * entries. The internal working area has no fields of your interest.
324  *
325  * <ret>Returns a pointer to the internal working area or NULL in case the
326  * directory stream could not be opened. Global `errno' variable will set
327  * in case of error as follows:
328  *
329  * <table>
330  * [EACESS |Permission denied.
331  * [EMFILE |Too many open files used by the process.
332  * [ENFILE |Too many open files in system.
333  * [ENOENT |Directory does not exist.
334  * [ENOMEM |Insufficient memory.
335  * [ENOTDIR |dirname does not refer to directory. This value is not
336  * reliable on MS-DOS and MS-Windows platforms. Many
337  * implementations return ENOENT even when the name refers to a
338  * file.]
339  * </table>
340  * </function>
341  */
342 static DIR *
343 opendir(
344  const char *dirname)
345 {
346  DIR *dirp;
347  assert (dirname != NULL);
348 
349  dirp = (DIR*)malloc (sizeof (struct DIR));
350  if (dirp != NULL) {
351  char *p;
352 
353  /* allocate room for directory name */
354  dirp->dirname = (char*) malloc (strlen (dirname) + 1 + strlen ("\\*.*"));
355  if (dirp->dirname == NULL) {
356  /* failed to duplicate directory name. errno set by malloc() */
357  free (dirp);
358  return NULL;
359  }
360  /* Copy directory name while appending directory separator and "*.*".
361  * Directory separator is not appended if the name already ends with
362  * drive or directory separator. Directory separator is assumed to be
363  * '/' or '\' and drive separator is assumed to be ':'. */
364  strcpy (dirp->dirname, dirname);
365  p = strchr (dirp->dirname, '\0');
366  if (dirp->dirname < p &&
367  *(p - 1) != '\\' && *(p - 1) != '/' && *(p - 1) != ':')
368  {
369  strcpy (p++, "\\");
370  }
371 # ifdef DIRENT_WIN32_INTERFACE
372  strcpy (p, "*"); /*scan files with and without extension in win32*/
373 # else
374  strcpy (p, "*.*"); /*scan files with and without extension in DOS*/
375 # endif
376 
377  /* open stream */
378  if (_initdir (dirp) == 0) {
379  /* initialization failed */
380  free (dirp->dirname);
381  free (dirp);
382  return NULL;
383  }
384  }
385  return dirp;
386 }
387 
388 
389 /*
390  * <function name="readdir">
391  * <intro>read a directory entry
392  * <syntax>struct dirent *readdir (DIR *dirp);
393  *
394  * <desc>Read individual directory entry and return pointer to a structure
395  * containing the name of the entry. Individual directory entries returned
396  * include normal files, sub-directories, pseudo-directories "." and ".."
397  * and also volume labels, hidden files and system files in MS-DOS and
398  * MS-Windows. You might want to use stat(2) function to determinate which
399  * one are you dealing with. Many dirent implementations already contain
400  * equivalent information in dirent structure but you cannot depend on
401  * this.
402  *
403  * The dirent structure contains several system dependent fields that
404  * generally have no interest to you. The only interesting one is char
405  * d_name[] that is also portable across different systems. The d_name
406  * field contains the name of the directory entry without leading path.
407  * While d_name is portable across different systems the actual storage
408  * capacity of d_name varies from system to system and there is no portable
409  * way to find out it at compile time as different systems define the
410  * capacity of d_name with different macros and some systems do not define
411  * capacity at all (besides actual declaration of the field). If you really
412  * need to find out storage capacity of d_name then you might want to try
413  * NAME_MAX macro. The NAME_MAX is defined in POSIX standard although
414  * there are many MS-DOS and MS-Windows implementations those do not define
415  * it. There are also systems that declare d_name as "char d_name[1]" and
416  * then allocate suitable amount of memory at run-time. Thanks to Alain
417  * Decamps (Alain.Decamps@advalvas.be) for pointing it out to me.
418  *
419  * This all leads to the fact that it is difficult to allocate space
420  * for the directory names when the very same program is being compiled on
421  * number of operating systems. Therefore I suggest that you always
422  * allocate space for directory names dynamically.
423  *
424  * <ret>
425  * Returns a pointer to a structure containing name of the directory entry
426  * in `d_name' field or NULL if there was an error. In case of an error the
427  * global `errno' variable will set as follows:
428  *
429  * <table>
430  * [EBADF |dir parameter refers to an invalid directory stream. This value
431  * is not set reliably on all implementations.]
432  * </table>
433  * </function>
434  */
435 static struct dirent *
436 readdir (DIR *dirp)
437 {
438  assert (dirp != NULL);
439  if (dirp == NULL) {
440  errno = EBADF;
441  return NULL;
442  }
443 
444 #if defined(DIRENT_WIN32_INTERFACE)
445  if (dirp->search_handle == INVALID_HANDLE_VALUE) {
446  /* directory stream was opened/rewound incorrectly or it ended normally */
447  errno = EBADF;
448  return NULL;
449  }
450 #endif
451 
452  if (dirp->dirent_filled != 0) {
453  /*
454  * Directory entry has already been retrieved and there is no need to
455  * retrieve a new one. Directory entry will be retrieved in advance
456  * when the user calls readdir function for the first time. This is so
457  * because real dirent has separate functions for opening and reading
458  * the stream whereas Win32 and DOS dirents open the stream
459  * automatically when we retrieve the first file. Therefore, we have to
460  * save the first file when opening the stream and later we have to
461  * return the saved entry when the user tries to read the first entry.
462  */
463  dirp->dirent_filled = 0;
464  } else {
465  /* fill in entry and return that */
466 #if defined(DIRENT_WIN32_INTERFACE)
467  if (FindNextFile (dirp->search_handle, &dirp->current.data) == FALSE) {
468  /* Last file has been processed or an error occurred */
469  FindClose (dirp->search_handle);
470  dirp->search_handle = INVALID_HANDLE_VALUE;
471  errno = ENOENT;
472  return NULL;
473  }
474 
475 # elif defined(DIRENT_MSDOS_INTERFACE)
476  if (_dos_findnext (&dirp->current.data) != 0) {
477  /* _dos_findnext and findnext will set errno to ENOENT when no
478  * more entries could be retrieved. */
479  return NULL;
480  }
481 # endif
482 
483  _setdirname (dirp);
484  assert (dirp->dirent_filled == 0);
485  }
486  return &dirp->current;
487 }
488 
489 
490 /*
491  * <function name="closedir">
492  * <intro>close directory stream.
493  * <syntax>int closedir (DIR *dirp);
494  *
495  * <desc>Close directory stream opened by the `opendir' function. Close of
496  * directory stream invalidates the DIR structure as well as previously read
497  * dirent entry.
498  *
499  * <ret>The function typically returns 0 on success and -1 on failure but
500  * the function may be declared to return void on same systems. At least
501  * Borland C/C++ and some UNIX implementations use void as a return type.
502  * The dirent wrapper tries to define VOID_CLOSEDIR whenever closedir is
503  * known to return nothing. The very same definition is made by the GNU
504  * autoconf if you happen to use it.
505  *
506  * The global `errno' variable will set to EBADF in case of error.
507  * </function>
508  */
509 static int
510 closedir (DIR *dirp)
511 {
512  int retcode = 0;
513 
514  /* make sure that dirp points to legal structure */
515  assert (dirp != NULL);
516  if (dirp == NULL) {
517  errno = EBADF;
518  return -1;
519  }
520 
521  /* free directory name and search handles */
522  if (dirp->dirname != NULL) free (dirp->dirname);
523 
524 #if defined(DIRENT_WIN32_INTERFACE)
525  if (dirp->search_handle != INVALID_HANDLE_VALUE) {
526  if (FindClose (dirp->search_handle) == FALSE) {
527  /* Unknown error */
528  retcode = -1;
529  errno = EBADF;
530  }
531  }
532 #endif
533 
534  /* clear dirp structure to make sure that it cannot be used anymore*/
535  memset (dirp, 0, sizeof (*dirp));
536 # if defined(DIRENT_WIN32_INTERFACE)
537  dirp->search_handle = INVALID_HANDLE_VALUE;
538 # endif
539 
540  free (dirp);
541  return retcode;
542 }
543 
544 
545 /*
546  * <function name="rewinddir">
547  * <intro>rewind directory stream to the beginning
548  * <syntax>void rewinddir (DIR *dirp);
549  *
550  * <desc>Rewind directory stream to the beginning so that the next call of
551  * readdir() returns the very first directory entry again. However, note
552  * that next call of readdir() may not return the same directory entry as it
553  * did in first time. The directory stream may have been affected by newly
554  * created files.
555  *
556  * Almost every dirent implementation ensure that rewinddir will update
557  * the directory stream to reflect any changes made to the directory entries
558  * since the previous ``opendir'' or ``rewinddir'' call. Keep an eye on
559  * this if your program depends on the feature. I know at least one dirent
560  * implementation where you are required to close and re-open the stream to
561  * see the changes.
562  *
563  * <ret>Returns nothing. If something went wrong while rewinding, you will
564  * notice it later when you try to retrieve the first directory entry.
565  */
566 static void
567 rewinddir (DIR *dirp)
568 {
569  /* make sure that dirp is legal */
570  assert (dirp != NULL);
571  if (dirp == NULL) {
572  errno = EBADF;
573  return;
574  }
575  assert (dirp->dirname != NULL);
576 
577  /* close previous stream */
578 #if defined(DIRENT_WIN32_INTERFACE)
579  if (dirp->search_handle != INVALID_HANDLE_VALUE) {
580  if (FindClose (dirp->search_handle) == FALSE) {
581  /* Unknown error */
582  errno = EBADF;
583  }
584  }
585 #endif
586 
587  /* re-open previous stream */
588  if (_initdir (dirp) == 0) {
589  /* initialization failed but we cannot deal with error. User will notice
590  * error later when she tries to retrieve first directory enty. */
591  /*EMPTY*/;
592  }
593 }
594 
595 
596 /*
597  * Open native directory stream object and retrieve first file.
598  * Be sure to close previous stream before opening new one.
599  */
600 static int
601 _initdir (DIR *dirp)
602 {
603  assert (dirp != NULL);
604  assert (dirp->dirname != NULL);
605  dirp->dirent_filled = 0;
606 
607 # if defined(DIRENT_WIN32_INTERFACE)
608  /* Open stream and retrieve first file */
609  dirp->search_handle = FindFirstFile (dirp->dirname, &dirp->current.data);
610  if (dirp->search_handle == INVALID_HANDLE_VALUE) {
611  /* something went wrong but we don't know what. GetLastError() could
612  * give us more information about the error, but then we should map
613  * the error code into errno. */
614  errno = ENOENT;
615  return 0;
616  }
617 
618 # elif defined(DIRENT_MSDOS_INTERFACE)
619  if (_dos_findfirst (dirp->dirname,
620  _A_SUBDIR | _A_RDONLY | _A_ARCH | _A_SYSTEM | _A_HIDDEN,
621  &dirp->current.data) != 0)
622  {
623  /* _dos_findfirst and findfirst will set errno to ENOENT when no
624  * more entries could be retrieved. */
625  return 0;
626  }
627 # endif
628 
629  /* initialize DIR and its first entry */
630  _setdirname (dirp);
631  dirp->dirent_filled = 1;
632  return 1;
633 }
634 
635 
636 /*
637  * Return implementation dependent name of the current directory entry.
638  */
639 static const char *
640 _getdirname (const struct dirent *dp)
641 {
642 #if defined(DIRENT_WIN32_INTERFACE)
643  return dp->data.cFileName;
644 
645 #elif defined(DIRENT_USE_FFBLK)
646  return dp->data.ff_name;
647 
648 #else
649  return dp->data.name;
650 #endif
651 }
652 
653 
654 /*
655  * Copy name of implementation dependent directory entry to the d_name field.
656  */
657 static void
658 _setdirname (struct DIR *dirp) {
659  /* make sure that d_name is long enough */
660  assert (strlen (_getdirname (&dirp->current)) <= NAME_MAX);
661 
662  strncpy (dirp->current.d_name,
663  _getdirname (&dirp->current),
664  NAME_MAX);
665  dirp->current.d_name[NAME_MAX] = '\0'; /*char d_name[NAME_MAX+1]*/
666 }
667 
668 # ifdef __cplusplus
669 }
670 # endif
671 # define NAMLEN(dp) ((int)(strlen((dp)->d_name)))
672 
673 #else
674 # error "missing dirent interface"
675 #endif
676 
677 
678 #endif /*LIBBU_UCE_DIRENT_H*/
#define FALSE
char * strchr(const char *sp, int c)
COMPLEX data[64]
Definition: fftest.c:34
void * memset(void *s, int c, size_t n)