libbb/dirname.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Mini dirname function.
   4  *
   5  * Copyright (C) 2001  Matt Kraai.
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  15  * General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  20  */
  21
  22 #include <string.h>
  23 #include "libbb.h"
  24
  25 /* Return a string on the heap containing the directory component of PATH.  */
  26
  27 char *dirname(const char *path)
  28 {
  29         const char *s;
  30
  31         /* Go to the end of the string.  */
  32         s = path + strlen(path) - 1;
  33
  34         /* Strip off trailing /s (unless it is also the leading /).  */
  35         while (path < s && s[0] == '/')
  36                 s--;
  37
  38         /* Strip the last component.  */
  39         while (path <= s && s[0] != '/')
  40                 s--;
  41
  42         while (path < s && s[0] == '/')
  43                 s--;
  44
  45         if (s < path)
  46                 return xstrdup (".");
  47         else
  48                 return xstrndup (path, s - path + 1);
  49 }