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
);