-/* basename -- strip directory and suffix from filenames
- Copyright (C) 1990, 1991 Free Software Foundation, Inc.
+/* basename -- strip directory and suffix from file names
+ Copyright (C) 1990-1997, 1999-2008 Free Software Foundation, Inc.
- This program is free software; you can redistribute it and/or modify
+ This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2, or (at your option)
- any later version.
+ the Free Software Foundation, either version 3 of the License, or
+ (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
+ along with this program. If not, see <http://www.gnu.org/licenses/>. */
/* Usage: basename name [suffix]
- NAME is a pathname; SUFFIX is a suffix to strip from it.
+ NAME is a file name; SUFFIX is a suffix to strip from it.
basename /usr/foo/lossage/functions.l
=> functions.l
basename functions.lisp p
=> functions.lis */
+#include <config.h>
+#include <getopt.h>
#include <stdio.h>
#include <sys/types.h>
+
#include "system.h"
+#include "long-options.h"
+#include "error.h"
+#include "quote.h"
+
+/* The official name of this program (e.g., no `g' prefix). */
+#define PROGRAM_NAME "basename"
-char *basename ();
-void remove_suffix ();
-void strip_trailing_slashes ();
+#define AUTHORS proper_name ("David MacKenzie")
void
-main (argc, argv)
- int argc;
- char **argv;
+usage (int status)
{
- char *name;
-
- if (argc == 1 || argc > 3)
+ if (status != EXIT_SUCCESS)
+ fprintf (stderr, _("Try `%s --help' for more information.\n"),
+ program_name);
+ else
{
- fprintf (stderr, "Usage: %s name [suffix]\n", argv[0]);
- exit (1);
+ printf (_("\
+Usage: %s NAME [SUFFIX]\n\
+ or: %s OPTION\n\
+"),
+ program_name, program_name);
+ fputs (_("\
+Print NAME with any leading directory components removed.\n\
+If specified, also remove a trailing SUFFIX.\n\
+\n\
+"), stdout);
+ fputs (HELP_OPTION_DESCRIPTION, stdout);
+ fputs (VERSION_OPTION_DESCRIPTION, stdout);
+ printf (_("\
+\n\
+Examples:\n\
+ %s /usr/bin/sort Output \"sort\".\n\
+ %s include/stdio.h .h Output \"stdio\".\n\
+"),
+ program_name, program_name);
+ emit_bug_reporting_address ();
}
-
- strip_trailing_slashes (argv[1]);
-
- name = basename (argv[1]);
-
- if (argc == 3)
- remove_suffix (name, argv[2]);
-
- puts (name);
-
- exit (0);
+ exit (status);
}
/* Remove SUFFIX from the end of NAME if it is there, unless NAME
consists entirely of SUFFIX. */
-void
-remove_suffix (name, suffix)
- register char *name, *suffix;
+static void
+remove_suffix (char *name, const char *suffix)
{
- register char *np, *sp;
+ char *np;
+ const char *sp;
np = name + strlen (name);
sp = suffix + strlen (suffix);
if (np > name)
*np = '\0';
}
+
+int
+main (int argc, char **argv)
+{
+ char *name;
+
+ initialize_main (&argc, &argv);
+ set_program_name (argv[0]);
+ setlocale (LC_ALL, "");
+ bindtextdomain (PACKAGE, LOCALEDIR);
+ textdomain (PACKAGE);
+
+ atexit (close_stdout);
+
+ parse_long_options (argc, argv, PROGRAM_NAME, PACKAGE_NAME, VERSION,
+ usage, AUTHORS, (char const *) NULL);
+ if (getopt_long (argc, argv, "+", NULL, NULL) != -1)
+ usage (EXIT_FAILURE);
+
+ if (argc < optind + 1)
+ {
+ error (0, 0, _("missing operand"));
+ usage (EXIT_FAILURE);
+ }
+
+ if (optind + 2 < argc)
+ {
+ error (0, 0, _("extra operand %s"), quote (argv[optind + 2]));
+ usage (EXIT_FAILURE);
+ }
+
+ name = base_name (argv[optind]);
+ strip_trailing_slashes (name);
+
+ /* Per POSIX, `basename // /' must return `//' on platforms with
+ distinct //. On platforms with drive letters, this generalizes
+ to making `basename c: :' return `c:'. This rule is captured by
+ skipping suffix stripping if base_name returned an absolute path
+ or a drive letter (only possible if name is a file-system
+ root). */
+ if (argc == optind + 2 && IS_RELATIVE_FILE_NAME (name)
+ && ! FILE_SYSTEM_PREFIX_LEN (name))
+ remove_suffix (name, argv[optind + 1]);
+
+ puts (name);
+ free (name);
+
+ exit (EXIT_SUCCESS);
+}