1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * fs/f2fs/xattr.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/xattr.c
9  *
10  * Copyright (C) 2001-2003 Andreas Gruenbacher <agruen@suse.de>
11  *
12  * Fix by Harrison Xing <harrison@mountainviewdata.com>.
13  * Extended attributes for symlinks and special files added per
14  *  suggestion of Luka Renko <luka.renko@hermes.si>.
15  * xattr consolidation Copyright (c) 2004 James Morris <jmorris@redhat.com>,
16  *  Red Hat Inc.
17  */
18 #include <linux/rwsem.h>
19 #include <linux/f2fs_fs.h>
20 #include <linux/security.h>
21 #include <linux/posix_acl_xattr.h>
22 #include "f2fs.h"
23 #include "xattr.h"
24 #include "segment.h"
25 
xattr_alloc(struct f2fs_sb_info * sbi,int size,bool * is_inline)26 static void *xattr_alloc(struct f2fs_sb_info *sbi, int size, bool *is_inline)
27 {
28 	if (likely(size == sbi->inline_xattr_slab_size)) {
29 		*is_inline = true;
30 		return f2fs_kmem_cache_alloc(sbi->inline_xattr_slab,
31 					GFP_F2FS_ZERO, false, sbi);
32 	}
33 	*is_inline = false;
34 	return f2fs_kzalloc(sbi, size, GFP_NOFS);
35 }
36 
xattr_free(struct f2fs_sb_info * sbi,void * xattr_addr,bool is_inline)37 static void xattr_free(struct f2fs_sb_info *sbi, void *xattr_addr,
38 							bool is_inline)
39 {
40 	if (is_inline)
41 		kmem_cache_free(sbi->inline_xattr_slab, xattr_addr);
42 	else
43 		kfree(xattr_addr);
44 }
45 
f2fs_xattr_generic_get(const struct xattr_handler * handler,struct dentry * unused,struct inode * inode,const char * name,void * buffer,size_t size)46 static int f2fs_xattr_generic_get(const struct xattr_handler *handler,
47 		struct dentry *unused, struct inode *inode,
48 		const char *name, void *buffer, size_t size)
49 {
50 	struct f2fs_sb_info *sbi = F2FS_SB(inode->i_sb);
51 
52 	switch (handler->flags) {
53 	case F2FS_XATTR_INDEX_USER:
54 		if (!test_opt(sbi, XATTR_USER))
55 			return -EOPNOTSUPP;
56 		break;
57 	case F2FS_XATTR_INDEX_TRUSTED:
58 	case F2FS_XATTR_INDEX_SECURITY:
59 		break;
60 	default:
61 		return -EINVAL;
62 	}
63 	return f2fs_getxattr(inode, handler->flags, name,
64 			     buffer, size, NULL);
65 }
66 
f2fs_xattr_generic_set(const struct xattr_handler * handler,struct user_namespace * mnt_userns,struct dentry * unused,struct inode * inode,const char * name,const void * value,size_t size,int flags)67 static int f2fs_xattr_generic_set(const struct xattr_handler *handler,
68 		struct user_namespace *mnt_userns,
69 		struct dentry *unused, struct inode *inode,
70 		const char *name, const void *value,
71 		size_t size, int flags)
72 {
73 	struct f2fs_sb_info *sbi = F2FS_SB(inode->i_sb);
74 
75 	switch (handler->flags) {
76 	case F2FS_XATTR_INDEX_USER:
77 		if (!test_opt(sbi, XATTR_USER))
78 			return -EOPNOTSUPP;
79 		break;
80 	case F2FS_XATTR_INDEX_TRUSTED:
81 	case F2FS_XATTR_INDEX_SECURITY:
82 		break;
83 	default:
84 		return -EINVAL;
85 	}
86 	return f2fs_setxattr(inode, handler->flags, name,
87 					value, size, NULL, flags);
88 }
89 
f2fs_xattr_user_list(struct dentry * dentry)90 static bool f2fs_xattr_user_list(struct dentry *dentry)
91 {
92 	struct f2fs_sb_info *sbi = F2FS_SB(dentry->d_sb);
93 
94 	return test_opt(sbi, XATTR_USER);
95 }
96 
f2fs_xattr_trusted_list(struct dentry * dentry)97 static bool f2fs_xattr_trusted_list(struct dentry *dentry)
98 {
99 	return capable(CAP_SYS_ADMIN);
100 }
101 
f2fs_xattr_advise_get(const struct xattr_handler * handler,struct dentry * unused,struct inode * inode,const char * name,void * buffer,size_t size)102 static int f2fs_xattr_advise_get(const struct xattr_handler *handler,
103 		struct dentry *unused, struct inode *inode,
104 		const char *name, void *buffer, size_t size)
105 {
106 	if (buffer)
107 		*((char *)buffer) = F2FS_I(inode)->i_advise;
108 	return sizeof(char);
109 }
110 
f2fs_xattr_advise_set(const struct xattr_handler * handler,struct user_namespace * mnt_userns,struct dentry * unused,struct inode * inode,const char * name,const void * value,size_t size,int flags)111 static int f2fs_xattr_advise_set(const struct xattr_handler *handler,
112 		struct user_namespace *mnt_userns,
113 		struct dentry *unused, struct inode *inode,
114 		const char *name, const void *value,
115 		size_t size, int flags)
116 {
117 	unsigned char old_advise = F2FS_I(inode)->i_advise;
118 	unsigned char new_advise;
119 
120 	if (!inode_owner_or_capable(&init_user_ns, inode))
121 		return -EPERM;
122 	if (value == NULL)
123 		return -EINVAL;
124 
125 	new_advise = *(char *)value;
126 	if (new_advise & ~FADVISE_MODIFIABLE_BITS)
127 		return -EINVAL;
128 
129 	new_advise = new_advise & FADVISE_MODIFIABLE_BITS;
130 	new_advise |= old_advise & ~FADVISE_MODIFIABLE_BITS;
131 
132 	F2FS_I(inode)->i_advise = new_advise;
133 	f2fs_mark_inode_dirty_sync(inode, true);
134 	return 0;
135 }
136 
137 #ifdef CONFIG_F2FS_FS_SECURITY
f2fs_initxattrs(struct inode * inode,const struct xattr * xattr_array,void * page)138 static int f2fs_initxattrs(struct inode *inode, const struct xattr *xattr_array,
139 		void *page)
140 {
141 	const struct xattr *xattr;
142 	int err = 0;
143 
144 	for (xattr = xattr_array; xattr->name != NULL; xattr++) {
145 		err = f2fs_setxattr(inode, F2FS_XATTR_INDEX_SECURITY,
146 				xattr->name, xattr->value,
147 				xattr->value_len, (struct page *)page, 0);
148 		if (err < 0)
149 			break;
150 	}
151 	return err;
152 }
153 
f2fs_init_security(struct inode * inode,struct inode * dir,const struct qstr * qstr,struct page * ipage)154 int f2fs_init_security(struct inode *inode, struct inode *dir,
155 				const struct qstr *qstr, struct page *ipage)
156 {
157 	return security_inode_init_security(inode, dir, qstr,
158 				&f2fs_initxattrs, ipage);
159 }
160 #endif
161 
162 const struct xattr_handler f2fs_xattr_user_handler = {
163 	.prefix	= XATTR_USER_PREFIX,
164 	.flags	= F2FS_XATTR_INDEX_USER,
165 	.list	= f2fs_xattr_user_list,
166 	.get	= f2fs_xattr_generic_get,
167 	.set	= f2fs_xattr_generic_set,
168 };
169 
170 const struct xattr_handler f2fs_xattr_trusted_handler = {
171 	.prefix	= XATTR_TRUSTED_PREFIX,
172 	.flags	= F2FS_XATTR_INDEX_TRUSTED,
173 	.list	= f2fs_xattr_trusted_list,
174 	.get	= f2fs_xattr_generic_get,
175 	.set	= f2fs_xattr_generic_set,
176 };
177 
178 const struct xattr_handler f2fs_xattr_advise_handler = {
179 	.name	= F2FS_SYSTEM_ADVISE_NAME,
180 	.flags	= F2FS_XATTR_INDEX_ADVISE,
181 	.get	= f2fs_xattr_advise_get,
182 	.set	= f2fs_xattr_advise_set,
183 };
184 
185 const struct xattr_handler f2fs_xattr_security_handler = {
186 	.prefix	= XATTR_SECURITY_PREFIX,
187 	.flags	= F2FS_XATTR_INDEX_SECURITY,
188 	.get	= f2fs_xattr_generic_get,
189 	.set	= f2fs_xattr_generic_set,
190 };
191 
192 static const struct xattr_handler *f2fs_xattr_handler_map[] = {
193 	[F2FS_XATTR_INDEX_USER] = &f2fs_xattr_user_handler,
194 #ifdef CONFIG_F2FS_FS_POSIX_ACL
195 	[F2FS_XATTR_INDEX_POSIX_ACL_ACCESS] = &posix_acl_access_xattr_handler,
196 	[F2FS_XATTR_INDEX_POSIX_ACL_DEFAULT] = &posix_acl_default_xattr_handler,
197 #endif
198 	[F2FS_XATTR_INDEX_TRUSTED] = &f2fs_xattr_trusted_handler,
199 #ifdef CONFIG_F2FS_FS_SECURITY
200 	[F2FS_XATTR_INDEX_SECURITY] = &f2fs_xattr_security_handler,
201 #endif
202 	[F2FS_XATTR_INDEX_ADVISE] = &f2fs_xattr_advise_handler,
203 };
204 
205 const struct xattr_handler *f2fs_xattr_handlers[] = {
206 	&f2fs_xattr_user_handler,
207 #ifdef CONFIG_F2FS_FS_POSIX_ACL
208 	&posix_acl_access_xattr_handler,
209 	&posix_acl_default_xattr_handler,
210 #endif
211 	&f2fs_xattr_trusted_handler,
212 #ifdef CONFIG_F2FS_FS_SECURITY
213 	&f2fs_xattr_security_handler,
214 #endif
215 	&f2fs_xattr_advise_handler,
216 	NULL,
217 };
218 
f2fs_xattr_handler(int index)219 static inline const struct xattr_handler *f2fs_xattr_handler(int index)
220 {
221 	const struct xattr_handler *handler = NULL;
222 
223 	if (index > 0 && index < ARRAY_SIZE(f2fs_xattr_handler_map))
224 		handler = f2fs_xattr_handler_map[index];
225 	return handler;
226 }
227 
__find_xattr(void * base_addr,void * last_base_addr,void ** last_addr,int index,size_t len,const char * name)228 static struct f2fs_xattr_entry *__find_xattr(void *base_addr,
229 				void *last_base_addr, void **last_addr,
230 				int index, size_t len, const char *name)
231 {
232 	struct f2fs_xattr_entry *entry;
233 
234 	list_for_each_xattr(entry, base_addr) {
235 		if ((void *)(entry) + sizeof(__u32) > last_base_addr ||
236 			(void *)XATTR_NEXT_ENTRY(entry) > last_base_addr) {
237 			if (last_addr)
238 				*last_addr = entry;
239 			return NULL;
240 		}
241 
242 		if (entry->e_name_index != index)
243 			continue;
244 		if (entry->e_name_len != len)
245 			continue;
246 		if (!memcmp(entry->e_name, name, len))
247 			break;
248 	}
249 	return entry;
250 }
251 
__find_inline_xattr(struct inode * inode,void * base_addr,void ** last_addr,int index,size_t len,const char * name)252 static struct f2fs_xattr_entry *__find_inline_xattr(struct inode *inode,
253 				void *base_addr, void **last_addr, int index,
254 				size_t len, const char *name)
255 {
256 	struct f2fs_xattr_entry *entry;
257 	unsigned int inline_size = inline_xattr_size(inode);
258 	void *max_addr = base_addr + inline_size;
259 
260 	entry = __find_xattr(base_addr, max_addr, last_addr, index, len, name);
261 	if (!entry)
262 		return NULL;
263 
264 	/* inline xattr header or entry across max inline xattr size */
265 	if (IS_XATTR_LAST_ENTRY(entry) &&
266 		(void *)entry + sizeof(__u32) > max_addr) {
267 		*last_addr = entry;
268 		return NULL;
269 	}
270 	return entry;
271 }
272 
read_inline_xattr(struct inode * inode,struct page * ipage,void * txattr_addr)273 static int read_inline_xattr(struct inode *inode, struct page *ipage,
274 							void *txattr_addr)
275 {
276 	struct f2fs_sb_info *sbi = F2FS_I_SB(inode);
277 	unsigned int inline_size = inline_xattr_size(inode);
278 	struct page *page = NULL;
279 	void *inline_addr;
280 
281 	if (ipage) {
282 		inline_addr = inline_xattr_addr(inode, ipage);
283 	} else {
284 		page = f2fs_get_node_page(sbi, inode->i_ino);
285 		if (IS_ERR(page))
286 			return PTR_ERR(page);
287 
288 		inline_addr = inline_xattr_addr(inode, page);
289 	}
290 	memcpy(txattr_addr, inline_addr, inline_size);
291 	f2fs_put_page(page, 1);
292 
293 	return 0;
294 }
295 
read_xattr_block(struct inode * inode,void * txattr_addr)296 static int read_xattr_block(struct inode *inode, void *txattr_addr)
297 {
298 	struct f2fs_sb_info *sbi = F2FS_I_SB(inode);
299 	nid_t xnid = F2FS_I(inode)->i_xattr_nid;
300 	unsigned int inline_size = inline_xattr_size(inode);
301 	struct page *xpage;
302 	void *xattr_addr;
303 
304 	/* The inode already has an extended attribute block. */
305 	xpage = f2fs_get_node_page(sbi, xnid);
306 	if (IS_ERR(xpage))
307 		return PTR_ERR(xpage);
308 
309 	xattr_addr = page_address(xpage);
310 	memcpy(txattr_addr + inline_size, xattr_addr, VALID_XATTR_BLOCK_SIZE);
311 	f2fs_put_page(xpage, 1);
312 
313 	return 0;
314 }
315 
lookup_all_xattrs(struct inode * inode,struct page * ipage,unsigned int index,unsigned int len,const char * name,struct f2fs_xattr_entry ** xe,void ** base_addr,int * base_size,bool * is_inline)316 static int lookup_all_xattrs(struct inode *inode, struct page *ipage,
317 				unsigned int index, unsigned int len,
318 				const char *name, struct f2fs_xattr_entry **xe,
319 				void **base_addr, int *base_size,
320 				bool *is_inline)
321 {
322 	void *cur_addr, *txattr_addr, *last_txattr_addr;
323 	void *last_addr = NULL;
324 	nid_t xnid = F2FS_I(inode)->i_xattr_nid;
325 	unsigned int inline_size = inline_xattr_size(inode);
326 	int err;
327 
328 	if (!xnid && !inline_size)
329 		return -ENODATA;
330 
331 	*base_size = XATTR_SIZE(inode) + XATTR_PADDING_SIZE;
332 	txattr_addr = xattr_alloc(F2FS_I_SB(inode), *base_size, is_inline);
333 	if (!txattr_addr)
334 		return -ENOMEM;
335 
336 	last_txattr_addr = (void *)txattr_addr + XATTR_SIZE(inode);
337 
338 	/* read from inline xattr */
339 	if (inline_size) {
340 		err = read_inline_xattr(inode, ipage, txattr_addr);
341 		if (err)
342 			goto out;
343 
344 		*xe = __find_inline_xattr(inode, txattr_addr, &last_addr,
345 						index, len, name);
346 		if (*xe) {
347 			*base_size = inline_size;
348 			goto check;
349 		}
350 	}
351 
352 	/* read from xattr node block */
353 	if (xnid) {
354 		err = read_xattr_block(inode, txattr_addr);
355 		if (err)
356 			goto out;
357 	}
358 
359 	if (last_addr)
360 		cur_addr = XATTR_HDR(last_addr) - 1;
361 	else
362 		cur_addr = txattr_addr;
363 
364 	*xe = __find_xattr(cur_addr, last_txattr_addr, NULL, index, len, name);
365 	if (!*xe) {
366 		f2fs_err(F2FS_I_SB(inode), "inode (%lu) has corrupted xattr",
367 								inode->i_ino);
368 		set_sbi_flag(F2FS_I_SB(inode), SBI_NEED_FSCK);
369 		err = -EFSCORRUPTED;
370 		f2fs_handle_error(F2FS_I_SB(inode),
371 					ERROR_CORRUPTED_XATTR);
372 		goto out;
373 	}
374 check:
375 	if (IS_XATTR_LAST_ENTRY(*xe)) {
376 		err = -ENODATA;
377 		goto out;
378 	}
379 
380 	*base_addr = txattr_addr;
381 	return 0;
382 out:
383 	xattr_free(F2FS_I_SB(inode), txattr_addr, *is_inline);
384 	return err;
385 }
386 
read_all_xattrs(struct inode * inode,struct page * ipage,void ** base_addr)387 static int read_all_xattrs(struct inode *inode, struct page *ipage,
388 							void **base_addr)
389 {
390 	struct f2fs_xattr_header *header;
391 	nid_t xnid = F2FS_I(inode)->i_xattr_nid;
392 	unsigned int size = VALID_XATTR_BLOCK_SIZE;
393 	unsigned int inline_size = inline_xattr_size(inode);
394 	void *txattr_addr;
395 	int err;
396 
397 	txattr_addr = f2fs_kzalloc(F2FS_I_SB(inode),
398 			inline_size + size + XATTR_PADDING_SIZE, GFP_NOFS);
399 	if (!txattr_addr)
400 		return -ENOMEM;
401 
402 	/* read from inline xattr */
403 	if (inline_size) {
404 		err = read_inline_xattr(inode, ipage, txattr_addr);
405 		if (err)
406 			goto fail;
407 	}
408 
409 	/* read from xattr node block */
410 	if (xnid) {
411 		err = read_xattr_block(inode, txattr_addr);
412 		if (err)
413 			goto fail;
414 	}
415 
416 	header = XATTR_HDR(txattr_addr);
417 
418 	/* never been allocated xattrs */
419 	if (le32_to_cpu(header->h_magic) != F2FS_XATTR_MAGIC) {
420 		header->h_magic = cpu_to_le32(F2FS_XATTR_MAGIC);
421 		header->h_refcount = cpu_to_le32(1);
422 	}
423 	*base_addr = txattr_addr;
424 	return 0;
425 fail:
426 	kfree(txattr_addr);
427 	return err;
428 }
429 
write_all_xattrs(struct inode * inode,__u32 hsize,void * txattr_addr,struct page * ipage)430 static inline int write_all_xattrs(struct inode *inode, __u32 hsize,
431 				void *txattr_addr, struct page *ipage)
432 {
433 	struct f2fs_sb_info *sbi = F2FS_I_SB(inode);
434 	size_t inline_size = inline_xattr_size(inode);
435 	struct page *in_page = NULL;
436 	void *xattr_addr;
437 	void *inline_addr = NULL;
438 	struct page *xpage;
439 	nid_t new_nid = 0;
440 	int err = 0;
441 
442 	if (hsize > inline_size && !F2FS_I(inode)->i_xattr_nid)
443 		if (!f2fs_alloc_nid(sbi, &new_nid))
444 			return -ENOSPC;
445 
446 	/* write to inline xattr */
447 	if (inline_size) {
448 		if (ipage) {
449 			inline_addr = inline_xattr_addr(inode, ipage);
450 		} else {
451 			in_page = f2fs_get_node_page(sbi, inode->i_ino);
452 			if (IS_ERR(in_page)) {
453 				f2fs_alloc_nid_failed(sbi, new_nid);
454 				return PTR_ERR(in_page);
455 			}
456 			inline_addr = inline_xattr_addr(inode, in_page);
457 		}
458 
459 		f2fs_wait_on_page_writeback(ipage ? ipage : in_page,
460 							NODE, true, true);
461 		/* no need to use xattr node block */
462 		if (hsize <= inline_size) {
463 			err = f2fs_truncate_xattr_node(inode);
464 			f2fs_alloc_nid_failed(sbi, new_nid);
465 			if (err) {
466 				f2fs_put_page(in_page, 1);
467 				return err;
468 			}
469 			memcpy(inline_addr, txattr_addr, inline_size);
470 			set_page_dirty(ipage ? ipage : in_page);
471 			goto in_page_out;
472 		}
473 	}
474 
475 	/* write to xattr node block */
476 	if (F2FS_I(inode)->i_xattr_nid) {
477 		xpage = f2fs_get_node_page(sbi, F2FS_I(inode)->i_xattr_nid);
478 		if (IS_ERR(xpage)) {
479 			err = PTR_ERR(xpage);
480 			f2fs_alloc_nid_failed(sbi, new_nid);
481 			goto in_page_out;
482 		}
483 		f2fs_bug_on(sbi, new_nid);
484 		f2fs_wait_on_page_writeback(xpage, NODE, true, true);
485 	} else {
486 		struct dnode_of_data dn;
487 
488 		set_new_dnode(&dn, inode, NULL, NULL, new_nid);
489 		xpage = f2fs_new_node_page(&dn, XATTR_NODE_OFFSET);
490 		if (IS_ERR(xpage)) {
491 			err = PTR_ERR(xpage);
492 			f2fs_alloc_nid_failed(sbi, new_nid);
493 			goto in_page_out;
494 		}
495 		f2fs_alloc_nid_done(sbi, new_nid);
496 	}
497 	xattr_addr = page_address(xpage);
498 
499 	if (inline_size)
500 		memcpy(inline_addr, txattr_addr, inline_size);
501 	memcpy(xattr_addr, txattr_addr + inline_size, VALID_XATTR_BLOCK_SIZE);
502 
503 	if (inline_size)
504 		set_page_dirty(ipage ? ipage : in_page);
505 	set_page_dirty(xpage);
506 
507 	f2fs_put_page(xpage, 1);
508 in_page_out:
509 	f2fs_put_page(in_page, 1);
510 	return err;
511 }
512 
f2fs_getxattr(struct inode * inode,int index,const char * name,void * buffer,size_t buffer_size,struct page * ipage)513 int f2fs_getxattr(struct inode *inode, int index, const char *name,
514 		void *buffer, size_t buffer_size, struct page *ipage)
515 {
516 	struct f2fs_xattr_entry *entry = NULL;
517 	int error;
518 	unsigned int size, len;
519 	void *base_addr = NULL;
520 	int base_size;
521 	bool is_inline;
522 
523 	if (name == NULL)
524 		return -EINVAL;
525 
526 	len = strlen(name);
527 	if (len > F2FS_NAME_LEN)
528 		return -ERANGE;
529 
530 	f2fs_down_read(&F2FS_I(inode)->i_xattr_sem);
531 	error = lookup_all_xattrs(inode, ipage, index, len, name,
532 				&entry, &base_addr, &base_size, &is_inline);
533 	f2fs_up_read(&F2FS_I(inode)->i_xattr_sem);
534 	if (error)
535 		return error;
536 
537 	size = le16_to_cpu(entry->e_value_size);
538 
539 	if (buffer && size > buffer_size) {
540 		error = -ERANGE;
541 		goto out;
542 	}
543 
544 	if (buffer) {
545 		char *pval = entry->e_name + entry->e_name_len;
546 
547 		if (base_size - (pval - (char *)base_addr) < size) {
548 			error = -ERANGE;
549 			goto out;
550 		}
551 		memcpy(buffer, pval, size);
552 	}
553 	error = size;
554 out:
555 	xattr_free(F2FS_I_SB(inode), base_addr, is_inline);
556 	return error;
557 }
558 
f2fs_listxattr(struct dentry * dentry,char * buffer,size_t buffer_size)559 ssize_t f2fs_listxattr(struct dentry *dentry, char *buffer, size_t buffer_size)
560 {
561 	struct inode *inode = d_inode(dentry);
562 	struct f2fs_xattr_entry *entry;
563 	void *base_addr, *last_base_addr;
564 	int error;
565 	size_t rest = buffer_size;
566 
567 	f2fs_down_read(&F2FS_I(inode)->i_xattr_sem);
568 	error = read_all_xattrs(inode, NULL, &base_addr);
569 	f2fs_up_read(&F2FS_I(inode)->i_xattr_sem);
570 	if (error)
571 		return error;
572 
573 	last_base_addr = (void *)base_addr + XATTR_SIZE(inode);
574 
575 	list_for_each_xattr(entry, base_addr) {
576 		const struct xattr_handler *handler =
577 			f2fs_xattr_handler(entry->e_name_index);
578 		const char *prefix;
579 		size_t prefix_len;
580 		size_t size;
581 
582 		if ((void *)(entry) + sizeof(__u32) > last_base_addr ||
583 			(void *)XATTR_NEXT_ENTRY(entry) > last_base_addr) {
584 			f2fs_err(F2FS_I_SB(inode), "inode (%lu) has corrupted xattr",
585 						inode->i_ino);
586 			set_sbi_flag(F2FS_I_SB(inode), SBI_NEED_FSCK);
587 			error = -EFSCORRUPTED;
588 			f2fs_handle_error(F2FS_I_SB(inode),
589 						ERROR_CORRUPTED_XATTR);
590 			goto cleanup;
591 		}
592 
593 		if (!handler || (handler->list && !handler->list(dentry)))
594 			continue;
595 
596 		prefix = xattr_prefix(handler);
597 		prefix_len = strlen(prefix);
598 		size = prefix_len + entry->e_name_len + 1;
599 		if (buffer) {
600 			if (size > rest) {
601 				error = -ERANGE;
602 				goto cleanup;
603 			}
604 			memcpy(buffer, prefix, prefix_len);
605 			buffer += prefix_len;
606 			memcpy(buffer, entry->e_name, entry->e_name_len);
607 			buffer += entry->e_name_len;
608 			*buffer++ = 0;
609 		}
610 		rest -= size;
611 	}
612 	error = buffer_size - rest;
613 cleanup:
614 	kfree(base_addr);
615 	return error;
616 }
617 
f2fs_xattr_value_same(struct f2fs_xattr_entry * entry,const void * value,size_t size)618 static bool f2fs_xattr_value_same(struct f2fs_xattr_entry *entry,
619 					const void *value, size_t size)
620 {
621 	void *pval = entry->e_name + entry->e_name_len;
622 
623 	return (le16_to_cpu(entry->e_value_size) == size) &&
624 					!memcmp(pval, value, size);
625 }
626 
__f2fs_setxattr(struct inode * inode,int index,const char * name,const void * value,size_t size,struct page * ipage,int flags)627 static int __f2fs_setxattr(struct inode *inode, int index,
628 			const char *name, const void *value, size_t size,
629 			struct page *ipage, int flags)
630 {
631 	struct f2fs_xattr_entry *here, *last;
632 	void *base_addr, *last_base_addr;
633 	int found, newsize;
634 	size_t len;
635 	__u32 new_hsize;
636 	int error;
637 
638 	if (name == NULL)
639 		return -EINVAL;
640 
641 	if (value == NULL)
642 		size = 0;
643 
644 	len = strlen(name);
645 
646 	if (len > F2FS_NAME_LEN)
647 		return -ERANGE;
648 
649 	if (size > MAX_VALUE_LEN(inode))
650 		return -E2BIG;
651 
652 	error = read_all_xattrs(inode, ipage, &base_addr);
653 	if (error)
654 		return error;
655 
656 	last_base_addr = (void *)base_addr + XATTR_SIZE(inode);
657 
658 	/* find entry with wanted name. */
659 	here = __find_xattr(base_addr, last_base_addr, NULL, index, len, name);
660 	if (!here) {
661 		f2fs_err(F2FS_I_SB(inode), "inode (%lu) has corrupted xattr",
662 								inode->i_ino);
663 		set_sbi_flag(F2FS_I_SB(inode), SBI_NEED_FSCK);
664 		error = -EFSCORRUPTED;
665 		f2fs_handle_error(F2FS_I_SB(inode),
666 					ERROR_CORRUPTED_XATTR);
667 		goto exit;
668 	}
669 
670 	found = IS_XATTR_LAST_ENTRY(here) ? 0 : 1;
671 
672 	if (found) {
673 		if ((flags & XATTR_CREATE)) {
674 			error = -EEXIST;
675 			goto exit;
676 		}
677 
678 		if (value && f2fs_xattr_value_same(here, value, size))
679 			goto same;
680 	} else if ((flags & XATTR_REPLACE)) {
681 		error = -ENODATA;
682 		goto exit;
683 	}
684 
685 	last = here;
686 	while (!IS_XATTR_LAST_ENTRY(last)) {
687 		if ((void *)(last) + sizeof(__u32) > last_base_addr ||
688 			(void *)XATTR_NEXT_ENTRY(last) > last_base_addr) {
689 			f2fs_err(F2FS_I_SB(inode), "inode (%lu) has invalid last xattr entry, entry_size: %zu",
690 					inode->i_ino, ENTRY_SIZE(last));
691 			set_sbi_flag(F2FS_I_SB(inode), SBI_NEED_FSCK);
692 			error = -EFSCORRUPTED;
693 			f2fs_handle_error(F2FS_I_SB(inode),
694 						ERROR_CORRUPTED_XATTR);
695 			goto exit;
696 		}
697 		last = XATTR_NEXT_ENTRY(last);
698 	}
699 
700 	newsize = XATTR_ALIGN(sizeof(struct f2fs_xattr_entry) + len + size);
701 
702 	/* 1. Check space */
703 	if (value) {
704 		int free;
705 		/*
706 		 * If value is NULL, it is remove operation.
707 		 * In case of update operation, we calculate free.
708 		 */
709 		free = MIN_OFFSET(inode) - ((char *)last - (char *)base_addr);
710 		if (found)
711 			free = free + ENTRY_SIZE(here);
712 
713 		if (unlikely(free < newsize)) {
714 			error = -E2BIG;
715 			goto exit;
716 		}
717 	}
718 
719 	/* 2. Remove old entry */
720 	if (found) {
721 		/*
722 		 * If entry is found, remove old entry.
723 		 * If not found, remove operation is not needed.
724 		 */
725 		struct f2fs_xattr_entry *next = XATTR_NEXT_ENTRY(here);
726 		int oldsize = ENTRY_SIZE(here);
727 
728 		memmove(here, next, (char *)last - (char *)next);
729 		last = (struct f2fs_xattr_entry *)((char *)last - oldsize);
730 		memset(last, 0, oldsize);
731 	}
732 
733 	new_hsize = (char *)last - (char *)base_addr;
734 
735 	/* 3. Write new entry */
736 	if (value) {
737 		char *pval;
738 		/*
739 		 * Before we come here, old entry is removed.
740 		 * We just write new entry.
741 		 */
742 		last->e_name_index = index;
743 		last->e_name_len = len;
744 		memcpy(last->e_name, name, len);
745 		pval = last->e_name + len;
746 		memcpy(pval, value, size);
747 		last->e_value_size = cpu_to_le16(size);
748 		new_hsize += newsize;
749 	}
750 
751 	error = write_all_xattrs(inode, new_hsize, base_addr, ipage);
752 	if (error)
753 		goto exit;
754 
755 	if (index == F2FS_XATTR_INDEX_ENCRYPTION &&
756 			!strcmp(name, F2FS_XATTR_NAME_ENCRYPTION_CONTEXT))
757 		f2fs_set_encrypted_inode(inode);
758 	f2fs_mark_inode_dirty_sync(inode, true);
759 	if (!error && S_ISDIR(inode->i_mode))
760 		set_sbi_flag(F2FS_I_SB(inode), SBI_NEED_CP);
761 
762 same:
763 	if (is_inode_flag_set(inode, FI_ACL_MODE)) {
764 		inode->i_mode = F2FS_I(inode)->i_acl_mode;
765 		inode->i_ctime = current_time(inode);
766 		clear_inode_flag(inode, FI_ACL_MODE);
767 	}
768 
769 exit:
770 	kfree(base_addr);
771 	return error;
772 }
773 
f2fs_setxattr(struct inode * inode,int index,const char * name,const void * value,size_t size,struct page * ipage,int flags)774 int f2fs_setxattr(struct inode *inode, int index, const char *name,
775 				const void *value, size_t size,
776 				struct page *ipage, int flags)
777 {
778 	struct f2fs_sb_info *sbi = F2FS_I_SB(inode);
779 	int err;
780 
781 	if (unlikely(f2fs_cp_error(sbi)))
782 		return -EIO;
783 	if (!f2fs_is_checkpoint_ready(sbi))
784 		return -ENOSPC;
785 
786 	err = f2fs_dquot_initialize(inode);
787 	if (err)
788 		return err;
789 
790 	/* this case is only from f2fs_init_inode_metadata */
791 	if (ipage)
792 		return __f2fs_setxattr(inode, index, name, value,
793 						size, ipage, flags);
794 	f2fs_balance_fs(sbi, true);
795 
796 	f2fs_lock_op(sbi);
797 	f2fs_down_write(&F2FS_I(inode)->i_xattr_sem);
798 	err = __f2fs_setxattr(inode, index, name, value, size, ipage, flags);
799 	f2fs_up_write(&F2FS_I(inode)->i_xattr_sem);
800 	f2fs_unlock_op(sbi);
801 
802 	f2fs_update_time(sbi, REQ_TIME);
803 	return err;
804 }
805 
f2fs_init_xattr_caches(struct f2fs_sb_info * sbi)806 int f2fs_init_xattr_caches(struct f2fs_sb_info *sbi)
807 {
808 	dev_t dev = sbi->sb->s_bdev->bd_dev;
809 	char slab_name[32];
810 
811 	sprintf(slab_name, "f2fs_xattr_entry-%u:%u", MAJOR(dev), MINOR(dev));
812 
813 	sbi->inline_xattr_slab_size = F2FS_OPTION(sbi).inline_xattr_size *
814 					sizeof(__le32) + XATTR_PADDING_SIZE;
815 
816 	sbi->inline_xattr_slab = f2fs_kmem_cache_create(slab_name,
817 					sbi->inline_xattr_slab_size);
818 	if (!sbi->inline_xattr_slab)
819 		return -ENOMEM;
820 
821 	return 0;
822 }
823 
f2fs_destroy_xattr_caches(struct f2fs_sb_info * sbi)824 void f2fs_destroy_xattr_caches(struct f2fs_sb_info *sbi)
825 {
826 	kmem_cache_destroy(sbi->inline_xattr_slab);
827 }
828