1 /* dirname -- strip suffix from file name
3 Copyright (C) 1990-1997, 1999-2002, 2004, 2005, 2006 Free Software
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 2, or (at your option)
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.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software Foundation,
18 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
20 /* Written by David MacKenzie and Jim Meyering. */
25 #include <sys/types.h>
28 #include "long-options.h"
32 /* The official name of this program (e.g., no `g' prefix). */
33 #define PROGRAM_NAME "dirname"
35 #define AUTHORS "David MacKenzie", "Jim Meyering"
37 /* The name this program was run with. */
43 if (status != EXIT_SUCCESS)
44 fprintf (stderr, _("Try `%s --help' for more information.\n"),
52 program_name, program_name);
54 Print NAME with its trailing /component removed; if NAME contains no /'s,\n\
55 output `.' (meaning the current directory).\n\
58 fputs (HELP_OPTION_DESCRIPTION, stdout);
59 fputs (VERSION_OPTION_DESCRIPTION, stdout);
63 %s /usr/bin/sort Output \"/usr/bin\".\n\
64 %s stdio.h Output \".\".\n\
66 program_name, program_name);
67 printf (_("\nReport bugs to <%s>.\n"), PACKAGE_BUGREPORT);
73 main (int argc, char **argv)
75 static char const dot = '.';
79 initialize_main (&argc, &argv);
80 program_name = argv[0];
81 setlocale (LC_ALL, "");
82 bindtextdomain (PACKAGE, LOCALEDIR);
85 atexit (close_stdout);
87 parse_long_options (argc, argv, PROGRAM_NAME, GNU_PACKAGE, VERSION,
88 usage, AUTHORS, (char const *) NULL);
89 if (getopt_long (argc, argv, "+", NULL, NULL) != -1)
92 if (argc < optind + 1)
94 error (0, 0, _("missing operand"));
98 if (optind + 1 < argc)
100 error (0, 0, _("extra operand %s"), quote (argv[optind + 1]));
101 usage (EXIT_FAILURE);
104 result = argv[optind];
105 len = dir_len (result);
113 fwrite (result, 1, len, stdout);