1 /* -*- mode: c; c-basic-offset: 8; -*- 2 * vim: noexpandtab sw=8 ts=8 sts=0: 3 * 4 * acl.c 5 * 6 * Copyright (C) 2004, 2008 Oracle. All rights reserved. 7 * 8 * CREDITS: 9 * Lots of code in this file is copy from linux/fs/ext3/acl.c. 10 * Copyright (C) 2001-2003 Andreas Gruenbacher, <agruen@suse.de> 11 * 12 * This program is free software; you can redistribute it and/or 13 * modify it under the terms of the GNU General Public 14 * License version 2 as published by the Free Software Foundation. 15 * 16 * This program is distributed in the hope that it will be useful, 17 * but WITHOUT ANY WARRANTY; without even the implied warranty of 18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 19 * General Public License for more details. 20 */ 21 22 #include <linux/init.h> 23 #include <linux/module.h> 24 #include <linux/slab.h> 25 #include <linux/string.h> 26 27 #include <cluster/masklog.h> 28 29 #include "ocfs2.h" 30 #include "alloc.h" 31 #include "dlmglue.h" 32 #include "file.h" 33 #include "inode.h" 34 #include "journal.h" 35 #include "ocfs2_fs.h" 36 37 #include "xattr.h" 38 #include "acl.h" 39 40 /* 41 * Convert from xattr value to acl struct. 42 */ 43 static struct posix_acl *ocfs2_acl_from_xattr(const void *value, size_t size) 44 { 45 int n, count; 46 struct posix_acl *acl; 47 48 if (!value) 49 return NULL; 50 if (size < sizeof(struct posix_acl_entry)) 51 return ERR_PTR(-EINVAL); 52 53 count = size / sizeof(struct posix_acl_entry); 54 55 acl = posix_acl_alloc(count, GFP_NOFS); 56 if (!acl) 57 return ERR_PTR(-ENOMEM); 58 for (n = 0; n < count; n++) { 59 struct ocfs2_acl_entry *entry = 60 (struct ocfs2_acl_entry *)value; 61 62 acl->a_entries[n].e_tag = le16_to_cpu(entry->e_tag); 63 acl->a_entries[n].e_perm = le16_to_cpu(entry->e_perm); 64 switch(acl->a_entries[n].e_tag) { 65 case ACL_USER: 66 acl->a_entries[n].e_uid = 67 make_kuid(&init_user_ns, 68 le32_to_cpu(entry->e_id)); 69 break; 70 case ACL_GROUP: 71 acl->a_entries[n].e_gid = 72 make_kgid(&init_user_ns, 73 le32_to_cpu(entry->e_id)); 74 break; 75 default: 76 break; 77 } 78 value += sizeof(struct posix_acl_entry); 79 80 } 81 return acl; 82 } 83 84 /* 85 * Convert acl struct to xattr value. 86 */ 87 static void *ocfs2_acl_to_xattr(const struct posix_acl *acl, size_t *size) 88 { 89 struct ocfs2_acl_entry *entry = NULL; 90 char *ocfs2_acl; 91 size_t n; 92 93 *size = acl->a_count * sizeof(struct posix_acl_entry); 94 95 ocfs2_acl = kmalloc(*size, GFP_NOFS); 96 if (!ocfs2_acl) 97 return ERR_PTR(-ENOMEM); 98 99 entry = (struct ocfs2_acl_entry *)ocfs2_acl; 100 for (n = 0; n < acl->a_count; n++, entry++) { 101 entry->e_tag = cpu_to_le16(acl->a_entries[n].e_tag); 102 entry->e_perm = cpu_to_le16(acl->a_entries[n].e_perm); 103 switch(acl->a_entries[n].e_tag) { 104 case ACL_USER: 105 entry->e_id = cpu_to_le32( 106 from_kuid(&init_user_ns, 107 acl->a_entries[n].e_uid)); 108 break; 109 case ACL_GROUP: 110 entry->e_id = cpu_to_le32( 111 from_kgid(&init_user_ns, 112 acl->a_entries[n].e_gid)); 113 break; 114 default: 115 entry->e_id = cpu_to_le32(ACL_UNDEFINED_ID); 116 break; 117 } 118 } 119 return ocfs2_acl; 120 } 121 122 static struct posix_acl *ocfs2_get_acl_nolock(struct inode *inode, 123 int type, 124 struct buffer_head *di_bh) 125 { 126 int name_index; 127 char *value = NULL; 128 struct posix_acl *acl; 129 int retval; 130 131 switch (type) { 132 case ACL_TYPE_ACCESS: 133 name_index = OCFS2_XATTR_INDEX_POSIX_ACL_ACCESS; 134 break; 135 case ACL_TYPE_DEFAULT: 136 name_index = OCFS2_XATTR_INDEX_POSIX_ACL_DEFAULT; 137 break; 138 default: 139 return ERR_PTR(-EINVAL); 140 } 141 142 retval = ocfs2_xattr_get_nolock(inode, di_bh, name_index, "", NULL, 0); 143 if (retval > 0) { 144 value = kmalloc(retval, GFP_NOFS); 145 if (!value) 146 return ERR_PTR(-ENOMEM); 147 retval = ocfs2_xattr_get_nolock(inode, di_bh, name_index, 148 "", value, retval); 149 } 150 151 if (retval > 0) 152 acl = ocfs2_acl_from_xattr(value, retval); 153 else if (retval == -ENODATA || retval == 0) 154 acl = NULL; 155 else 156 acl = ERR_PTR(retval); 157 158 kfree(value); 159 160 return acl; 161 } 162 163 /* 164 * Helper function to set i_mode in memory and disk. Some call paths 165 * will not have di_bh or a journal handle to pass, in which case it 166 * will create it's own. 167 */ 168 static int ocfs2_acl_set_mode(struct inode *inode, struct buffer_head *di_bh, 169 handle_t *handle, umode_t new_mode) 170 { 171 int ret, commit_handle = 0; 172 struct ocfs2_dinode *di; 173 174 if (di_bh == NULL) { 175 ret = ocfs2_read_inode_block(inode, &di_bh); 176 if (ret) { 177 mlog_errno(ret); 178 goto out; 179 } 180 } else 181 get_bh(di_bh); 182 183 if (handle == NULL) { 184 handle = ocfs2_start_trans(OCFS2_SB(inode->i_sb), 185 OCFS2_INODE_UPDATE_CREDITS); 186 if (IS_ERR(handle)) { 187 ret = PTR_ERR(handle); 188 mlog_errno(ret); 189 goto out_brelse; 190 } 191 192 commit_handle = 1; 193 } 194 195 di = (struct ocfs2_dinode *)di_bh->b_data; 196 ret = ocfs2_journal_access_di(handle, INODE_CACHE(inode), di_bh, 197 OCFS2_JOURNAL_ACCESS_WRITE); 198 if (ret) { 199 mlog_errno(ret); 200 goto out_commit; 201 } 202 203 inode->i_mode = new_mode; 204 inode->i_ctime = current_time(inode); 205 di->i_mode = cpu_to_le16(inode->i_mode); 206 di->i_ctime = cpu_to_le64(inode->i_ctime.tv_sec); 207 di->i_ctime_nsec = cpu_to_le32(inode->i_ctime.tv_nsec); 208 ocfs2_update_inode_fsync_trans(handle, inode, 0); 209 210 ocfs2_journal_dirty(handle, di_bh); 211 212 out_commit: 213 if (commit_handle) 214 ocfs2_commit_trans(OCFS2_SB(inode->i_sb), handle); 215 out_brelse: 216 brelse(di_bh); 217 out: 218 return ret; 219 } 220 221 /* 222 * Set the access or default ACL of an inode. 223 */ 224 int ocfs2_set_acl(handle_t *handle, 225 struct inode *inode, 226 struct buffer_head *di_bh, 227 int type, 228 struct posix_acl *acl, 229 struct ocfs2_alloc_context *meta_ac, 230 struct ocfs2_alloc_context *data_ac) 231 { 232 int name_index; 233 void *value = NULL; 234 size_t size = 0; 235 int ret; 236 237 if (S_ISLNK(inode->i_mode)) 238 return -EOPNOTSUPP; 239 240 switch (type) { 241 case ACL_TYPE_ACCESS: 242 name_index = OCFS2_XATTR_INDEX_POSIX_ACL_ACCESS; 243 if (acl) { 244 umode_t mode; 245 246 ret = posix_acl_update_mode(inode, &mode, &acl); 247 if (ret) 248 return ret; 249 250 ret = ocfs2_acl_set_mode(inode, di_bh, 251 handle, mode); 252 if (ret) 253 return ret; 254 } 255 break; 256 case ACL_TYPE_DEFAULT: 257 name_index = OCFS2_XATTR_INDEX_POSIX_ACL_DEFAULT; 258 if (!S_ISDIR(inode->i_mode)) 259 return acl ? -EACCES : 0; 260 break; 261 default: 262 return -EINVAL; 263 } 264 265 if (acl) { 266 value = ocfs2_acl_to_xattr(acl, &size); 267 if (IS_ERR(value)) 268 return (int)PTR_ERR(value); 269 } 270 271 if (handle) 272 ret = ocfs2_xattr_set_handle(handle, inode, di_bh, name_index, 273 "", value, size, 0, 274 meta_ac, data_ac); 275 else 276 ret = ocfs2_xattr_set(inode, name_index, "", value, size, 0); 277 278 kfree(value); 279 280 return ret; 281 } 282 283 int ocfs2_iop_set_acl(struct inode *inode, struct posix_acl *acl, int type) 284 { 285 struct buffer_head *bh = NULL; 286 int status = 0; 287 288 status = ocfs2_inode_lock(inode, &bh, 1); 289 if (status < 0) { 290 if (status != -ENOENT) 291 mlog_errno(status); 292 return status; 293 } 294 status = ocfs2_set_acl(NULL, inode, bh, type, acl, NULL, NULL); 295 ocfs2_inode_unlock(inode, 1); 296 brelse(bh); 297 return status; 298 } 299 300 struct posix_acl *ocfs2_iop_get_acl(struct inode *inode, int type) 301 { 302 struct ocfs2_super *osb; 303 struct buffer_head *di_bh = NULL; 304 struct posix_acl *acl; 305 int ret; 306 307 osb = OCFS2_SB(inode->i_sb); 308 if (!(osb->s_mount_opt & OCFS2_MOUNT_POSIX_ACL)) 309 return NULL; 310 ret = ocfs2_inode_lock(inode, &di_bh, 0); 311 if (ret < 0) { 312 if (ret != -ENOENT) 313 mlog_errno(ret); 314 return ERR_PTR(ret); 315 } 316 317 acl = ocfs2_get_acl_nolock(inode, type, di_bh); 318 319 ocfs2_inode_unlock(inode, 0); 320 brelse(di_bh); 321 return acl; 322 } 323 324 int ocfs2_acl_chmod(struct inode *inode, struct buffer_head *bh) 325 { 326 struct ocfs2_super *osb = OCFS2_SB(inode->i_sb); 327 struct posix_acl *acl; 328 int ret; 329 330 if (S_ISLNK(inode->i_mode)) 331 return -EOPNOTSUPP; 332 333 if (!(osb->s_mount_opt & OCFS2_MOUNT_POSIX_ACL)) 334 return 0; 335 336 acl = ocfs2_get_acl_nolock(inode, ACL_TYPE_ACCESS, bh); 337 if (IS_ERR(acl) || !acl) 338 return PTR_ERR(acl); 339 ret = __posix_acl_chmod(&acl, GFP_KERNEL, inode->i_mode); 340 if (ret) 341 return ret; 342 ret = ocfs2_set_acl(NULL, inode, NULL, ACL_TYPE_ACCESS, 343 acl, NULL, NULL); 344 posix_acl_release(acl); 345 return ret; 346 } 347 348 /* 349 * Initialize the ACLs of a new inode. If parent directory has default ACL, 350 * then clone to new inode. Called from ocfs2_mknod. 351 */ 352 int ocfs2_init_acl(handle_t *handle, 353 struct inode *inode, 354 struct inode *dir, 355 struct buffer_head *di_bh, 356 struct buffer_head *dir_bh, 357 struct ocfs2_alloc_context *meta_ac, 358 struct ocfs2_alloc_context *data_ac) 359 { 360 struct ocfs2_super *osb = OCFS2_SB(inode->i_sb); 361 struct posix_acl *acl = NULL; 362 int ret = 0, ret2; 363 umode_t mode; 364 365 if (!S_ISLNK(inode->i_mode)) { 366 if (osb->s_mount_opt & OCFS2_MOUNT_POSIX_ACL) { 367 acl = ocfs2_get_acl_nolock(dir, ACL_TYPE_DEFAULT, 368 dir_bh); 369 if (IS_ERR(acl)) 370 return PTR_ERR(acl); 371 } 372 if (!acl) { 373 mode = inode->i_mode & ~current_umask(); 374 ret = ocfs2_acl_set_mode(inode, di_bh, handle, mode); 375 if (ret) { 376 mlog_errno(ret); 377 goto cleanup; 378 } 379 } 380 } 381 if ((osb->s_mount_opt & OCFS2_MOUNT_POSIX_ACL) && acl) { 382 if (S_ISDIR(inode->i_mode)) { 383 ret = ocfs2_set_acl(handle, inode, di_bh, 384 ACL_TYPE_DEFAULT, acl, 385 meta_ac, data_ac); 386 if (ret) 387 goto cleanup; 388 } 389 mode = inode->i_mode; 390 ret = __posix_acl_create(&acl, GFP_NOFS, &mode); 391 if (ret < 0) 392 return ret; 393 394 ret2 = ocfs2_acl_set_mode(inode, di_bh, handle, mode); 395 if (ret2) { 396 mlog_errno(ret2); 397 ret = ret2; 398 goto cleanup; 399 } 400 if (ret > 0) { 401 ret = ocfs2_set_acl(handle, inode, 402 di_bh, ACL_TYPE_ACCESS, 403 acl, meta_ac, data_ac); 404 } 405 } 406 cleanup: 407 posix_acl_release(acl); 408 return ret; 409 } 410