1 /* dirname -- strip suffix from file name
3 Copyright (C) 1990-1997, 1999-2002, 2004-2008 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 3 of the License, or
9 (at your option) any later version.
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, see <http://www.gnu.org/licenses/>. */
19 /* Written by David MacKenzie and Jim Meyering. */
24 #include <sys/types.h>
27 #include "long-options.h"
31 /* The official name of this program (e.g., no `g' prefix). */
32 #define PROGRAM_NAME "dirname"
35 proper_name ("David MacKenzie"), \
36 proper_name ("Jim Meyering")
41 if (status != EXIT_SUCCESS)
42 fprintf (stderr, _("Try `%s --help' for more information.\n"),
50 program_name, program_name);
52 Print NAME with its trailing /component removed; if NAME contains no /'s,\n\
53 output `.' (meaning the current directory).\n\
56 fputs (HELP_OPTION_DESCRIPTION, stdout);
57 fputs (VERSION_OPTION_DESCRIPTION, stdout);
61 %s /usr/bin/sort Output \"/usr/bin\".\n\
62 %s stdio.h Output \".\".\n\
64 program_name, program_name);
65 emit_bug_reporting_address ();
71 main (int argc, char **argv)
73 static char const dot = '.';
77 initialize_main (&argc, &argv);
78 set_program_name (argv[0]);
79 setlocale (LC_ALL, "");
80 bindtextdomain (PACKAGE, LOCALEDIR);
83 atexit (close_stdout);
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)
90 if (argc < optind + 1)
92 error (0, 0, _("missing operand"));
96 if (optind + 1 < argc)
98 error (0, 0, _("extra operand %s"), quote (argv[optind + 1]));
102 result = argv[optind];
103 len = dir_len (result);
111 fwrite (result, 1, len, stdout);