src/dirname.c

   1 /* dirname -- strip suffix from file name
   2
   3    Copyright (C) 1990-1997, 1999-2002, 2004-2009 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     fprintf (stderr, _("Try `%s --help' for more information.\n"),
  42              program_name);
  43   else
  44     {
  45       printf (_("\
  46 Usage: %s NAME\n\
  47   or:  %s OPTION\n\
  48 "),
  49               program_name, program_name);
  50       fputs (_("\
  51 Print NAME with its trailing /component removed; if NAME contains no /'s,\n\
  52 output `.' (meaning the current directory).\n\
  53 \n\
  54 "), stdout);
  55       fputs (HELP_OPTION_DESCRIPTION, stdout);
  56       fputs (VERSION_OPTION_DESCRIPTION, stdout);
  57       printf (_("\
  58 \n\
  59 Examples:\n\
  60   %s /usr/bin/sort  Output \"/usr/bin\".\n\
  61   %s stdio.h        Output \".\".\n\
  62 "),
  63               program_name, program_name);
  64       emit_bug_reporting_address ();
  65     }
  66   exit (status);
  67 }
  68
  69 int
  70 main (int argc, char **argv)
  71 {
  72   static char const dot = '.';
  73   char const *result;
  74   size_t len;
  75
  76   initialize_main (&argc, &argv);
  77   set_program_name (argv[0]);
  78   setlocale (LC_ALL, "");
  79   bindtextdomain (PACKAGE, LOCALEDIR);
  80   textdomain (PACKAGE);
  81
  82   atexit (close_stdout);
  83
  84   parse_long_options (argc, argv, PROGRAM_NAME, PACKAGE_NAME, Version,
  85                       usage, AUTHORS, (char const *) NULL);
  86   if (getopt_long (argc, argv, "+", NULL, NULL) != -1)
  87     usage (EXIT_FAILURE);
  88
  89   if (argc < optind + 1)
  90     {
  91       error (0, 0, _("missing operand"));
  92       usage (EXIT_FAILURE);
  93     }
  94
  95   if (optind + 1 < argc)
  96     {
  97       error (0, 0, _("extra operand %s"), quote (argv[optind + 1]));
  98       usage (EXIT_FAILURE);
  99     }
 100
 101   result = argv[optind];
 102   len = dir_len (result);
 103
 104   if (! len)
 105     {
 106       result = &dot;
 107       len = 1;
 108     }
 109
 110   fwrite (result, 1, len, stdout);
 111   putchar ('\n');
 112
 113   exit (EXIT_SUCCESS);
 114 }