Page MenuHomePhorge

basename.c
ActivePublic

Authored by keithzg on Jul 31 2019, 4:20 PM.
Tags
None
Referenced Files
F1300: raw.txt
Jul 31 2019, 4:20 PM
Subscribers
None
/* basename -- strip directory and suffix from file names
Copyright (C) 1990-2019 Free Software Foundation, Inc.
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 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
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
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, see <https://www.gnu.org/licenses/>. */
#include <config.h>
#include <getopt.h>
#include <stdio.h>
#include <sys/types.h>
#include "system.h"
#include "error.h"
#include "quote.h"
/* The official name of this program (e.g., no 'g' prefix). */
#define PROGRAM_NAME "basename"
#define AUTHORS proper_name ("David MacKenzie")
static struct option const longopts[] =
{
{"multiple", no_argument, NULL, 'a'},
{"suffix", required_argument, NULL, 's'},
{"zero", no_argument, NULL, 'z'},
{GETOPT_HELP_OPTION_DECL},
{GETOPT_VERSION_OPTION_DECL},
{NULL, 0, NULL, 0}
};
void
usage (int status)
{
if (status != EXIT_SUCCESS)
emit_try_help ();
else
{
printf (_("\
Usage: %s NAME [SUFFIX]\n\
or: %s OPTION... NAME...\n\
"),
program_name, program_name);
fputs (_("\
Print NAME with any leading directory components removed.\n\
If specified, also remove a trailing SUFFIX.\n\
"), stdout);
emit_mandatory_arg_note ();
fputs (_("\
-a, --multiple support multiple arguments and treat each as a NAME\n\
-s, --suffix=SUFFIX remove a trailing SUFFIX; implies -a\n\
-z, --zero end each output line with NUL, not newline\n\
"), stdout);
fputs (HELP_OPTION_DESCRIPTION, stdout);
fputs (VERSION_OPTION_DESCRIPTION, stdout);
printf (_("\
\n\
Examples:\n\
%s /usr/bin/sort -> \"sort\"\n\
%s include/stdio.h .h -> \"stdio\"\n\
%s -s .h include/stdio.h -> \"stdio\"\n\
%s -a any/str1 any/str2 -> \"str1\" followed by \"str2\"\n\
"),
program_name, program_name, program_name, program_name);
emit_ancillary_info (PROGRAM_NAME);
}
exit (status);
}
/* Remove SUFFIX from the end of NAME if it is there, unless NAME
consists entirely of SUFFIX. */
static void
remove_suffix (char *name, const char *suffix)
{
char *np;
const char *sp;
np = name + strlen (name);
sp = suffix + strlen (suffix);
while (np > name && sp > suffix)
if (*--np != *--sp)
return;
if (np > name)
*np = '\0';
}
/* Perform the basename operation on STRING. If SUFFIX is non-NULL, remove
the trailing SUFFIX. Finally, output the result string. */
static void
perform_basename (const char *string, const char *suffix, bool use_nuls)
{
char *name = base_name (string);
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 (suffix && IS_RELATIVE_FILE_NAME (name) && ! FILE_SYSTEM_PREFIX_LEN (name))
remove_suffix (name, suffix);
fputs (name, stdout);
putchar (use_nuls ? '\0' : '\n');
free (name);
}
int
main (int argc, char **argv)
{
bool multiple_names = false;
bool use_nuls = false;
const char *suffix = NULL;
initialize_main (&argc, &argv);
set_program_name (argv[0]);
setlocale (LC_ALL, "");
bindtextdomain (PACKAGE, LOCALEDIR);
textdomain (PACKAGE);
atexit (close_stdout);
while (true)
{
int c = getopt_long (argc, argv, "+as:z", longopts, NULL);
if (c == -1)
break;
switch (c)
{
case 's':
suffix = optarg;
/* -s implies -a, so... */
FALLTHROUGH;
case 'a':
multiple_names = true;
break;
case 'z':
use_nuls = true;
break;
case_GETOPT_HELP_CHAR;
case_GETOPT_VERSION_CHAR (PROGRAM_NAME, AUTHORS);
default:
usage (EXIT_FAILURE);
}
}
if (argc < optind + 1)
{
error (0, 0, _("missing operand"));
usage (EXIT_FAILURE);
}
if (!multiple_names && optind + 2 < argc)
{
error (0, 0, _("extra operand %s"), quote (argv[optind + 2]));
usage (EXIT_FAILURE);
}
if (multiple_names)
{
for (; optind < argc; optind++)
perform_basename (argv[optind], suffix, use_nuls);
}
else
perform_basename (argv[optind],
optind + 2 == argc ? argv[optind + 1] : NULL, use_nuls);
return EXIT_SUCCESS;
}

Event Timeline

keithzg created this object with visibility "Public (No Login Required)".