1 /* $NetBSD: subr.c,v 1.12 2011/06/28 16:19:16 manu Exp $ */ 2 3 /*- 4 * Copyright (c) 2010-2011 Emmanuel Dreyfus. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 15 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 16 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 17 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 18 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 19 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 20 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 21 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 22 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 23 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 24 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 25 * POSSIBILITY OF SUCH DAMAGE. 26 */ 27 28 #include <stdio.h> 29 #include <stdlib.h> 30 #include <err.h> 31 #include <errno.h> 32 #include <sysexits.h> 33 #include <syslog.h> 34 #include <puffs.h> 35 #include <paths.h> 36 #include <sys/extattr.h> 37 38 #include "perfuse_priv.h" 39 40 struct perfuse_ns_map { 41 const char *pnm_ns; 42 const size_t pnm_nslen; 43 const int pnm_native_ns; 44 }; 45 46 #define PERFUSE_NS_MAP(ns, native_ns) \ 47 { ns ".", sizeof(ns), native_ns } 48 49 static size_t node_path(puffs_cookie_t, char *, size_t); 50 51 struct puffs_node * 52 perfuse_new_pn(pu, name, parent) 53 struct puffs_usermount *pu; 54 const char *name; 55 struct puffs_node *parent; 56 { 57 struct puffs_node *pn; 58 struct perfuse_node_data *pnd; 59 60 if ((pnd = malloc(sizeof(*pnd))) == NULL) 61 DERR(EX_OSERR, "malloc failed"); 62 63 if ((pn = puffs_pn_new(pu, pnd)) == NULL) 64 DERR(EX_SOFTWARE, "puffs_pn_new failed"); 65 66 (void)memset(pnd, 0, sizeof(*pnd)); 67 pnd->pnd_rfh = FUSE_UNKNOWN_FH; 68 pnd->pnd_wfh = FUSE_UNKNOWN_FH; 69 pnd->pnd_ino = PERFUSE_UNKNOWN_INO; 70 pnd->pnd_nlookup = 1; 71 pnd->pnd_parent = parent; 72 pnd->pnd_pn = (puffs_cookie_t)pn; 73 (void)strlcpy(pnd->pnd_name, name, MAXPATHLEN); 74 TAILQ_INIT(&pnd->pnd_pcq); 75 TAILQ_INIT(&pnd->pnd_children); 76 77 if (parent != NULL) { 78 struct perfuse_node_data *parent_pnd; 79 80 parent_pnd = PERFUSE_NODE_DATA(parent); 81 TAILQ_INSERT_TAIL(&parent_pnd->pnd_children, pnd, pnd_next); 82 83 parent_pnd->pnd_childcount++; 84 } 85 86 return pn; 87 } 88 89 void 90 perfuse_destroy_pn(pn) 91 struct puffs_node *pn; 92 { 93 struct perfuse_node_data *pnd; 94 95 pnd = PERFUSE_NODE_DATA(pn); 96 97 if (pnd->pnd_parent != NULL) { 98 struct perfuse_node_data *parent_pnd; 99 100 parent_pnd = PERFUSE_NODE_DATA(pnd->pnd_parent); 101 TAILQ_REMOVE(&parent_pnd->pnd_children, pnd, pnd_next); 102 } 103 104 if ((pnd = puffs_pn_getpriv(pn)) != NULL) { 105 if (pnd->pnd_parent != NULL) 106 PERFUSE_NODE_DATA(pnd->pnd_parent)->pnd_childcount--; 107 108 if (pnd->pnd_dirent != NULL) 109 free(pnd->pnd_dirent); 110 111 if (pnd->pnd_all_fd != NULL) 112 free(pnd->pnd_all_fd); 113 #ifdef PERFUSE_DEBUG 114 if (pnd->pnd_flags & PND_OPEN) 115 DERRX(EX_SOFTWARE, "%s: file open", __func__); 116 117 if (!TAILQ_EMPTY(&pnd->pnd_pcq)) 118 DERRX(EX_SOFTWARE, "%s: non empty pnd_pcq", __func__); 119 #endif /* PERFUSE_DEBUG */ 120 121 free(pnd); 122 } 123 124 puffs_pn_put(pn); 125 126 return; 127 } 128 129 130 void 131 perfuse_new_fh(opc, fh, mode) 132 puffs_cookie_t opc; 133 uint64_t fh; 134 int mode; 135 { 136 struct perfuse_node_data *pnd; 137 138 pnd = PERFUSE_NODE_DATA(opc); 139 140 if (mode & FWRITE) { 141 if (pnd->pnd_flags & PND_WFH) 142 DERRX(EX_SOFTWARE, "%s: opc = %p, write fh already set", 143 __func__, (void *)opc); 144 pnd->pnd_wfh = fh; 145 pnd->pnd_flags |= PND_WFH; 146 } 147 148 if (mode & FREAD) { 149 if (pnd->pnd_flags & PND_RFH) 150 DERRX(EX_SOFTWARE, "%s: opc = %p, read fh already set", 151 __func__, (void *)opc); 152 pnd->pnd_rfh = fh; 153 pnd->pnd_flags |= PND_RFH; 154 } 155 156 return; 157 } 158 159 void 160 perfuse_destroy_fh(opc, fh) 161 puffs_cookie_t opc; 162 uint64_t fh; 163 { 164 struct perfuse_node_data *pnd; 165 166 pnd = PERFUSE_NODE_DATA(opc); 167 168 if (fh == pnd->pnd_rfh) { 169 if (!(pnd->pnd_flags & PND_RFH) && (fh != FUSE_UNKNOWN_FH)) 170 DERRX(EX_SOFTWARE, 171 "%s: opc = %p, unset rfh = %"PRIx64"", 172 __func__, (void *)opc, fh); 173 pnd->pnd_rfh = FUSE_UNKNOWN_FH; 174 pnd->pnd_flags &= ~PND_RFH; 175 } 176 177 if (fh == pnd->pnd_wfh) { 178 if (!(pnd->pnd_flags & PND_WFH) && (fh != FUSE_UNKNOWN_FH)) 179 DERRX(EX_SOFTWARE, 180 "%s: opc = %p, unset wfh = %"PRIx64"", 181 __func__, (void *)opc, fh); 182 pnd->pnd_wfh = FUSE_UNKNOWN_FH; 183 pnd->pnd_flags &= ~PND_WFH; 184 } 185 186 return; 187 } 188 189 uint64_t 190 perfuse_get_fh(opc, mode) 191 puffs_cookie_t opc; 192 int mode; 193 { 194 struct perfuse_node_data *pnd; 195 196 pnd = PERFUSE_NODE_DATA(opc); 197 198 if (mode & FWRITE) { 199 if (pnd->pnd_flags & PND_WFH) 200 return pnd->pnd_wfh; 201 } 202 203 if (mode & FREAD) { 204 if (pnd->pnd_flags & PND_RFH) 205 return pnd->pnd_rfh; 206 207 if (pnd->pnd_flags & PND_WFH) 208 return pnd->pnd_wfh; 209 210 } 211 212 return FUSE_UNKNOWN_FH; 213 } 214 215 static size_t 216 node_path(opc, buf, buflen) 217 puffs_cookie_t opc; 218 char *buf; 219 size_t buflen; 220 { 221 struct perfuse_node_data *pnd; 222 size_t written; 223 224 pnd = PERFUSE_NODE_DATA(opc); 225 if (pnd->pnd_parent == opc) 226 return 0; 227 228 written = node_path(pnd->pnd_parent, buf, buflen); 229 buf += written; 230 buflen -= written; 231 232 return written + snprintf(buf, buflen, "/%s", pnd->pnd_name); 233 } 234 235 char * 236 perfuse_node_path(opc) 237 puffs_cookie_t opc; 238 { 239 static char buf[MAXPATHLEN + 1]; 240 241 if (node_path(opc, buf, sizeof(buf)) == 0) 242 sprintf(buf, "/"); 243 244 return buf; 245 } 246 247 const char * 248 perfuse_native_ns(attrnamespace, attrname, fuse_attrname) 249 const int attrnamespace; 250 const char *attrname; 251 char *fuse_attrname; 252 { 253 const struct perfuse_ns_map *pnm; 254 const struct perfuse_ns_map perfuse_ns_map[] = { 255 PERFUSE_NS_MAP("trusted", EXTATTR_NAMESPACE_SYSTEM), 256 PERFUSE_NS_MAP("security", EXTATTR_NAMESPACE_SYSTEM), 257 PERFUSE_NS_MAP("system", EXTATTR_NAMESPACE_SYSTEM), 258 PERFUSE_NS_MAP("user", EXTATTR_NAMESPACE_USER), 259 { NULL, 0, EXTATTR_NAMESPACE_USER }, 260 }; 261 262 /* 263 * If attribute has a reserved Linux namespace (e.g.: trusted.foo) 264 * and that namespace matches the requested native namespace 265 * we have nothing to do. 266 * Otherwise we have either: 267 * (system|trusted|security).* with user namespace: prepend user. 268 * anything else with system napespace: prepend system. 269 */ 270 for (pnm = perfuse_ns_map; pnm->pnm_ns; pnm++) { 271 if (strncmp(attrname, pnm->pnm_ns, pnm->pnm_nslen) != 0) 272 continue; 273 274 if (attrnamespace == pnm->pnm_native_ns) 275 return attrname; 276 277 /* (system|trusted|security).* with user namespace */ 278 if (attrnamespace == EXTATTR_NAMESPACE_USER) { 279 (void)snprintf(fuse_attrname, LINUX_XATTR_NAME_MAX, 280 "user.%s", attrname); 281 return (const char *)fuse_attrname; 282 } 283 } 284 285 /* anything else with system napespace */ 286 if (attrnamespace == EXTATTR_NAMESPACE_SYSTEM) { 287 (void)snprintf(fuse_attrname, LINUX_XATTR_NAME_MAX, 288 "system.%s", attrname); 289 return (const char *)fuse_attrname; 290 } 291 292 return (const char *)attrname; 293 } 294