1 /*- 2 * Copyright (c) 1999-2006 Robert N. M. Watson 3 * All rights reserved. 4 * 5 * This software was developed by Robert Watson for the TrustedBSD Project. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 */ 28 /* 29 * Developed by the TrustedBSD Project. 30 * 31 * ACL system calls and other functions common across different ACL types. 32 * Type-specific routines go into subr_acl_<type>.c. 33 */ 34 35 #include <sys/cdefs.h> 36 __FBSDID("$FreeBSD$"); 37 38 #include <sys/param.h> 39 #include <sys/systm.h> 40 #include <sys/sysproto.h> 41 #include <sys/capability.h> 42 #include <sys/fcntl.h> 43 #include <sys/kernel.h> 44 #include <sys/malloc.h> 45 #include <sys/mount.h> 46 #include <sys/vnode.h> 47 #include <sys/lock.h> 48 #include <sys/mutex.h> 49 #include <sys/namei.h> 50 #include <sys/file.h> 51 #include <sys/filedesc.h> 52 #include <sys/proc.h> 53 #include <sys/sysent.h> 54 #include <sys/acl.h> 55 56 #include <security/mac/mac_framework.h> 57 58 CTASSERT(ACL_MAX_ENTRIES >= OLDACL_MAX_ENTRIES); 59 60 MALLOC_DEFINE(M_ACL, "acl", "Access Control Lists"); 61 62 static int vacl_set_acl(struct thread *td, struct vnode *vp, 63 acl_type_t type, struct acl *aclp); 64 static int vacl_get_acl(struct thread *td, struct vnode *vp, 65 acl_type_t type, struct acl *aclp); 66 static int vacl_aclcheck(struct thread *td, struct vnode *vp, 67 acl_type_t type, struct acl *aclp); 68 69 int 70 acl_copy_oldacl_into_acl(const struct oldacl *source, struct acl *dest) 71 { 72 int i; 73 74 if (source->acl_cnt < 0 || source->acl_cnt > OLDACL_MAX_ENTRIES) 75 return (EINVAL); 76 77 bzero(dest, sizeof(*dest)); 78 79 dest->acl_cnt = source->acl_cnt; 80 dest->acl_maxcnt = ACL_MAX_ENTRIES; 81 82 for (i = 0; i < dest->acl_cnt; i++) { 83 dest->acl_entry[i].ae_tag = source->acl_entry[i].ae_tag; 84 dest->acl_entry[i].ae_id = source->acl_entry[i].ae_id; 85 dest->acl_entry[i].ae_perm = source->acl_entry[i].ae_perm; 86 } 87 88 return (0); 89 } 90 91 int 92 acl_copy_acl_into_oldacl(const struct acl *source, struct oldacl *dest) 93 { 94 int i; 95 96 if (source->acl_cnt > OLDACL_MAX_ENTRIES) 97 return (EINVAL); 98 99 bzero(dest, sizeof(*dest)); 100 101 dest->acl_cnt = source->acl_cnt; 102 103 for (i = 0; i < dest->acl_cnt; i++) { 104 dest->acl_entry[i].ae_tag = source->acl_entry[i].ae_tag; 105 dest->acl_entry[i].ae_id = source->acl_entry[i].ae_id; 106 dest->acl_entry[i].ae_perm = source->acl_entry[i].ae_perm; 107 } 108 109 return (0); 110 } 111 112 /* 113 * At one time, "struct ACL" was extended in order to add support for NFSv4 114 * ACLs. Instead of creating compatibility versions of all the ACL-related 115 * syscalls, they were left intact. It's possible to find out what the code 116 * calling these syscalls (libc) expects basing on "type" argument - if it's 117 * either ACL_TYPE_ACCESS_OLD or ACL_TYPE_DEFAULT_OLD (which previously were 118 * known as ACL_TYPE_ACCESS and ACL_TYPE_DEFAULT), then it's the "struct 119 * oldacl". If it's something else, then it's the new "struct acl". In the 120 * latter case, the routines below just copyin/copyout the contents. In the 121 * former case, they copyin the "struct oldacl" and convert it to the new 122 * format. 123 */ 124 static int 125 acl_copyin(void *user_acl, struct acl *kernel_acl, acl_type_t type) 126 { 127 int error; 128 struct oldacl old; 129 130 switch (type) { 131 case ACL_TYPE_ACCESS_OLD: 132 case ACL_TYPE_DEFAULT_OLD: 133 error = copyin(user_acl, &old, sizeof(old)); 134 if (error != 0) 135 break; 136 acl_copy_oldacl_into_acl(&old, kernel_acl); 137 break; 138 139 default: 140 error = copyin(user_acl, kernel_acl, sizeof(*kernel_acl)); 141 if (kernel_acl->acl_maxcnt != ACL_MAX_ENTRIES) 142 return (EINVAL); 143 } 144 145 return (error); 146 } 147 148 static int 149 acl_copyout(struct acl *kernel_acl, void *user_acl, acl_type_t type) 150 { 151 int error; 152 struct oldacl old; 153 154 switch (type) { 155 case ACL_TYPE_ACCESS_OLD: 156 case ACL_TYPE_DEFAULT_OLD: 157 error = acl_copy_acl_into_oldacl(kernel_acl, &old); 158 if (error != 0) 159 break; 160 161 error = copyout(&old, user_acl, sizeof(old)); 162 break; 163 164 default: 165 if (fuword32((char *)user_acl + 166 offsetof(struct acl, acl_maxcnt)) != ACL_MAX_ENTRIES) 167 return (EINVAL); 168 169 error = copyout(kernel_acl, user_acl, sizeof(*kernel_acl)); 170 } 171 172 return (error); 173 } 174 175 /* 176 * Convert "old" type - ACL_TYPE_{ACCESS,DEFAULT}_OLD - into its "new" 177 * counterpart. It's required for old (pre-NFSv4 ACLs) libc to work 178 * with new kernel. Fixing 'type' for old binaries with new libc 179 * is being done in lib/libc/posix1e/acl_support.c:_acl_type_unold(). 180 */ 181 static int 182 acl_type_unold(int type) 183 { 184 switch (type) { 185 case ACL_TYPE_ACCESS_OLD: 186 return (ACL_TYPE_ACCESS); 187 188 case ACL_TYPE_DEFAULT_OLD: 189 return (ACL_TYPE_DEFAULT); 190 191 default: 192 return (type); 193 } 194 } 195 196 /* 197 * These calls wrap the real vnode operations, and are called by the syscall 198 * code once the syscall has converted the path or file descriptor to a vnode 199 * (unlocked). The aclp pointer is assumed still to point to userland, so 200 * this should not be consumed within the kernel except by syscall code. 201 * Other code should directly invoke VOP_{SET,GET}ACL. 202 */ 203 204 /* 205 * Given a vnode, set its ACL. 206 */ 207 static int 208 vacl_set_acl(struct thread *td, struct vnode *vp, acl_type_t type, 209 struct acl *aclp) 210 { 211 struct acl *inkernelacl; 212 struct mount *mp; 213 int error; 214 215 inkernelacl = acl_alloc(M_WAITOK); 216 error = acl_copyin(aclp, inkernelacl, type); 217 if (error != 0) 218 goto out; 219 error = vn_start_write(vp, &mp, V_WAIT | PCATCH); 220 if (error != 0) 221 goto out; 222 vn_lock(vp, LK_EXCLUSIVE | LK_RETRY); 223 #ifdef MAC 224 error = mac_vnode_check_setacl(td->td_ucred, vp, type, inkernelacl); 225 if (error != 0) 226 goto out_unlock; 227 #endif 228 error = VOP_SETACL(vp, acl_type_unold(type), inkernelacl, 229 td->td_ucred, td); 230 #ifdef MAC 231 out_unlock: 232 #endif 233 VOP_UNLOCK(vp, 0); 234 vn_finished_write(mp); 235 out: 236 acl_free(inkernelacl); 237 return (error); 238 } 239 240 /* 241 * Given a vnode, get its ACL. 242 */ 243 static int 244 vacl_get_acl(struct thread *td, struct vnode *vp, acl_type_t type, 245 struct acl *aclp) 246 { 247 struct acl *inkernelacl; 248 int error; 249 250 inkernelacl = acl_alloc(M_WAITOK); 251 vn_lock(vp, LK_EXCLUSIVE | LK_RETRY); 252 #ifdef MAC 253 error = mac_vnode_check_getacl(td->td_ucred, vp, type); 254 if (error != 0) 255 goto out; 256 #endif 257 error = VOP_GETACL(vp, acl_type_unold(type), inkernelacl, 258 td->td_ucred, td); 259 260 #ifdef MAC 261 out: 262 #endif 263 VOP_UNLOCK(vp, 0); 264 if (error == 0) 265 error = acl_copyout(inkernelacl, aclp, type); 266 acl_free(inkernelacl); 267 return (error); 268 } 269 270 /* 271 * Given a vnode, delete its ACL. 272 */ 273 static int 274 vacl_delete(struct thread *td, struct vnode *vp, acl_type_t type) 275 { 276 struct mount *mp; 277 int error; 278 279 error = vn_start_write(vp, &mp, V_WAIT | PCATCH); 280 if (error != 0) 281 return (error); 282 vn_lock(vp, LK_EXCLUSIVE | LK_RETRY); 283 #ifdef MAC 284 error = mac_vnode_check_deleteacl(td->td_ucred, vp, type); 285 if (error != 0) 286 goto out; 287 #endif 288 error = VOP_SETACL(vp, acl_type_unold(type), 0, td->td_ucred, td); 289 #ifdef MAC 290 out: 291 #endif 292 VOP_UNLOCK(vp, 0); 293 vn_finished_write(mp); 294 return (error); 295 } 296 297 /* 298 * Given a vnode, check whether an ACL is appropriate for it 299 */ 300 static int 301 vacl_aclcheck(struct thread *td, struct vnode *vp, acl_type_t type, 302 struct acl *aclp) 303 { 304 struct acl *inkernelacl; 305 int error; 306 307 inkernelacl = acl_alloc(M_WAITOK); 308 error = acl_copyin(aclp, inkernelacl, type); 309 if (error != 0) 310 goto out; 311 error = VOP_ACLCHECK(vp, acl_type_unold(type), inkernelacl, 312 td->td_ucred, td); 313 out: 314 acl_free(inkernelacl); 315 return (error); 316 } 317 318 /* 319 * syscalls -- convert the path/fd to a vnode, and call vacl_whatever. Don't 320 * need to lock, as the vacl_ code will get/release any locks required. 321 */ 322 323 /* 324 * Given a file path, get an ACL for it 325 */ 326 int 327 sys___acl_get_file(struct thread *td, struct __acl_get_file_args *uap) 328 { 329 struct nameidata nd; 330 int error; 331 332 NDINIT(&nd, LOOKUP, FOLLOW, UIO_USERSPACE, uap->path, td); 333 error = namei(&nd); 334 if (error == 0) { 335 error = vacl_get_acl(td, nd.ni_vp, uap->type, uap->aclp); 336 NDFREE(&nd, 0); 337 } 338 return (error); 339 } 340 341 /* 342 * Given a file path, get an ACL for it; don't follow links. 343 */ 344 int 345 sys___acl_get_link(struct thread *td, struct __acl_get_link_args *uap) 346 { 347 struct nameidata nd; 348 int error; 349 350 NDINIT(&nd, LOOKUP, NOFOLLOW, UIO_USERSPACE, uap->path, td); 351 error = namei(&nd); 352 if (error == 0) { 353 error = vacl_get_acl(td, nd.ni_vp, uap->type, uap->aclp); 354 NDFREE(&nd, 0); 355 } 356 return (error); 357 } 358 359 /* 360 * Given a file path, set an ACL for it. 361 */ 362 int 363 sys___acl_set_file(struct thread *td, struct __acl_set_file_args *uap) 364 { 365 struct nameidata nd; 366 int error; 367 368 NDINIT(&nd, LOOKUP, FOLLOW, UIO_USERSPACE, uap->path, td); 369 error = namei(&nd); 370 if (error == 0) { 371 error = vacl_set_acl(td, nd.ni_vp, uap->type, uap->aclp); 372 NDFREE(&nd, 0); 373 } 374 return (error); 375 } 376 377 /* 378 * Given a file path, set an ACL for it; don't follow links. 379 */ 380 int 381 sys___acl_set_link(struct thread *td, struct __acl_set_link_args *uap) 382 { 383 struct nameidata nd; 384 int error; 385 386 NDINIT(&nd, LOOKUP, NOFOLLOW, UIO_USERSPACE, uap->path, td); 387 error = namei(&nd); 388 if (error == 0) { 389 error = vacl_set_acl(td, nd.ni_vp, uap->type, uap->aclp); 390 NDFREE(&nd, 0); 391 } 392 return (error); 393 } 394 395 /* 396 * Given a file descriptor, get an ACL for it. 397 */ 398 int 399 sys___acl_get_fd(struct thread *td, struct __acl_get_fd_args *uap) 400 { 401 struct file *fp; 402 int error; 403 404 error = getvnode(td->td_proc->p_fd, uap->filedes, CAP_ACL_GET, &fp); 405 if (error == 0) { 406 error = vacl_get_acl(td, fp->f_vnode, uap->type, uap->aclp); 407 fdrop(fp, td); 408 } 409 return (error); 410 } 411 412 /* 413 * Given a file descriptor, set an ACL for it. 414 */ 415 int 416 sys___acl_set_fd(struct thread *td, struct __acl_set_fd_args *uap) 417 { 418 struct file *fp; 419 int error; 420 421 error = getvnode(td->td_proc->p_fd, uap->filedes, CAP_ACL_SET, &fp); 422 if (error == 0) { 423 error = vacl_set_acl(td, fp->f_vnode, uap->type, uap->aclp); 424 fdrop(fp, td); 425 } 426 return (error); 427 } 428 429 /* 430 * Given a file path, delete an ACL from it. 431 */ 432 int 433 sys___acl_delete_file(struct thread *td, struct __acl_delete_file_args *uap) 434 { 435 struct nameidata nd; 436 int error; 437 438 NDINIT(&nd, LOOKUP, FOLLOW, UIO_USERSPACE, uap->path, td); 439 error = namei(&nd); 440 if (error == 0) { 441 error = vacl_delete(td, nd.ni_vp, uap->type); 442 NDFREE(&nd, 0); 443 } 444 return (error); 445 } 446 447 /* 448 * Given a file path, delete an ACL from it; don't follow links. 449 */ 450 int 451 sys___acl_delete_link(struct thread *td, struct __acl_delete_link_args *uap) 452 { 453 struct nameidata nd; 454 int error; 455 456 NDINIT(&nd, LOOKUP, NOFOLLOW, UIO_USERSPACE, uap->path, td); 457 error = namei(&nd); 458 if (error == 0) { 459 error = vacl_delete(td, nd.ni_vp, uap->type); 460 NDFREE(&nd, 0); 461 } 462 return (error); 463 } 464 465 /* 466 * Given a file path, delete an ACL from it. 467 */ 468 int 469 sys___acl_delete_fd(struct thread *td, struct __acl_delete_fd_args *uap) 470 { 471 struct file *fp; 472 int error; 473 474 error = getvnode(td->td_proc->p_fd, uap->filedes, CAP_ACL_DELETE, 475 &fp); 476 if (error == 0) { 477 error = vacl_delete(td, fp->f_vnode, uap->type); 478 fdrop(fp, td); 479 } 480 return (error); 481 } 482 483 /* 484 * Given a file path, check an ACL for it. 485 */ 486 int 487 sys___acl_aclcheck_file(struct thread *td, struct __acl_aclcheck_file_args *uap) 488 { 489 struct nameidata nd; 490 int error; 491 492 NDINIT(&nd, LOOKUP, FOLLOW, UIO_USERSPACE, uap->path, td); 493 error = namei(&nd); 494 if (error == 0) { 495 error = vacl_aclcheck(td, nd.ni_vp, uap->type, uap->aclp); 496 NDFREE(&nd, 0); 497 } 498 return (error); 499 } 500 501 /* 502 * Given a file path, check an ACL for it; don't follow links. 503 */ 504 int 505 sys___acl_aclcheck_link(struct thread *td, struct __acl_aclcheck_link_args *uap) 506 { 507 struct nameidata nd; 508 int error; 509 510 NDINIT(&nd, LOOKUP, NOFOLLOW, UIO_USERSPACE, uap->path, td); 511 error = namei(&nd); 512 if (error == 0) { 513 error = vacl_aclcheck(td, nd.ni_vp, uap->type, uap->aclp); 514 NDFREE(&nd, 0); 515 } 516 return (error); 517 } 518 519 /* 520 * Given a file descriptor, check an ACL for it. 521 */ 522 int 523 sys___acl_aclcheck_fd(struct thread *td, struct __acl_aclcheck_fd_args *uap) 524 { 525 struct file *fp; 526 int error; 527 528 error = getvnode(td->td_proc->p_fd, uap->filedes, CAP_ACL_CHECK, 529 &fp); 530 if (error == 0) { 531 error = vacl_aclcheck(td, fp->f_vnode, uap->type, uap->aclp); 532 fdrop(fp, td); 533 } 534 return (error); 535 } 536 537 struct acl * 538 acl_alloc(int flags) 539 { 540 struct acl *aclp; 541 542 aclp = malloc(sizeof(*aclp), M_ACL, flags); 543 aclp->acl_maxcnt = ACL_MAX_ENTRIES; 544 545 return (aclp); 546 } 547 548 void 549 acl_free(struct acl *aclp) 550 { 551 552 free(aclp, M_ACL); 553 } 554