2 * Unix SMB/CIFS implementation.
3 * Samba utility functions
4 * Copyright (C) Andrew Tridgell 1992-1998
5 * Copyright (C) Jeremy Allison 2001-2007
6 * Copyright (C) Simo Sorce 2001
7 * Copyright (C) Jim McDonough <jmcd@us.ibm.com> 2003
8 * Copyright (C) James Peach 2006
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 3 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program. If not, see <http://www.gnu.org/licenses/>.
26 #include "lib/util/samba_util.h"
27 #include "lib/util_path.h"
30 #include "source3/param/param_proto.h"
33 * @brief Returns an absolute path to a file concatenating the provided
34 * @a rootpath and @a basename
36 * @param name Filename, relative to @a rootpath
38 * @retval Pointer to a string containing the full path.
41 static char *xx_path(TALLOC_CTX *mem_ctx,
47 fname = talloc_strdup(mem_ctx, rootpath);
51 trim_string(fname,"","/");
53 if (!directory_create_or_exist(fname, 0755)) {
57 return talloc_asprintf_append(fname, "/%s", name);
61 * @brief Returns an absolute path to a file in the Samba lock directory.
63 * @param name File to find, relative to LOCKDIR.
65 * @retval Pointer to a talloc'ed string containing the full path.
68 char *lock_path(TALLOC_CTX *mem_ctx, const char *name)
70 return xx_path(mem_ctx, name, lp_lock_directory());
74 * @brief Returns an absolute path to a file in the Samba state directory.
76 * @param name File to find, relative to STATEDIR.
78 * @retval Pointer to a talloc'ed string containing the full path.
81 char *state_path(const char *name)
83 return xx_path(talloc_tos(), name, lp_state_directory());
87 * @brief Returns an absolute path to a file in the Samba cache directory.
89 * @param name File to find, relative to CACHEDIR.
91 * @retval Pointer to a talloc'ed string containing the full path.
94 char *cache_path(const char *name)
96 return xx_path(talloc_tos(), name, lp_cache_directory());
100 * @brief Removes any invalid path components in an absolute POSIX path.
102 * @param ctx Talloc context to return string.
104 * @param abs_path Absolute path string to process.
106 * @retval Pointer to a talloc'ed string containing the absolute full path.
109 char *canonicalize_absolute_path(TALLOC_CTX *ctx, const char *abs_path)
113 const char *s = abs_path;
114 bool start_of_name_component = true;
116 /* Allocate for strlen + '\0' + possible leading '/' */
117 destname = (char *)talloc_size(ctx, strlen(abs_path) + 2);
118 if (destname == NULL) {
123 *d++ = '/'; /* Always start with root. */
127 /* Eat multiple '/' */
131 if ((d > destname + 1) && (*s != '\0')) {
134 start_of_name_component = true;
138 if (start_of_name_component) {
139 if ((s[0] == '.') && (s[1] == '.') &&
140 (s[2] == '/' || s[2] == '\0')) {
141 /* Uh oh - "/../" or "/..\0" ! */
143 /* Go past the .. leaving us on the / or '\0' */
146 /* If we just added a '/' - delete it */
147 if ((d > destname) && (*(d-1) == '/')) {
153 * Are we at the start ?
154 * Can't go back further if so.
157 *d++ = '/'; /* Can't delete root */
160 /* Go back one level... */
162 * Decrement d first as d points to
163 * the *next* char to write into.
165 for (d--; d > destname; d--) {
172 * Are we at the start ?
173 * Can't go back further if so.
176 *d++ = '/'; /* Can't delete root */
181 * We're still at the start of a name
182 * component, just the previous one.
185 } else if ((s[0] == '.') &&
186 ((s[1] == '\0') || s[1] == '/')) {
188 * Component of pathname can't be "." only.
204 /* Get the size of the next MB character. */
205 next_codepoint(s,&siz);
230 start_of_name_component = false;
234 /* And must not end in '/' */
235 if (d > destname + 1 && (*(d-1) == '/')) {