1 /* path-concat.c -- concatenate two arbitrary pathnames
3 Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free
4 Software Foundation, Inc.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software Foundation,
18 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
20 /* Written by Jim Meyering. */
27 #include "path-concat.h"
30 # define mempcpy(D, S, N) ((void *) ((char *) memcpy (D, S, N) + (N)))
45 /* Concatenate two pathname components, DIR and BASE, in
46 newly-allocated storage and return the result. Return 0 if out of
47 memory. Add a slash between DIR and BASE in the result if neither
48 would contribute one. If each would contribute at least one, elide
49 one from the end of DIR. Otherwise, simply concatenate DIR and
50 BASE. In any case, if BASE_IN_RESULT is non-NULL, set
51 *BASE_IN_RESULT to point to the copy of BASE in the returned
54 DIR may be NULL, BASE must not be.
56 Return NULL if memory is exhausted. */
59 path_concat (const char *dir, const char *base, char **base_in_result)
68 p_concat = strdup (base);
70 *base_in_result = p_concat;
74 /* DIR is not empty. */
75 baselen = base_len (base);
76 dirlen = strlen (dir);
78 p_concat = malloc (dirlen + baselen + 2);
82 p = mempcpy (p_concat, dir, dirlen);
84 if (FILESYSTEM_PREFIX_LEN (dir) < dirlen)
86 if (ISSLASH (*(p - 1)) && ISSLASH (*base))
88 else if (!ISSLASH (*(p - 1)) && !ISSLASH (*base))
89 *p++ = DIRECTORY_SEPARATOR;
95 memcpy (p, base, baselen);
101 /* Same, but die when memory is exhausted. */
104 xpath_concat (const char *dir, const char *base, char **base_in_result)
106 char *res = path_concat (dir, base, base_in_result);