src/dirname.c

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