src/dirname.c

   1 /* dirname -- strip filename suffix from pathname
   2    Copyright (C) 1990, 1991 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 /* Written by David MacKenzie and Jim Meyering. */
  19
  20 #ifdef HAVE_CONFIG_H
  21 #if defined (CONFIG_BROKETS)
  22 /* We use <config.h> instead of "config.h" so that a compilation
  23    using -I. -I$srcdir will use ./config.h rather than $srcdir/config.h
  24    (which it would do because it found this file in $srcdir).  */
  25 #include <config.h>
  26 #else
  27 #include "config.h"
  28 #endif
  29 #endif
  30
  31 #include <stdio.h>
  32 #include <sys/types.h>
  33 #include <getopt.h>
  34
  35 #include "version.h"
  36 #include "system.h"
  37
  38 void strip_trailing_slashes ();
  39
  40 /* The name this program was run with. */
  41 char *program_name;
  42
  43 /* If non-zero, display usage information and exit.  */
  44 static int show_help;
  45
  46 /* If non-zero, print the version on standard output and exit.  */
  47 static int show_version;
  48
  49 static struct option const long_options[] =
  50 {
  51   {"help", no_argument, &show_help, 1},
  52   {"version", no_argument, &show_version, 1},
  53   {0, 0, 0, 0}
  54 };
  55
  56 static void
  57 usage ()
  58 {
  59   fprintf (stderr, "Usage: %s [{--help,--version}] path\n", program_name);
  60   exit (1);
  61 }
  62
  63 void
  64 main (argc, argv)
  65      int argc;
  66      char **argv;
  67 {
  68   register char *path;
  69   register char *slash;
  70   int c;
  71
  72   program_name = argv[0];
  73
  74   while ((c = getopt_long (argc, argv, "", long_options, (int *) 0)) != EOF)
  75     {
  76       switch (c)
  77         {
  78         case 0:
  79           break;
  80
  81         default:
  82           usage ();
  83         }
  84     }
  85
  86   if (show_version)
  87     {
  88       printf ("%s\n", version_string);
  89       exit (0);
  90     }
  91
  92   if (show_help)
  93     usage ();
  94
  95   if (argc - optind != 1)
  96     usage ();
  97
  98   path = argv[optind];
  99   strip_trailing_slashes (path);
 100
 101   slash = rindex (path, '/');
 102   if (slash == NULL)
 103     path = ".";
 104   else
 105     {
 106       /* Remove any trailing slashes and final element. */
 107       while (slash > path && *slash == '/')
 108         --slash;
 109       slash[1] = 0;
 110     }
 111   puts (path);
 112
 113   exit (0);
 114 }