Blame lib/basename-lgpl.c

Packit d6cc65
/* basename.c -- return the last element in a file name
Packit d6cc65
Packit d6cc65
   Copyright (C) 1990, 1998-2001, 2003-2006, 2009-2015 Free Software
Packit d6cc65
   Foundation, Inc.
Packit d6cc65
Packit d6cc65
   This program is free software: you can redistribute it and/or modify
Packit d6cc65
   it under the terms of the GNU General Public License as published by
Packit d6cc65
   the Free Software Foundation; either version 3 of the License, or
Packit d6cc65
   (at your option) any later version.
Packit d6cc65
Packit d6cc65
   This program is distributed in the hope that it will be useful,
Packit d6cc65
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit d6cc65
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit d6cc65
   GNU General Public License for more details.
Packit d6cc65
Packit d6cc65
   You should have received a copy of the GNU General Public License
Packit d6cc65
   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
Packit d6cc65
Packit d6cc65
#include <config.h>
Packit d6cc65
Packit d6cc65
#include "dirname.h"
Packit d6cc65
Packit d6cc65
#include <string.h>
Packit d6cc65
Packit d6cc65
/* Return the address of the last file name component of NAME.  If
Packit d6cc65
   NAME has no relative file name components because it is a file
Packit d6cc65
   system root, return the empty string.  */
Packit d6cc65
Packit d6cc65
char *
Packit d6cc65
last_component (char const *name)
Packit d6cc65
{
Packit d6cc65
  char const *base = name + FILE_SYSTEM_PREFIX_LEN (name);
Packit d6cc65
  char const *p;
Packit d6cc65
  bool saw_slash = false;
Packit d6cc65
Packit d6cc65
  while (ISSLASH (*base))
Packit d6cc65
    base++;
Packit d6cc65
Packit d6cc65
  for (p = base; *p; p++)
Packit d6cc65
    {
Packit d6cc65
      if (ISSLASH (*p))
Packit d6cc65
        saw_slash = true;
Packit d6cc65
      else if (saw_slash)
Packit d6cc65
        {
Packit d6cc65
          base = p;
Packit d6cc65
          saw_slash = false;
Packit d6cc65
        }
Packit d6cc65
    }
Packit d6cc65
Packit d6cc65
  return (char *) base;
Packit d6cc65
}
Packit d6cc65
Packit d6cc65
/* Return the length of the basename NAME.  Typically NAME is the
Packit d6cc65
   value returned by base_name or last_component.  Act like strlen
Packit d6cc65
   (NAME), except omit all trailing slashes.  */
Packit d6cc65
Packit d6cc65
size_t
Packit d6cc65
base_len (char const *name)
Packit d6cc65
{
Packit d6cc65
  size_t len;
Packit d6cc65
  size_t prefix_len = FILE_SYSTEM_PREFIX_LEN (name);
Packit d6cc65
Packit d6cc65
  for (len = strlen (name);  1 < len && ISSLASH (name[len - 1]);  len--)
Packit d6cc65
    continue;
Packit d6cc65
Packit d6cc65
  if (DOUBLE_SLASH_IS_DISTINCT_ROOT && len == 1
Packit d6cc65
      && ISSLASH (name[0]) && ISSLASH (name[1]) && ! name[2])
Packit d6cc65
    return 2;
Packit d6cc65
Packit d6cc65
  if (FILE_SYSTEM_DRIVE_PREFIX_CAN_BE_RELATIVE && prefix_len
Packit d6cc65
      && len == prefix_len && ISSLASH (name[prefix_len]))
Packit d6cc65
    return prefix_len + 1;
Packit d6cc65
Packit d6cc65
  return len;
Packit d6cc65
}