Merge branch 'rework/misc-cleanups' into for-linus
[platform/kernel/linux-rpi.git] / fs / erofs / xattr.c
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * Copyright (C) 2017-2018 HUAWEI, Inc.
4  *             https://www.huawei.com/
5  * Copyright (C) 2021-2022, Alibaba Cloud
6  */
7 #include <linux/security.h>
8 #include <linux/xxhash.h>
9 #include "xattr.h"
10
11 struct erofs_xattr_iter {
12         struct super_block *sb;
13         struct erofs_buf buf;
14         erofs_off_t pos;
15         void *kaddr;
16
17         char *buffer;
18         int buffer_size, buffer_ofs;
19
20         /* getxattr */
21         int index, infix_len;
22         struct qstr name;
23
24         /* listxattr */
25         struct dentry *dentry;
26 };
27
28 static int erofs_init_inode_xattrs(struct inode *inode)
29 {
30         struct erofs_inode *const vi = EROFS_I(inode);
31         struct erofs_xattr_iter it;
32         unsigned int i;
33         struct erofs_xattr_ibody_header *ih;
34         struct super_block *sb = inode->i_sb;
35         int ret = 0;
36
37         /* the most case is that xattrs of this inode are initialized. */
38         if (test_bit(EROFS_I_EA_INITED_BIT, &vi->flags)) {
39                 /*
40                  * paired with smp_mb() at the end of the function to ensure
41                  * fields will only be observed after the bit is set.
42                  */
43                 smp_mb();
44                 return 0;
45         }
46
47         if (wait_on_bit_lock(&vi->flags, EROFS_I_BL_XATTR_BIT, TASK_KILLABLE))
48                 return -ERESTARTSYS;
49
50         /* someone has initialized xattrs for us? */
51         if (test_bit(EROFS_I_EA_INITED_BIT, &vi->flags))
52                 goto out_unlock;
53
54         /*
55          * bypass all xattr operations if ->xattr_isize is not greater than
56          * sizeof(struct erofs_xattr_ibody_header), in detail:
57          * 1) it is not enough to contain erofs_xattr_ibody_header then
58          *    ->xattr_isize should be 0 (it means no xattr);
59          * 2) it is just to contain erofs_xattr_ibody_header, which is on-disk
60          *    undefined right now (maybe use later with some new sb feature).
61          */
62         if (vi->xattr_isize == sizeof(struct erofs_xattr_ibody_header)) {
63                 erofs_err(sb,
64                           "xattr_isize %d of nid %llu is not supported yet",
65                           vi->xattr_isize, vi->nid);
66                 ret = -EOPNOTSUPP;
67                 goto out_unlock;
68         } else if (vi->xattr_isize < sizeof(struct erofs_xattr_ibody_header)) {
69                 if (vi->xattr_isize) {
70                         erofs_err(sb, "bogus xattr ibody @ nid %llu", vi->nid);
71                         DBG_BUGON(1);
72                         ret = -EFSCORRUPTED;
73                         goto out_unlock;        /* xattr ondisk layout error */
74                 }
75                 ret = -ENOATTR;
76                 goto out_unlock;
77         }
78
79         it.buf = __EROFS_BUF_INITIALIZER;
80         erofs_init_metabuf(&it.buf, sb);
81         it.pos = erofs_iloc(inode) + vi->inode_isize;
82
83         /* read in shared xattr array (non-atomic, see kmalloc below) */
84         it.kaddr = erofs_bread(&it.buf, erofs_blknr(sb, it.pos), EROFS_KMAP);
85         if (IS_ERR(it.kaddr)) {
86                 ret = PTR_ERR(it.kaddr);
87                 goto out_unlock;
88         }
89
90         ih = it.kaddr + erofs_blkoff(sb, it.pos);
91         vi->xattr_name_filter = le32_to_cpu(ih->h_name_filter);
92         vi->xattr_shared_count = ih->h_shared_count;
93         vi->xattr_shared_xattrs = kmalloc_array(vi->xattr_shared_count,
94                                                 sizeof(uint), GFP_KERNEL);
95         if (!vi->xattr_shared_xattrs) {
96                 erofs_put_metabuf(&it.buf);
97                 ret = -ENOMEM;
98                 goto out_unlock;
99         }
100
101         /* let's skip ibody header */
102         it.pos += sizeof(struct erofs_xattr_ibody_header);
103
104         for (i = 0; i < vi->xattr_shared_count; ++i) {
105                 it.kaddr = erofs_bread(&it.buf, erofs_blknr(sb, it.pos),
106                                        EROFS_KMAP);
107                 if (IS_ERR(it.kaddr)) {
108                         kfree(vi->xattr_shared_xattrs);
109                         vi->xattr_shared_xattrs = NULL;
110                         ret = PTR_ERR(it.kaddr);
111                         goto out_unlock;
112                 }
113                 vi->xattr_shared_xattrs[i] = le32_to_cpu(*(__le32 *)
114                                 (it.kaddr + erofs_blkoff(sb, it.pos)));
115                 it.pos += sizeof(__le32);
116         }
117         erofs_put_metabuf(&it.buf);
118
119         /* paired with smp_mb() at the beginning of the function. */
120         smp_mb();
121         set_bit(EROFS_I_EA_INITED_BIT, &vi->flags);
122
123 out_unlock:
124         clear_and_wake_up_bit(EROFS_I_BL_XATTR_BIT, &vi->flags);
125         return ret;
126 }
127
128 static bool erofs_xattr_user_list(struct dentry *dentry)
129 {
130         return test_opt(&EROFS_SB(dentry->d_sb)->opt, XATTR_USER);
131 }
132
133 static bool erofs_xattr_trusted_list(struct dentry *dentry)
134 {
135         return capable(CAP_SYS_ADMIN);
136 }
137
138 static int erofs_xattr_generic_get(const struct xattr_handler *handler,
139                                    struct dentry *unused, struct inode *inode,
140                                    const char *name, void *buffer, size_t size)
141 {
142         if (handler->flags == EROFS_XATTR_INDEX_USER &&
143             !test_opt(&EROFS_I_SB(inode)->opt, XATTR_USER))
144                 return -EOPNOTSUPP;
145
146         return erofs_getxattr(inode, handler->flags, name, buffer, size);
147 }
148
149 const struct xattr_handler erofs_xattr_user_handler = {
150         .prefix = XATTR_USER_PREFIX,
151         .flags  = EROFS_XATTR_INDEX_USER,
152         .list   = erofs_xattr_user_list,
153         .get    = erofs_xattr_generic_get,
154 };
155
156 const struct xattr_handler erofs_xattr_trusted_handler = {
157         .prefix = XATTR_TRUSTED_PREFIX,
158         .flags  = EROFS_XATTR_INDEX_TRUSTED,
159         .list   = erofs_xattr_trusted_list,
160         .get    = erofs_xattr_generic_get,
161 };
162
163 #ifdef CONFIG_EROFS_FS_SECURITY
164 const struct xattr_handler __maybe_unused erofs_xattr_security_handler = {
165         .prefix = XATTR_SECURITY_PREFIX,
166         .flags  = EROFS_XATTR_INDEX_SECURITY,
167         .get    = erofs_xattr_generic_get,
168 };
169 #endif
170
171 const struct xattr_handler *erofs_xattr_handlers[] = {
172         &erofs_xattr_user_handler,
173         &erofs_xattr_trusted_handler,
174 #ifdef CONFIG_EROFS_FS_SECURITY
175         &erofs_xattr_security_handler,
176 #endif
177         NULL,
178 };
179
180 static int erofs_xattr_copy_to_buffer(struct erofs_xattr_iter *it,
181                                       unsigned int len)
182 {
183         unsigned int slice, processed;
184         struct super_block *sb = it->sb;
185         void *src;
186
187         for (processed = 0; processed < len; processed += slice) {
188                 it->kaddr = erofs_bread(&it->buf, erofs_blknr(sb, it->pos),
189                                         EROFS_KMAP);
190                 if (IS_ERR(it->kaddr))
191                         return PTR_ERR(it->kaddr);
192
193                 src = it->kaddr + erofs_blkoff(sb, it->pos);
194                 slice = min_t(unsigned int, sb->s_blocksize -
195                                 erofs_blkoff(sb, it->pos), len - processed);
196                 memcpy(it->buffer + it->buffer_ofs, src, slice);
197                 it->buffer_ofs += slice;
198                 it->pos += slice;
199         }
200         return 0;
201 }
202
203 static int erofs_listxattr_foreach(struct erofs_xattr_iter *it)
204 {
205         struct erofs_xattr_entry entry;
206         unsigned int base_index, name_total, prefix_len, infix_len = 0;
207         const char *prefix, *infix = NULL;
208         int err;
209
210         /* 1. handle xattr entry */
211         entry = *(struct erofs_xattr_entry *)
212                         (it->kaddr + erofs_blkoff(it->sb, it->pos));
213         it->pos += sizeof(struct erofs_xattr_entry);
214
215         base_index = entry.e_name_index;
216         if (entry.e_name_index & EROFS_XATTR_LONG_PREFIX) {
217                 struct erofs_sb_info *sbi = EROFS_SB(it->sb);
218                 struct erofs_xattr_prefix_item *pf = sbi->xattr_prefixes +
219                         (entry.e_name_index & EROFS_XATTR_LONG_PREFIX_MASK);
220
221                 if (pf >= sbi->xattr_prefixes + sbi->xattr_prefix_count)
222                         return 0;
223                 infix = pf->prefix->infix;
224                 infix_len = pf->infix_len;
225                 base_index = pf->prefix->base_index;
226         }
227
228         prefix = erofs_xattr_prefix(base_index, it->dentry);
229         if (!prefix)
230                 return 0;
231         prefix_len = strlen(prefix);
232         name_total = prefix_len + infix_len + entry.e_name_len + 1;
233
234         if (!it->buffer) {
235                 it->buffer_ofs += name_total;
236                 return 0;
237         }
238
239         if (it->buffer_ofs + name_total > it->buffer_size)
240                 return -ERANGE;
241
242         memcpy(it->buffer + it->buffer_ofs, prefix, prefix_len);
243         memcpy(it->buffer + it->buffer_ofs + prefix_len, infix, infix_len);
244         it->buffer_ofs += prefix_len + infix_len;
245
246         /* 2. handle xattr name */
247         err = erofs_xattr_copy_to_buffer(it, entry.e_name_len);
248         if (err)
249                 return err;
250
251         it->buffer[it->buffer_ofs++] = '\0';
252         return 0;
253 }
254
255 static int erofs_getxattr_foreach(struct erofs_xattr_iter *it)
256 {
257         struct super_block *sb = it->sb;
258         struct erofs_xattr_entry entry;
259         unsigned int slice, processed, value_sz;
260
261         /* 1. handle xattr entry */
262         entry = *(struct erofs_xattr_entry *)
263                         (it->kaddr + erofs_blkoff(sb, it->pos));
264         it->pos += sizeof(struct erofs_xattr_entry);
265         value_sz = le16_to_cpu(entry.e_value_size);
266
267         /* should also match the infix for long name prefixes */
268         if (entry.e_name_index & EROFS_XATTR_LONG_PREFIX) {
269                 struct erofs_sb_info *sbi = EROFS_SB(sb);
270                 struct erofs_xattr_prefix_item *pf = sbi->xattr_prefixes +
271                         (entry.e_name_index & EROFS_XATTR_LONG_PREFIX_MASK);
272
273                 if (pf >= sbi->xattr_prefixes + sbi->xattr_prefix_count)
274                         return -ENOATTR;
275
276                 if (it->index != pf->prefix->base_index ||
277                     it->name.len != entry.e_name_len + pf->infix_len)
278                         return -ENOATTR;
279
280                 if (memcmp(it->name.name, pf->prefix->infix, pf->infix_len))
281                         return -ENOATTR;
282
283                 it->infix_len = pf->infix_len;
284         } else {
285                 if (it->index != entry.e_name_index ||
286                     it->name.len != entry.e_name_len)
287                         return -ENOATTR;
288
289                 it->infix_len = 0;
290         }
291
292         /* 2. handle xattr name */
293         for (processed = 0; processed < entry.e_name_len; processed += slice) {
294                 it->kaddr = erofs_bread(&it->buf, erofs_blknr(sb, it->pos),
295                                         EROFS_KMAP);
296                 if (IS_ERR(it->kaddr))
297                         return PTR_ERR(it->kaddr);
298
299                 slice = min_t(unsigned int,
300                                 sb->s_blocksize - erofs_blkoff(sb, it->pos),
301                                 entry.e_name_len - processed);
302                 if (memcmp(it->name.name + it->infix_len + processed,
303                            it->kaddr + erofs_blkoff(sb, it->pos), slice))
304                         return -ENOATTR;
305                 it->pos += slice;
306         }
307
308         /* 3. handle xattr value */
309         if (!it->buffer) {
310                 it->buffer_ofs = value_sz;
311                 return 0;
312         }
313
314         if (it->buffer_size < value_sz)
315                 return -ERANGE;
316
317         return erofs_xattr_copy_to_buffer(it, value_sz);
318 }
319
320 static int erofs_xattr_iter_inline(struct erofs_xattr_iter *it,
321                                    struct inode *inode, bool getxattr)
322 {
323         struct erofs_inode *const vi = EROFS_I(inode);
324         unsigned int xattr_header_sz, remaining, entry_sz;
325         erofs_off_t next_pos;
326         int ret;
327
328         xattr_header_sz = sizeof(struct erofs_xattr_ibody_header) +
329                           sizeof(u32) * vi->xattr_shared_count;
330         if (xattr_header_sz >= vi->xattr_isize) {
331                 DBG_BUGON(xattr_header_sz > vi->xattr_isize);
332                 return -ENOATTR;
333         }
334
335         remaining = vi->xattr_isize - xattr_header_sz;
336         it->pos = erofs_iloc(inode) + vi->inode_isize + xattr_header_sz;
337
338         while (remaining) {
339                 it->kaddr = erofs_bread(&it->buf, erofs_blknr(it->sb, it->pos),
340                                         EROFS_KMAP);
341                 if (IS_ERR(it->kaddr))
342                         return PTR_ERR(it->kaddr);
343
344                 entry_sz = erofs_xattr_entry_size(it->kaddr +
345                                 erofs_blkoff(it->sb, it->pos));
346                 /* xattr on-disk corruption: xattr entry beyond xattr_isize */
347                 if (remaining < entry_sz) {
348                         DBG_BUGON(1);
349                         return -EFSCORRUPTED;
350                 }
351                 remaining -= entry_sz;
352                 next_pos = it->pos + entry_sz;
353
354                 if (getxattr)
355                         ret = erofs_getxattr_foreach(it);
356                 else
357                         ret = erofs_listxattr_foreach(it);
358                 if ((getxattr && ret != -ENOATTR) || (!getxattr && ret))
359                         break;
360
361                 it->pos = next_pos;
362         }
363         return ret;
364 }
365
366 static int erofs_xattr_iter_shared(struct erofs_xattr_iter *it,
367                                    struct inode *inode, bool getxattr)
368 {
369         struct erofs_inode *const vi = EROFS_I(inode);
370         struct super_block *const sb = it->sb;
371         struct erofs_sb_info *sbi = EROFS_SB(sb);
372         unsigned int i;
373         int ret = -ENOATTR;
374
375         for (i = 0; i < vi->xattr_shared_count; ++i) {
376                 it->pos = erofs_pos(sb, sbi->xattr_blkaddr) +
377                                 vi->xattr_shared_xattrs[i] * sizeof(__le32);
378                 it->kaddr = erofs_bread(&it->buf, erofs_blknr(sb, it->pos),
379                                         EROFS_KMAP);
380                 if (IS_ERR(it->kaddr))
381                         return PTR_ERR(it->kaddr);
382
383                 if (getxattr)
384                         ret = erofs_getxattr_foreach(it);
385                 else
386                         ret = erofs_listxattr_foreach(it);
387                 if ((getxattr && ret != -ENOATTR) || (!getxattr && ret))
388                         break;
389         }
390         return ret;
391 }
392
393 int erofs_getxattr(struct inode *inode, int index, const char *name,
394                    void *buffer, size_t buffer_size)
395 {
396         int ret;
397         unsigned int hashbit;
398         struct erofs_xattr_iter it;
399         struct erofs_inode *vi = EROFS_I(inode);
400         struct erofs_sb_info *sbi = EROFS_SB(inode->i_sb);
401
402         if (!name)
403                 return -EINVAL;
404
405         ret = erofs_init_inode_xattrs(inode);
406         if (ret)
407                 return ret;
408
409         /* reserved flag is non-zero if there's any change of on-disk format */
410         if (erofs_sb_has_xattr_filter(sbi) && !sbi->xattr_filter_reserved) {
411                 hashbit = xxh32(name, strlen(name),
412                                 EROFS_XATTR_FILTER_SEED + index);
413                 hashbit &= EROFS_XATTR_FILTER_BITS - 1;
414                 if (vi->xattr_name_filter & (1U << hashbit))
415                         return -ENOATTR;
416         }
417
418         it.index = index;
419         it.name = (struct qstr)QSTR_INIT(name, strlen(name));
420         if (it.name.len > EROFS_NAME_LEN)
421                 return -ERANGE;
422
423         it.sb = inode->i_sb;
424         it.buf = __EROFS_BUF_INITIALIZER;
425         erofs_init_metabuf(&it.buf, it.sb);
426         it.buffer = buffer;
427         it.buffer_size = buffer_size;
428         it.buffer_ofs = 0;
429
430         ret = erofs_xattr_iter_inline(&it, inode, true);
431         if (ret == -ENOATTR)
432                 ret = erofs_xattr_iter_shared(&it, inode, true);
433         erofs_put_metabuf(&it.buf);
434         return ret ? ret : it.buffer_ofs;
435 }
436
437 ssize_t erofs_listxattr(struct dentry *dentry, char *buffer, size_t buffer_size)
438 {
439         int ret;
440         struct erofs_xattr_iter it;
441         struct inode *inode = d_inode(dentry);
442
443         ret = erofs_init_inode_xattrs(inode);
444         if (ret == -ENOATTR)
445                 return 0;
446         if (ret)
447                 return ret;
448
449         it.sb = dentry->d_sb;
450         it.buf = __EROFS_BUF_INITIALIZER;
451         erofs_init_metabuf(&it.buf, it.sb);
452         it.dentry = dentry;
453         it.buffer = buffer;
454         it.buffer_size = buffer_size;
455         it.buffer_ofs = 0;
456
457         ret = erofs_xattr_iter_inline(&it, inode, false);
458         if (!ret || ret == -ENOATTR)
459                 ret = erofs_xattr_iter_shared(&it, inode, false);
460         if (ret == -ENOATTR)
461                 ret = 0;
462         erofs_put_metabuf(&it.buf);
463         return ret ? ret : it.buffer_ofs;
464 }
465
466 void erofs_xattr_prefixes_cleanup(struct super_block *sb)
467 {
468         struct erofs_sb_info *sbi = EROFS_SB(sb);
469         int i;
470
471         if (sbi->xattr_prefixes) {
472                 for (i = 0; i < sbi->xattr_prefix_count; i++)
473                         kfree(sbi->xattr_prefixes[i].prefix);
474                 kfree(sbi->xattr_prefixes);
475                 sbi->xattr_prefixes = NULL;
476         }
477 }
478
479 int erofs_xattr_prefixes_init(struct super_block *sb)
480 {
481         struct erofs_sb_info *sbi = EROFS_SB(sb);
482         struct erofs_buf buf = __EROFS_BUF_INITIALIZER;
483         erofs_off_t pos = (erofs_off_t)sbi->xattr_prefix_start << 2;
484         struct erofs_xattr_prefix_item *pfs;
485         int ret = 0, i, len;
486
487         if (!sbi->xattr_prefix_count)
488                 return 0;
489
490         pfs = kzalloc(sbi->xattr_prefix_count * sizeof(*pfs), GFP_KERNEL);
491         if (!pfs)
492                 return -ENOMEM;
493
494         if (sbi->packed_inode)
495                 buf.inode = sbi->packed_inode;
496         else
497                 erofs_init_metabuf(&buf, sb);
498
499         for (i = 0; i < sbi->xattr_prefix_count; i++) {
500                 void *ptr = erofs_read_metadata(sb, &buf, &pos, &len);
501
502                 if (IS_ERR(ptr)) {
503                         ret = PTR_ERR(ptr);
504                         break;
505                 } else if (len < sizeof(*pfs->prefix) ||
506                            len > EROFS_NAME_LEN + sizeof(*pfs->prefix)) {
507                         kfree(ptr);
508                         ret = -EFSCORRUPTED;
509                         break;
510                 }
511                 pfs[i].prefix = ptr;
512                 pfs[i].infix_len = len - sizeof(struct erofs_xattr_long_prefix);
513         }
514
515         erofs_put_metabuf(&buf);
516         sbi->xattr_prefixes = pfs;
517         if (ret)
518                 erofs_xattr_prefixes_cleanup(sb);
519         return ret;
520 }
521
522 #ifdef CONFIG_EROFS_FS_POSIX_ACL
523 struct posix_acl *erofs_get_acl(struct inode *inode, int type, bool rcu)
524 {
525         struct posix_acl *acl;
526         int prefix, rc;
527         char *value = NULL;
528
529         if (rcu)
530                 return ERR_PTR(-ECHILD);
531
532         switch (type) {
533         case ACL_TYPE_ACCESS:
534                 prefix = EROFS_XATTR_INDEX_POSIX_ACL_ACCESS;
535                 break;
536         case ACL_TYPE_DEFAULT:
537                 prefix = EROFS_XATTR_INDEX_POSIX_ACL_DEFAULT;
538                 break;
539         default:
540                 return ERR_PTR(-EINVAL);
541         }
542
543         rc = erofs_getxattr(inode, prefix, "", NULL, 0);
544         if (rc > 0) {
545                 value = kmalloc(rc, GFP_KERNEL);
546                 if (!value)
547                         return ERR_PTR(-ENOMEM);
548                 rc = erofs_getxattr(inode, prefix, "", value, rc);
549         }
550
551         if (rc == -ENOATTR)
552                 acl = NULL;
553         else if (rc < 0)
554                 acl = ERR_PTR(rc);
555         else
556                 acl = posix_acl_from_xattr(&init_user_ns, value, rc);
557         kfree(value);
558         return acl;
559 }
560 #endif