src/dirname.c

   1 /* dirname -- strip suffix from file name
   2
   3    Copyright (C) 1990-1997, 1999-2002, 2004-2008 Free Software
   4    Foundation, Inc.
   5
   6    This program is free software: you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation, either version 3 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  18
  19 /* Written by David MacKenzie and Jim Meyering. */
  20
  21 #include <config.h>
  22 #include <getopt.h>
  23 #include <stdio.h>
  24 #include <sys/types.h>
  25
  26 #include "system.h"
  27 #include "long-options.h"
  28 #include "error.h"
  29 #include "quote.h"
  30
  31 /* The official name of this program (e.g., no `g' prefix).  */
  32 #define PROGRAM_NAME "dirname"
  33
  34 #define AUTHORS \
  35   proper_name ("David MacKenzie"), \
  36   proper_name ("Jim Meyering")
  37
  38 void
  39 usage (int status)
  40 {
  41   if (status != EXIT_SUCCESS)
  42     fprintf (stderr, _("Try `%s --help' for more information.\n"),
  43              program_name);
  44   else
  45     {
  46       printf (_("\
  47 Usage: %s NAME\n\
  48   or:  %s OPTION\n\
  49 "),
  50               program_name, program_name);
  51       fputs (_("\
  52 Print NAME with its trailing /component removed; if NAME contains no /'s,\n\
  53 output `.' (meaning the current directory).\n\
  54 \n\
  55 "), stdout);
  56       fputs (HELP_OPTION_DESCRIPTION, stdout);
  57       fputs (VERSION_OPTION_DESCRIPTION, stdout);
  58       printf (_("\
  59 \n\
  60 Examples:\n\
  61   %s /usr/bin/sort  Output \"/usr/bin\".\n\
  62   %s stdio.h        Output \".\".\n\
  63 "),
  64               program_name, program_name);
  65       emit_bug_reporting_address ();
  66     }
  67   exit (status);
  68 }
  69
  70 int
  71 main (int argc, char **argv)
  72 {
  73   static char const dot = '.';
  74   char const *result;
  75   size_t len;
  76
  77   initialize_main (&argc, &argv);
  78   set_program_name (argv[0]);
  79   setlocale (LC_ALL, "");
  80   bindtextdomain (PACKAGE, LOCALEDIR);
  81   textdomain (PACKAGE);
  82
  83   atexit (close_stdout);
  84
  85   parse_long_options (argc, argv, PROGRAM_NAME, PACKAGE_NAME, Version,
  86                       usage, AUTHORS, (char const *) NULL);
  87   if (getopt_long (argc, argv, "+", NULL, NULL) != -1)
  88     usage (EXIT_FAILURE);
  89
  90   if (argc < optind + 1)
  91     {
  92       error (0, 0, _("missing operand"));
  93       usage (EXIT_FAILURE);
  94     }
  95
  96   if (optind + 1 < argc)
  97     {
  98       error (0, 0, _("extra operand %s"), quote (argv[optind + 1]));
  99       usage (EXIT_FAILURE);
 100     }
 101
 102   result = argv[optind];
 103   len = dir_len (result);
 104
 105   if (! len)
 106     {
 107       result = &dot;
 108       len = 1;
 109     }
 110
 111   fwrite (result, 1, len, stdout);
 112   putchar ('\n');
 113
 114   exit (EXIT_SUCCESS);
 115 }