1e2f68161SEd Schouten /*- 2e2f68161SEd Schouten * Copyright (c) 2015-2016 Nuxi, https://nuxi.nl/ 31250db81SDag-Erling Smørgrav * 4e2f68161SEd Schouten * Redistribution and use in source and binary forms, with or without 5e2f68161SEd Schouten * modification, are permitted provided that the following conditions 6e2f68161SEd Schouten * are met: 7e2f68161SEd Schouten * 1. Redistributions of source code must retain the above copyright 8e2f68161SEd Schouten * notice, this list of conditions and the following disclaimer. 9e2f68161SEd Schouten * 2. Redistributions in binary form must reproduce the above copyright 10e2f68161SEd Schouten * notice, this list of conditions and the following disclaimer in the 11e2f68161SEd Schouten * documentation and/or other materials provided with the distribution. 121250db81SDag-Erling Smørgrav * 13e2f68161SEd Schouten * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 14e2f68161SEd Schouten * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 15e2f68161SEd Schouten * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 16e2f68161SEd Schouten * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 17e2f68161SEd Schouten * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 18e2f68161SEd Schouten * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 19e2f68161SEd Schouten * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 20e2f68161SEd Schouten * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 21e2f68161SEd Schouten * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 22e2f68161SEd Schouten * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 23e2f68161SEd Schouten * SUCH DAMAGE. 241250db81SDag-Erling Smørgrav */ 251250db81SDag-Erling Smørgrav 261250db81SDag-Erling Smørgrav #include <libgen.h> 271250db81SDag-Erling Smørgrav #include <string.h> 281250db81SDag-Erling Smørgrav 291250db81SDag-Erling Smørgrav char * 30cd4dcac8SEd Schouten (dirname)(char *path) 311250db81SDag-Erling Smørgrav { 32*fd85bff5SEd Schouten char *end; 331250db81SDag-Erling Smørgrav 34e2f68161SEd Schouten /* 35e2f68161SEd Schouten * If path is a null pointer or points to an empty string, 36e2f68161SEd Schouten * dirname() shall return a pointer to the string ".". 37e2f68161SEd Schouten */ 38e2f68161SEd Schouten if (path == NULL || *path == '\0') 39*fd85bff5SEd Schouten return (__DECONST(char *, ".")); 40e2f68161SEd Schouten 41*fd85bff5SEd Schouten /* Find end of last pathname component. */ 42*fd85bff5SEd Schouten end = path + strlen(path); 43*fd85bff5SEd Schouten while (end > path + 1 && *(end - 1) == '/') 44*fd85bff5SEd Schouten --end; 45e2f68161SEd Schouten 46*fd85bff5SEd Schouten /* Strip off the last pathname component. */ 47*fd85bff5SEd Schouten while (end > path && *(end - 1) != '/') 48*fd85bff5SEd Schouten --end; 491250db81SDag-Erling Smørgrav 50e2f68161SEd Schouten /* 51e2f68161SEd Schouten * If path does not contain a '/', then dirname() shall return a 52e2f68161SEd Schouten * pointer to the string ".". 53e2f68161SEd Schouten */ 54*fd85bff5SEd Schouten if (end == path) { 55*fd85bff5SEd Schouten path[0] = '.'; 56*fd85bff5SEd Schouten path[1] = '\0'; 57*fd85bff5SEd Schouten return (path); 58*fd85bff5SEd Schouten } 59*fd85bff5SEd Schouten 60*fd85bff5SEd Schouten /* 61*fd85bff5SEd Schouten * Remove trailing slashes from the resulting directory name. Ensure 62*fd85bff5SEd Schouten * that at least one character remains. 63*fd85bff5SEd Schouten */ 64*fd85bff5SEd Schouten while (end > path + 1 && *(end - 1) == '/') 65*fd85bff5SEd Schouten --end; 66*fd85bff5SEd Schouten 67*fd85bff5SEd Schouten /* Null terminate directory name and return it. */ 68*fd85bff5SEd Schouten *end = '\0'; 69e2f68161SEd Schouten return (path); 701250db81SDag-Erling Smørgrav } 71