Mercurial > hg > octave-lyh > gnulib-hg
changeset 2899:358c244dcacf
(dir_name_r): New function, factored out of dir_name.
(dir_name): Use dir_name_r.
author | Jim Meyering <jim@meyering.net> |
---|---|
date | Sat, 21 Oct 2000 11:44:43 +0000 |
parents | 822ab60cb9c5 |
children | d8e5c3a40803 |
files | lib/dirname.c |
diffstat | 1 files changed, 20 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/lib/dirname.c +++ b/lib/dirname.c @@ -49,15 +49,11 @@ #define BACKSLASH_IS_PATH_SEPARATOR ISSLASH ('\\') -/* Return the leading directories part of PATH, - allocated with malloc. If out of memory, return 0. - Works properly even if there are trailing slashes - (by effectively ignoring them). */ - -char * -dir_name (const char *path) +/* Return the length of the directory part of PATH. + Set *RESULT to point to PATH or to `"."', as appropriate. */ +size_t +dir_name_r (const char *path, const char **result) { - char *newpath; char *slash; int length; /* Length of result, not including NUL. */ @@ -118,10 +114,24 @@ length = slash - path + 1; } - newpath = (char *) malloc (length + 1); + *result = path; + return length; +} + +/* Return the leading directories part of PATH, + allocated with malloc. If out of memory, return 0. + Works properly even if there are trailing slashes + (by effectively ignoring them). */ + +char * +dir_name (const char *path) +{ + const char *result; + size_t length = dir_name_r (path, &result); + char *newpath = (char *) malloc (length + 1); if (newpath == 0) return 0; - strncpy (newpath, path, length); + strncpy (newpath, result, length); newpath[length] = 0; return newpath; }