1 // SPDX-License-Identifier: GPL-2.0
2 /*
3 * fs/f2fs/acl.c
4 *
5 * Copyright (c) 2012 Samsung Electronics Co., Ltd.
6 * http://www.samsung.com/
7 *
8 * Portions of this code from linux/fs/ext2/acl.c
9 *
10 * Copyright (C) 2001-2003 Andreas Gruenbacher, <agruen@suse.de>
11 */
12 #include <linux/f2fs_fs.h>
13 #include "f2fs.h"
14 #include "xattr.h"
15 #include "acl.h"
16
f2fs_acl_size(int count)17 static inline size_t f2fs_acl_size(int count)
18 {
19 if (count <= 4) {
20 return sizeof(struct f2fs_acl_header) +
21 count * sizeof(struct f2fs_acl_entry_short);
22 } else {
23 return sizeof(struct f2fs_acl_header) +
24 4 * sizeof(struct f2fs_acl_entry_short) +
25 (count - 4) * sizeof(struct f2fs_acl_entry);
26 }
27 }
28
f2fs_acl_count(size_t size)29 static inline int f2fs_acl_count(size_t size)
30 {
31 ssize_t s;
32
33 size -= sizeof(struct f2fs_acl_header);
34 s = size - 4 * sizeof(struct f2fs_acl_entry_short);
35 if (s < 0) {
36 if (size % sizeof(struct f2fs_acl_entry_short))
37 return -1;
38 return size / sizeof(struct f2fs_acl_entry_short);
39 } else {
40 if (s % sizeof(struct f2fs_acl_entry))
41 return -1;
42 return s / sizeof(struct f2fs_acl_entry) + 4;
43 }
44 }
45
f2fs_acl_from_disk(const char * value,size_t size)46 static struct posix_acl *f2fs_acl_from_disk(const char *value, size_t size)
47 {
48 int i, count;
49 struct posix_acl *acl;
50 struct f2fs_acl_header *hdr = (struct f2fs_acl_header *)value;
51 struct f2fs_acl_entry *entry = (struct f2fs_acl_entry *)(hdr + 1);
52 const char *end = value + size;
53
54 if (size < sizeof(struct f2fs_acl_header))
55 return ERR_PTR(-EINVAL);
56
57 if (hdr->a_version != cpu_to_le32(F2FS_ACL_VERSION))
58 return ERR_PTR(-EINVAL);
59
60 count = f2fs_acl_count(size);
61 if (count < 0)
62 return ERR_PTR(-EINVAL);
63 if (count == 0)
64 return NULL;
65
66 acl = posix_acl_alloc(count, GFP_NOFS);
67 if (!acl)
68 return ERR_PTR(-ENOMEM);
69
70 for (i = 0; i < count; i++) {
71
72 if ((char *)entry > end)
73 goto fail;
74
75 acl->a_entries[i].e_tag = le16_to_cpu(entry->e_tag);
76 acl->a_entries[i].e_perm = le16_to_cpu(entry->e_perm);
77
78 switch (acl->a_entries[i].e_tag) {
79 case ACL_USER_OBJ:
80 case ACL_GROUP_OBJ:
81 case ACL_MASK:
82 case ACL_OTHER:
83 entry = (struct f2fs_acl_entry *)((char *)entry +
84 sizeof(struct f2fs_acl_entry_short));
85 break;
86
87 case ACL_USER:
88 acl->a_entries[i].e_uid =
89 make_kuid(&init_user_ns,
90 le32_to_cpu(entry->e_id));
91 entry = (struct f2fs_acl_entry *)((char *)entry +
92 sizeof(struct f2fs_acl_entry));
93 break;
94 case ACL_GROUP:
95 acl->a_entries[i].e_gid =
96 make_kgid(&init_user_ns,
97 le32_to_cpu(entry->e_id));
98 entry = (struct f2fs_acl_entry *)((char *)entry +
99 sizeof(struct f2fs_acl_entry));
100 break;
101 default:
102 goto fail;
103 }
104 }
105 if ((char *)entry != end)
106 goto fail;
107 return acl;
108 fail:
109 posix_acl_release(acl);
110 return ERR_PTR(-EINVAL);
111 }
112
f2fs_acl_to_disk(struct f2fs_sb_info * sbi,const struct posix_acl * acl,size_t * size)113 static void *f2fs_acl_to_disk(struct f2fs_sb_info *sbi,
114 const struct posix_acl *acl, size_t *size)
115 {
116 struct f2fs_acl_header *f2fs_acl;
117 struct f2fs_acl_entry *entry;
118 int i;
119
120 f2fs_acl = f2fs_kmalloc(sbi, sizeof(struct f2fs_acl_header) +
121 acl->a_count * sizeof(struct f2fs_acl_entry),
122 GFP_NOFS);
123 if (!f2fs_acl)
124 return ERR_PTR(-ENOMEM);
125
126 f2fs_acl->a_version = cpu_to_le32(F2FS_ACL_VERSION);
127 entry = (struct f2fs_acl_entry *)(f2fs_acl + 1);
128
129 for (i = 0; i < acl->a_count; i++) {
130
131 entry->e_tag = cpu_to_le16(acl->a_entries[i].e_tag);
132 entry->e_perm = cpu_to_le16(acl->a_entries[i].e_perm);
133
134 switch (acl->a_entries[i].e_tag) {
135 case ACL_USER:
136 entry->e_id = cpu_to_le32(
137 from_kuid(&init_user_ns,
138 acl->a_entries[i].e_uid));
139 entry = (struct f2fs_acl_entry *)((char *)entry +
140 sizeof(struct f2fs_acl_entry));
141 break;
142 case ACL_GROUP:
143 entry->e_id = cpu_to_le32(
144 from_kgid(&init_user_ns,
145 acl->a_entries[i].e_gid));
146 entry = (struct f2fs_acl_entry *)((char *)entry +
147 sizeof(struct f2fs_acl_entry));
148 break;
149 case ACL_USER_OBJ:
150 case ACL_GROUP_OBJ:
151 case ACL_MASK:
152 case ACL_OTHER:
153 entry = (struct f2fs_acl_entry *)((char *)entry +
154 sizeof(struct f2fs_acl_entry_short));
155 break;
156 default:
157 goto fail;
158 }
159 }
160 *size = f2fs_acl_size(acl->a_count);
161 return (void *)f2fs_acl;
162
163 fail:
164 kfree(f2fs_acl);
165 return ERR_PTR(-EINVAL);
166 }
167
__f2fs_get_acl(struct inode * inode,int type,struct page * dpage)168 static struct posix_acl *__f2fs_get_acl(struct inode *inode, int type,
169 struct page *dpage)
170 {
171 int name_index = F2FS_XATTR_INDEX_POSIX_ACL_DEFAULT;
172 void *value = NULL;
173 struct posix_acl *acl;
174 int retval;
175
176 if (type == ACL_TYPE_ACCESS)
177 name_index = F2FS_XATTR_INDEX_POSIX_ACL_ACCESS;
178
179 retval = f2fs_getxattr(inode, name_index, "", NULL, 0, dpage);
180 if (retval > 0) {
181 value = f2fs_kmalloc(F2FS_I_SB(inode), retval, GFP_F2FS_ZERO);
182 if (!value)
183 return ERR_PTR(-ENOMEM);
184 retval = f2fs_getxattr(inode, name_index, "", value,
185 retval, dpage);
186 }
187
188 if (retval > 0)
189 acl = f2fs_acl_from_disk(value, retval);
190 else if (retval == -ENODATA)
191 acl = NULL;
192 else
193 acl = ERR_PTR(retval);
194 kfree(value);
195
196 return acl;
197 }
198
f2fs_get_acl(struct inode * inode,int type,bool rcu)199 struct posix_acl *f2fs_get_acl(struct inode *inode, int type, bool rcu)
200 {
201 if (rcu)
202 return ERR_PTR(-ECHILD);
203
204 return __f2fs_get_acl(inode, type, NULL);
205 }
206
f2fs_acl_update_mode(struct mnt_idmap * idmap,struct inode * inode,umode_t * mode_p,struct posix_acl ** acl)207 static int f2fs_acl_update_mode(struct mnt_idmap *idmap,
208 struct inode *inode, umode_t *mode_p,
209 struct posix_acl **acl)
210 {
211 umode_t mode = inode->i_mode;
212 int error;
213
214 if (is_inode_flag_set(inode, FI_ACL_MODE))
215 mode = F2FS_I(inode)->i_acl_mode;
216
217 error = posix_acl_equiv_mode(*acl, &mode);
218 if (error < 0)
219 return error;
220 if (error == 0)
221 *acl = NULL;
222 if (!in_group_or_capable(idmap, inode, i_gid_into_vfsgid(idmap, inode)))
223 mode &= ~S_ISGID;
224 *mode_p = mode;
225 return 0;
226 }
227
__f2fs_set_acl(struct mnt_idmap * idmap,struct inode * inode,int type,struct posix_acl * acl,struct page * ipage)228 static int __f2fs_set_acl(struct mnt_idmap *idmap,
229 struct inode *inode, int type,
230 struct posix_acl *acl, struct page *ipage)
231 {
232 int name_index;
233 void *value = NULL;
234 size_t size = 0;
235 int error;
236 umode_t mode = inode->i_mode;
237
238 switch (type) {
239 case ACL_TYPE_ACCESS:
240 name_index = F2FS_XATTR_INDEX_POSIX_ACL_ACCESS;
241 if (acl && !ipage) {
242 error = f2fs_acl_update_mode(idmap, inode,
243 &mode, &acl);
244 if (error)
245 return error;
246 set_acl_inode(inode, mode);
247 }
248 break;
249
250 case ACL_TYPE_DEFAULT:
251 name_index = F2FS_XATTR_INDEX_POSIX_ACL_DEFAULT;
252 if (!S_ISDIR(inode->i_mode))
253 return acl ? -EACCES : 0;
254 break;
255
256 default:
257 return -EINVAL;
258 }
259
260 if (acl) {
261 value = f2fs_acl_to_disk(F2FS_I_SB(inode), acl, &size);
262 if (IS_ERR(value)) {
263 clear_inode_flag(inode, FI_ACL_MODE);
264 return PTR_ERR(value);
265 }
266 }
267
268 error = f2fs_setxattr(inode, name_index, "", value, size, ipage, 0);
269
270 kfree(value);
271 if (!error)
272 set_cached_acl(inode, type, acl);
273
274 clear_inode_flag(inode, FI_ACL_MODE);
275 return error;
276 }
277
f2fs_set_acl(struct mnt_idmap * idmap,struct dentry * dentry,struct posix_acl * acl,int type)278 int f2fs_set_acl(struct mnt_idmap *idmap, struct dentry *dentry,
279 struct posix_acl *acl, int type)
280 {
281 struct inode *inode = d_inode(dentry);
282
283 if (unlikely(f2fs_cp_error(F2FS_I_SB(inode))))
284 return -EIO;
285
286 return __f2fs_set_acl(idmap, inode, type, acl, NULL);
287 }
288
289 /*
290 * Most part of f2fs_acl_clone, f2fs_acl_create_masq, f2fs_acl_create
291 * are copied from posix_acl.c
292 */
f2fs_acl_clone(const struct posix_acl * acl,gfp_t flags)293 static struct posix_acl *f2fs_acl_clone(const struct posix_acl *acl,
294 gfp_t flags)
295 {
296 struct posix_acl *clone = NULL;
297
298 if (acl) {
299 int size = sizeof(struct posix_acl) + acl->a_count *
300 sizeof(struct posix_acl_entry);
301 clone = kmemdup(acl, size, flags);
302 if (clone)
303 refcount_set(&clone->a_refcount, 1);
304 }
305 return clone;
306 }
307
f2fs_acl_create_masq(struct posix_acl * acl,umode_t * mode_p)308 static int f2fs_acl_create_masq(struct posix_acl *acl, umode_t *mode_p)
309 {
310 struct posix_acl_entry *pa, *pe;
311 struct posix_acl_entry *group_obj = NULL, *mask_obj = NULL;
312 umode_t mode = *mode_p;
313 int not_equiv = 0;
314
315 /* assert(atomic_read(acl->a_refcount) == 1); */
316
317 FOREACH_ACL_ENTRY(pa, acl, pe) {
318 switch (pa->e_tag) {
319 case ACL_USER_OBJ:
320 pa->e_perm &= (mode >> 6) | ~S_IRWXO;
321 mode &= (pa->e_perm << 6) | ~S_IRWXU;
322 break;
323
324 case ACL_USER:
325 case ACL_GROUP:
326 not_equiv = 1;
327 break;
328
329 case ACL_GROUP_OBJ:
330 group_obj = pa;
331 break;
332
333 case ACL_OTHER:
334 pa->e_perm &= mode | ~S_IRWXO;
335 mode &= pa->e_perm | ~S_IRWXO;
336 break;
337
338 case ACL_MASK:
339 mask_obj = pa;
340 not_equiv = 1;
341 break;
342
343 default:
344 return -EIO;
345 }
346 }
347
348 if (mask_obj) {
349 mask_obj->e_perm &= (mode >> 3) | ~S_IRWXO;
350 mode &= (mask_obj->e_perm << 3) | ~S_IRWXG;
351 } else {
352 if (!group_obj)
353 return -EIO;
354 group_obj->e_perm &= (mode >> 3) | ~S_IRWXO;
355 mode &= (group_obj->e_perm << 3) | ~S_IRWXG;
356 }
357
358 *mode_p = (*mode_p & ~S_IRWXUGO) | mode;
359 return not_equiv;
360 }
361
f2fs_acl_create(struct inode * dir,umode_t * mode,struct posix_acl ** default_acl,struct posix_acl ** acl,struct page * dpage)362 static int f2fs_acl_create(struct inode *dir, umode_t *mode,
363 struct posix_acl **default_acl, struct posix_acl **acl,
364 struct page *dpage)
365 {
366 struct posix_acl *p;
367 struct posix_acl *clone;
368 int ret;
369
370 *acl = NULL;
371 *default_acl = NULL;
372
373 if (S_ISLNK(*mode) || !IS_POSIXACL(dir))
374 return 0;
375
376 p = __f2fs_get_acl(dir, ACL_TYPE_DEFAULT, dpage);
377 if (!p || p == ERR_PTR(-EOPNOTSUPP)) {
378 *mode &= ~current_umask();
379 return 0;
380 }
381 if (IS_ERR(p))
382 return PTR_ERR(p);
383
384 clone = f2fs_acl_clone(p, GFP_NOFS);
385 if (!clone) {
386 ret = -ENOMEM;
387 goto release_acl;
388 }
389
390 ret = f2fs_acl_create_masq(clone, mode);
391 if (ret < 0)
392 goto release_clone;
393
394 if (ret == 0)
395 posix_acl_release(clone);
396 else
397 *acl = clone;
398
399 if (!S_ISDIR(*mode))
400 posix_acl_release(p);
401 else
402 *default_acl = p;
403
404 return 0;
405
406 release_clone:
407 posix_acl_release(clone);
408 release_acl:
409 posix_acl_release(p);
410 return ret;
411 }
412
f2fs_init_acl(struct inode * inode,struct inode * dir,struct page * ipage,struct page * dpage)413 int f2fs_init_acl(struct inode *inode, struct inode *dir, struct page *ipage,
414 struct page *dpage)
415 {
416 struct posix_acl *default_acl = NULL, *acl = NULL;
417 int error;
418
419 error = f2fs_acl_create(dir, &inode->i_mode, &default_acl, &acl, dpage);
420 if (error)
421 return error;
422
423 f2fs_mark_inode_dirty_sync(inode, true);
424
425 if (default_acl) {
426 error = __f2fs_set_acl(NULL, inode, ACL_TYPE_DEFAULT, default_acl,
427 ipage);
428 posix_acl_release(default_acl);
429 } else {
430 inode->i_default_acl = NULL;
431 }
432 if (acl) {
433 if (!error)
434 error = __f2fs_set_acl(NULL, inode, ACL_TYPE_ACCESS, acl,
435 ipage);
436 posix_acl_release(acl);
437 } else {
438 inode->i_acl = NULL;
439 }
440
441 return error;
442 }
443