home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 4 / FreshFish_May-June1994.bin / bbs / gnu / fileutils-3.9-src.lha / src / amiga / fileutils-3.9 / lib / isdir.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-10-12  |  1.5 KB  |  53 lines
  1. /* isdir.c -- determine whether a directory exists
  2.    Copyright (C) 1990 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 2, or (at your option)
  7.    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, write to the Free Software
  16.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  17.  
  18. #ifdef HAVE_CONFIG_H
  19. #if defined (CONFIG_BROKETS)
  20. /* We use <config.h> instead of "config.h" so that a compilation
  21.    using -I. -I$srcdir will use ./config.h rather than $srcdir/config.h
  22.    (which it would do because it found this file in $srcdir).  */
  23. #include <config.h>
  24. #else
  25. #include "config.h"
  26. #endif
  27. #endif
  28.  
  29. #include <sys/types.h>
  30. #include <sys/stat.h>
  31.  
  32. #ifdef    STAT_MACROS_BROKEN
  33. #ifdef S_ISDIR
  34. #undef S_ISDIR
  35. #endif
  36. #endif    /* STAT_MACROS_BROKEN.  */
  37.  
  38. #if !defined(S_ISDIR) && defined(S_IFDIR)
  39. #define S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR)
  40. #endif
  41.  
  42. /* If PATH is an existing directory or symbolic link to a directory,
  43.    return nonzero, else 0.  */
  44.  
  45. int
  46. isdir (path)
  47.      char *path;
  48. {
  49.   struct stat stats;
  50.  
  51.   return stat (path, &stats) == 0 && S_ISDIR (stats.st_mode);
  52. }
  53.