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
11struct 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
28static 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
123out_unlock:
124	clear_and_wake_up_bit(EROFS_I_BL_XATTR_BIT, &vi->flags);
125	return ret;
126}
127
128static bool erofs_xattr_user_list(struct dentry *dentry)
129{
130	return test_opt(&EROFS_SB(dentry->d_sb)->opt, XATTR_USER);
131}
132
133static bool erofs_xattr_trusted_list(struct dentry *dentry)
134{
135	return capable(CAP_SYS_ADMIN);
136}
137
138static 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
149const 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
156const 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
164const 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
171const struct xattr_handler * const 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
180static 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
203static 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
255static 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
320static 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
366static 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
393int 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
437ssize_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
466void 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
479int 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
523struct 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
561