Linux Audio

Check our new training course

Loading...
v3.5.6
   1/*
   2 * linux/fs/ext4/xattr.c
   3 *
   4 * Copyright (C) 2001-2003 Andreas Gruenbacher, <agruen@suse.de>
   5 *
   6 * Fix by Harrison Xing <harrison@mountainviewdata.com>.
   7 * Ext4 code with a lot of help from Eric Jarman <ejarman@acm.org>.
   8 * Extended attributes for symlinks and special files added per
   9 *  suggestion of Luka Renko <luka.renko@hermes.si>.
  10 * xattr consolidation Copyright (c) 2004 James Morris <jmorris@redhat.com>,
  11 *  Red Hat Inc.
  12 * ea-in-inode support by Alex Tomas <alex@clusterfs.com> aka bzzz
  13 *  and Andreas Gruenbacher <agruen@suse.de>.
  14 */
  15
  16/*
  17 * Extended attributes are stored directly in inodes (on file systems with
  18 * inodes bigger than 128 bytes) and on additional disk blocks. The i_file_acl
  19 * field contains the block number if an inode uses an additional block. All
  20 * attributes must fit in the inode and one additional block. Blocks that
  21 * contain the identical set of attributes may be shared among several inodes.
  22 * Identical blocks are detected by keeping a cache of blocks that have
  23 * recently been accessed.
  24 *
  25 * The attributes in inodes and on blocks have a different header; the entries
  26 * are stored in the same format:
  27 *
  28 *   +------------------+
  29 *   | header           |
  30 *   | entry 1          | |
  31 *   | entry 2          | | growing downwards
  32 *   | entry 3          | v
  33 *   | four null bytes  |
  34 *   | . . .            |
  35 *   | value 1          | ^
  36 *   | value 3          | | growing upwards
  37 *   | value 2          | |
  38 *   +------------------+
  39 *
  40 * The header is followed by multiple entry descriptors. In disk blocks, the
  41 * entry descriptors are kept sorted. In inodes, they are unsorted. The
  42 * attribute values are aligned to the end of the block in no specific order.
  43 *
  44 * Locking strategy
  45 * ----------------
  46 * EXT4_I(inode)->i_file_acl is protected by EXT4_I(inode)->xattr_sem.
  47 * EA blocks are only changed if they are exclusive to an inode, so
  48 * holding xattr_sem also means that nothing but the EA block's reference
  49 * count can change. Multiple writers to the same block are synchronized
  50 * by the buffer lock.
  51 */
  52
  53#include <linux/init.h>
  54#include <linux/fs.h>
  55#include <linux/slab.h>
  56#include <linux/mbcache.h>
  57#include <linux/quotaops.h>
  58#include <linux/rwsem.h>
  59#include "ext4_jbd2.h"
  60#include "ext4.h"
  61#include "xattr.h"
  62#include "acl.h"
  63
  64#define BHDR(bh) ((struct ext4_xattr_header *)((bh)->b_data))
  65#define ENTRY(ptr) ((struct ext4_xattr_entry *)(ptr))
  66#define BFIRST(bh) ENTRY(BHDR(bh)+1)
  67#define IS_LAST_ENTRY(entry) (*(__u32 *)(entry) == 0)
  68
  69#ifdef EXT4_XATTR_DEBUG
  70# define ea_idebug(inode, f...) do { \
  71		printk(KERN_DEBUG "inode %s:%lu: ", \
  72			inode->i_sb->s_id, inode->i_ino); \
  73		printk(f); \
  74		printk("\n"); \
  75	} while (0)
  76# define ea_bdebug(bh, f...) do { \
  77		char b[BDEVNAME_SIZE]; \
  78		printk(KERN_DEBUG "block %s:%lu: ", \
  79			bdevname(bh->b_bdev, b), \
  80			(unsigned long) bh->b_blocknr); \
  81		printk(f); \
  82		printk("\n"); \
  83	} while (0)
  84#else
  85# define ea_idebug(inode, fmt, ...)	no_printk(fmt, ##__VA_ARGS__)
  86# define ea_bdebug(bh, fmt, ...)	no_printk(fmt, ##__VA_ARGS__)
  87#endif
  88
  89static void ext4_xattr_cache_insert(struct buffer_head *);
  90static struct buffer_head *ext4_xattr_cache_find(struct inode *,
  91						 struct ext4_xattr_header *,
  92						 struct mb_cache_entry **);
  93static void ext4_xattr_rehash(struct ext4_xattr_header *,
  94			      struct ext4_xattr_entry *);
  95static int ext4_xattr_list(struct dentry *dentry, char *buffer,
  96			   size_t buffer_size);
  97
  98static struct mb_cache *ext4_xattr_cache;
  99
 100static const struct xattr_handler *ext4_xattr_handler_map[] = {
 101	[EXT4_XATTR_INDEX_USER]		     = &ext4_xattr_user_handler,
 102#ifdef CONFIG_EXT4_FS_POSIX_ACL
 103	[EXT4_XATTR_INDEX_POSIX_ACL_ACCESS]  = &ext4_xattr_acl_access_handler,
 104	[EXT4_XATTR_INDEX_POSIX_ACL_DEFAULT] = &ext4_xattr_acl_default_handler,
 105#endif
 106	[EXT4_XATTR_INDEX_TRUSTED]	     = &ext4_xattr_trusted_handler,
 107#ifdef CONFIG_EXT4_FS_SECURITY
 108	[EXT4_XATTR_INDEX_SECURITY]	     = &ext4_xattr_security_handler,
 109#endif
 110};
 111
 112const struct xattr_handler *ext4_xattr_handlers[] = {
 113	&ext4_xattr_user_handler,
 114	&ext4_xattr_trusted_handler,
 115#ifdef CONFIG_EXT4_FS_POSIX_ACL
 116	&ext4_xattr_acl_access_handler,
 117	&ext4_xattr_acl_default_handler,
 118#endif
 119#ifdef CONFIG_EXT4_FS_SECURITY
 120	&ext4_xattr_security_handler,
 121#endif
 122	NULL
 123};
 124
 
 
 
 125static __le32 ext4_xattr_block_csum(struct inode *inode,
 126				    sector_t block_nr,
 127				    struct ext4_xattr_header *hdr)
 128{
 129	struct ext4_sb_info *sbi = EXT4_SB(inode->i_sb);
 130	__u32 csum, old;
 
 
 131
 132	old = hdr->h_checksum;
 133	hdr->h_checksum = 0;
 134	block_nr = cpu_to_le64(block_nr);
 135	csum = ext4_chksum(sbi, sbi->s_csum_seed, (__u8 *)&block_nr,
 136			   sizeof(block_nr));
 137	csum = ext4_chksum(sbi, csum, (__u8 *)hdr,
 138			   EXT4_BLOCK_SIZE(inode->i_sb));
 139
 140	hdr->h_checksum = old;
 141	return cpu_to_le32(csum);
 142}
 143
 144static int ext4_xattr_block_csum_verify(struct inode *inode,
 145					sector_t block_nr,
 146					struct ext4_xattr_header *hdr)
 147{
 148	if (EXT4_HAS_RO_COMPAT_FEATURE(inode->i_sb,
 149		EXT4_FEATURE_RO_COMPAT_METADATA_CSUM) &&
 150	    (hdr->h_checksum != ext4_xattr_block_csum(inode, block_nr, hdr)))
 151		return 0;
 152	return 1;
 153}
 154
 155static void ext4_xattr_block_csum_set(struct inode *inode,
 156				      sector_t block_nr,
 157				      struct ext4_xattr_header *hdr)
 158{
 159	if (!EXT4_HAS_RO_COMPAT_FEATURE(inode->i_sb,
 160		EXT4_FEATURE_RO_COMPAT_METADATA_CSUM))
 161		return;
 162
 163	hdr->h_checksum = ext4_xattr_block_csum(inode, block_nr, hdr);
 164}
 165
 166static inline int ext4_handle_dirty_xattr_block(handle_t *handle,
 167						struct inode *inode,
 168						struct buffer_head *bh)
 169{
 170	ext4_xattr_block_csum_set(inode, bh->b_blocknr, BHDR(bh));
 171	return ext4_handle_dirty_metadata(handle, inode, bh);
 172}
 173
 174static inline const struct xattr_handler *
 175ext4_xattr_handler(int name_index)
 176{
 177	const struct xattr_handler *handler = NULL;
 178
 179	if (name_index > 0 && name_index < ARRAY_SIZE(ext4_xattr_handler_map))
 180		handler = ext4_xattr_handler_map[name_index];
 181	return handler;
 182}
 183
 184/*
 185 * Inode operation listxattr()
 186 *
 187 * dentry->d_inode->i_mutex: don't care
 188 */
 189ssize_t
 190ext4_listxattr(struct dentry *dentry, char *buffer, size_t size)
 191{
 192	return ext4_xattr_list(dentry, buffer, size);
 193}
 194
 195static int
 196ext4_xattr_check_names(struct ext4_xattr_entry *entry, void *end)
 197{
 198	while (!IS_LAST_ENTRY(entry)) {
 199		struct ext4_xattr_entry *next = EXT4_XATTR_NEXT(entry);
 200		if ((void *)next >= end)
 201			return -EIO;
 202		entry = next;
 203	}
 204	return 0;
 205}
 206
 207static inline int
 208ext4_xattr_check_block(struct inode *inode, struct buffer_head *bh)
 209{
 210	int error;
 211
 212	if (buffer_verified(bh))
 213		return 0;
 214
 215	if (BHDR(bh)->h_magic != cpu_to_le32(EXT4_XATTR_MAGIC) ||
 216	    BHDR(bh)->h_blocks != cpu_to_le32(1))
 217		return -EIO;
 218	if (!ext4_xattr_block_csum_verify(inode, bh->b_blocknr, BHDR(bh)))
 219		return -EIO;
 220	error = ext4_xattr_check_names(BFIRST(bh), bh->b_data + bh->b_size);
 221	if (!error)
 222		set_buffer_verified(bh);
 223	return error;
 224}
 225
 226static inline int
 227ext4_xattr_check_entry(struct ext4_xattr_entry *entry, size_t size)
 228{
 229	size_t value_size = le32_to_cpu(entry->e_value_size);
 230
 231	if (entry->e_value_block != 0 || value_size > size ||
 232	    le16_to_cpu(entry->e_value_offs) + value_size > size)
 233		return -EIO;
 234	return 0;
 235}
 236
 237static int
 238ext4_xattr_find_entry(struct ext4_xattr_entry **pentry, int name_index,
 239		      const char *name, size_t size, int sorted)
 240{
 241	struct ext4_xattr_entry *entry;
 242	size_t name_len;
 243	int cmp = 1;
 244
 245	if (name == NULL)
 246		return -EINVAL;
 247	name_len = strlen(name);
 248	entry = *pentry;
 249	for (; !IS_LAST_ENTRY(entry); entry = EXT4_XATTR_NEXT(entry)) {
 250		cmp = name_index - entry->e_name_index;
 251		if (!cmp)
 252			cmp = name_len - entry->e_name_len;
 253		if (!cmp)
 254			cmp = memcmp(name, entry->e_name, name_len);
 255		if (cmp <= 0 && (sorted || cmp == 0))
 256			break;
 257	}
 258	*pentry = entry;
 259	if (!cmp && ext4_xattr_check_entry(entry, size))
 260			return -EIO;
 261	return cmp ? -ENODATA : 0;
 262}
 263
 264static int
 265ext4_xattr_block_get(struct inode *inode, int name_index, const char *name,
 266		     void *buffer, size_t buffer_size)
 267{
 268	struct buffer_head *bh = NULL;
 269	struct ext4_xattr_entry *entry;
 270	size_t size;
 271	int error;
 
 272
 273	ea_idebug(inode, "name=%d.%s, buffer=%p, buffer_size=%ld",
 274		  name_index, name, buffer, (long)buffer_size);
 275
 276	error = -ENODATA;
 277	if (!EXT4_I(inode)->i_file_acl)
 278		goto cleanup;
 279	ea_idebug(inode, "reading block %llu",
 280		  (unsigned long long)EXT4_I(inode)->i_file_acl);
 281	bh = sb_bread(inode->i_sb, EXT4_I(inode)->i_file_acl);
 282	if (!bh)
 283		goto cleanup;
 284	ea_bdebug(bh, "b_count=%d, refcount=%d",
 285		atomic_read(&(bh->b_count)), le32_to_cpu(BHDR(bh)->h_refcount));
 286	if (ext4_xattr_check_block(inode, bh)) {
 287bad_block:
 288		EXT4_ERROR_INODE(inode, "bad block %llu",
 289				 EXT4_I(inode)->i_file_acl);
 290		error = -EIO;
 291		goto cleanup;
 292	}
 293	ext4_xattr_cache_insert(bh);
 294	entry = BFIRST(bh);
 295	error = ext4_xattr_find_entry(&entry, name_index, name, bh->b_size, 1);
 296	if (error == -EIO)
 297		goto bad_block;
 298	if (error)
 299		goto cleanup;
 300	size = le32_to_cpu(entry->e_value_size);
 301	if (buffer) {
 302		error = -ERANGE;
 303		if (size > buffer_size)
 304			goto cleanup;
 305		memcpy(buffer, bh->b_data + le16_to_cpu(entry->e_value_offs),
 306		       size);
 307	}
 308	error = size;
 309
 310cleanup:
 311	brelse(bh);
 312	return error;
 313}
 314
 315static int
 316ext4_xattr_ibody_get(struct inode *inode, int name_index, const char *name,
 317		     void *buffer, size_t buffer_size)
 318{
 319	struct ext4_xattr_ibody_header *header;
 320	struct ext4_xattr_entry *entry;
 321	struct ext4_inode *raw_inode;
 322	struct ext4_iloc iloc;
 323	size_t size;
 324	void *end;
 325	int error;
 326
 327	if (!ext4_test_inode_state(inode, EXT4_STATE_XATTR))
 328		return -ENODATA;
 329	error = ext4_get_inode_loc(inode, &iloc);
 330	if (error)
 331		return error;
 332	raw_inode = ext4_raw_inode(&iloc);
 333	header = IHDR(inode, raw_inode);
 334	entry = IFIRST(header);
 335	end = (void *)raw_inode + EXT4_SB(inode->i_sb)->s_inode_size;
 336	error = ext4_xattr_check_names(entry, end);
 337	if (error)
 338		goto cleanup;
 339	error = ext4_xattr_find_entry(&entry, name_index, name,
 340				      end - (void *)entry, 0);
 341	if (error)
 342		goto cleanup;
 343	size = le32_to_cpu(entry->e_value_size);
 344	if (buffer) {
 345		error = -ERANGE;
 346		if (size > buffer_size)
 347			goto cleanup;
 348		memcpy(buffer, (void *)IFIRST(header) +
 349		       le16_to_cpu(entry->e_value_offs), size);
 350	}
 351	error = size;
 352
 353cleanup:
 354	brelse(iloc.bh);
 355	return error;
 356}
 357
 358/*
 359 * ext4_xattr_get()
 360 *
 361 * Copy an extended attribute into the buffer
 362 * provided, or compute the buffer size required.
 363 * Buffer is NULL to compute the size of the buffer required.
 364 *
 365 * Returns a negative error number on failure, or the number of bytes
 366 * used / required on success.
 367 */
 368int
 369ext4_xattr_get(struct inode *inode, int name_index, const char *name,
 370	       void *buffer, size_t buffer_size)
 371{
 372	int error;
 373
 374	down_read(&EXT4_I(inode)->xattr_sem);
 375	error = ext4_xattr_ibody_get(inode, name_index, name, buffer,
 376				     buffer_size);
 377	if (error == -ENODATA)
 378		error = ext4_xattr_block_get(inode, name_index, name, buffer,
 379					     buffer_size);
 380	up_read(&EXT4_I(inode)->xattr_sem);
 381	return error;
 382}
 383
 384static int
 385ext4_xattr_list_entries(struct dentry *dentry, struct ext4_xattr_entry *entry,
 386			char *buffer, size_t buffer_size)
 387{
 388	size_t rest = buffer_size;
 389
 390	for (; !IS_LAST_ENTRY(entry); entry = EXT4_XATTR_NEXT(entry)) {
 391		const struct xattr_handler *handler =
 392			ext4_xattr_handler(entry->e_name_index);
 393
 394		if (handler) {
 395			size_t size = handler->list(dentry, buffer, rest,
 396						    entry->e_name,
 397						    entry->e_name_len,
 398						    handler->flags);
 399			if (buffer) {
 400				if (size > rest)
 401					return -ERANGE;
 402				buffer += size;
 403			}
 404			rest -= size;
 405		}
 406	}
 407	return buffer_size - rest;
 408}
 409
 410static int
 411ext4_xattr_block_list(struct dentry *dentry, char *buffer, size_t buffer_size)
 412{
 413	struct inode *inode = dentry->d_inode;
 414	struct buffer_head *bh = NULL;
 415	int error;
 
 416
 417	ea_idebug(inode, "buffer=%p, buffer_size=%ld",
 418		  buffer, (long)buffer_size);
 419
 420	error = 0;
 421	if (!EXT4_I(inode)->i_file_acl)
 422		goto cleanup;
 423	ea_idebug(inode, "reading block %llu",
 424		  (unsigned long long)EXT4_I(inode)->i_file_acl);
 425	bh = sb_bread(inode->i_sb, EXT4_I(inode)->i_file_acl);
 426	error = -EIO;
 427	if (!bh)
 428		goto cleanup;
 429	ea_bdebug(bh, "b_count=%d, refcount=%d",
 430		atomic_read(&(bh->b_count)), le32_to_cpu(BHDR(bh)->h_refcount));
 431	if (ext4_xattr_check_block(inode, bh)) {
 432		EXT4_ERROR_INODE(inode, "bad block %llu",
 433				 EXT4_I(inode)->i_file_acl);
 434		error = -EIO;
 435		goto cleanup;
 436	}
 437	ext4_xattr_cache_insert(bh);
 438	error = ext4_xattr_list_entries(dentry, BFIRST(bh), buffer, buffer_size);
 439
 440cleanup:
 441	brelse(bh);
 442
 443	return error;
 444}
 445
 446static int
 447ext4_xattr_ibody_list(struct dentry *dentry, char *buffer, size_t buffer_size)
 448{
 449	struct inode *inode = dentry->d_inode;
 450	struct ext4_xattr_ibody_header *header;
 451	struct ext4_inode *raw_inode;
 452	struct ext4_iloc iloc;
 453	void *end;
 454	int error;
 455
 456	if (!ext4_test_inode_state(inode, EXT4_STATE_XATTR))
 457		return 0;
 458	error = ext4_get_inode_loc(inode, &iloc);
 459	if (error)
 460		return error;
 461	raw_inode = ext4_raw_inode(&iloc);
 462	header = IHDR(inode, raw_inode);
 463	end = (void *)raw_inode + EXT4_SB(inode->i_sb)->s_inode_size;
 464	error = ext4_xattr_check_names(IFIRST(header), end);
 465	if (error)
 466		goto cleanup;
 467	error = ext4_xattr_list_entries(dentry, IFIRST(header),
 468					buffer, buffer_size);
 469
 470cleanup:
 471	brelse(iloc.bh);
 472	return error;
 473}
 474
 475/*
 476 * ext4_xattr_list()
 477 *
 478 * Copy a list of attribute names into the buffer
 479 * provided, or compute the buffer size required.
 480 * Buffer is NULL to compute the size of the buffer required.
 481 *
 482 * Returns a negative error number on failure, or the number of bytes
 483 * used / required on success.
 484 */
 485static int
 486ext4_xattr_list(struct dentry *dentry, char *buffer, size_t buffer_size)
 487{
 488	int ret, ret2;
 489
 490	down_read(&EXT4_I(dentry->d_inode)->xattr_sem);
 491	ret = ret2 = ext4_xattr_ibody_list(dentry, buffer, buffer_size);
 492	if (ret < 0)
 493		goto errout;
 494	if (buffer) {
 495		buffer += ret;
 496		buffer_size -= ret;
 497	}
 498	ret = ext4_xattr_block_list(dentry, buffer, buffer_size);
 499	if (ret < 0)
 500		goto errout;
 501	ret += ret2;
 502errout:
 503	up_read(&EXT4_I(dentry->d_inode)->xattr_sem);
 504	return ret;
 505}
 506
 507/*
 508 * If the EXT4_FEATURE_COMPAT_EXT_ATTR feature of this file system is
 509 * not set, set it.
 510 */
 511static void ext4_xattr_update_super_block(handle_t *handle,
 512					  struct super_block *sb)
 513{
 514	if (EXT4_HAS_COMPAT_FEATURE(sb, EXT4_FEATURE_COMPAT_EXT_ATTR))
 515		return;
 516
 517	if (ext4_journal_get_write_access(handle, EXT4_SB(sb)->s_sbh) == 0) {
 518		EXT4_SET_COMPAT_FEATURE(sb, EXT4_FEATURE_COMPAT_EXT_ATTR);
 519		ext4_handle_dirty_super(handle, sb);
 520	}
 521}
 522
 523/*
 524 * Release the xattr block BH: If the reference count is > 1, decrement
 525 * it; otherwise free the block.
 526 */
 527static void
 528ext4_xattr_release_block(handle_t *handle, struct inode *inode,
 529			 struct buffer_head *bh)
 530{
 531	struct mb_cache_entry *ce = NULL;
 532	int error = 0;
 
 533
 534	ce = mb_cache_entry_get(ext4_xattr_cache, bh->b_bdev, bh->b_blocknr);
 535	error = ext4_journal_get_write_access(handle, bh);
 536	if (error)
 537		goto out;
 538
 539	lock_buffer(bh);
 540	if (BHDR(bh)->h_refcount == cpu_to_le32(1)) {
 541		ea_bdebug(bh, "refcount now=0; freeing");
 542		if (ce)
 543			mb_cache_entry_free(ce);
 544		get_bh(bh);
 
 545		ext4_free_blocks(handle, inode, bh, 0, 1,
 546				 EXT4_FREE_BLOCKS_METADATA |
 547				 EXT4_FREE_BLOCKS_FORGET);
 548		unlock_buffer(bh);
 549	} else {
 550		le32_add_cpu(&BHDR(bh)->h_refcount, -1);
 551		if (ce)
 552			mb_cache_entry_release(ce);
 
 
 
 
 
 
 
 
 
 
 
 
 
 553		unlock_buffer(bh);
 554		error = ext4_handle_dirty_xattr_block(handle, inode, bh);
 
 
 555		if (IS_SYNC(inode))
 556			ext4_handle_sync(handle);
 557		dquot_free_block(inode, 1);
 558		ea_bdebug(bh, "refcount now=%d; releasing",
 559			  le32_to_cpu(BHDR(bh)->h_refcount));
 560	}
 561out:
 562	ext4_std_error(inode->i_sb, error);
 563	return;
 564}
 565
 566/*
 567 * Find the available free space for EAs. This also returns the total number of
 568 * bytes used by EA entries.
 569 */
 570static size_t ext4_xattr_free_space(struct ext4_xattr_entry *last,
 571				    size_t *min_offs, void *base, int *total)
 572{
 573	for (; !IS_LAST_ENTRY(last); last = EXT4_XATTR_NEXT(last)) {
 574		*total += EXT4_XATTR_LEN(last->e_name_len);
 575		if (!last->e_value_block && last->e_value_size) {
 576			size_t offs = le16_to_cpu(last->e_value_offs);
 577			if (offs < *min_offs)
 578				*min_offs = offs;
 579		}
 
 
 580	}
 581	return (*min_offs - ((void *)last - base) - sizeof(__u32));
 582}
 583
 584struct ext4_xattr_info {
 585	int name_index;
 586	const char *name;
 587	const void *value;
 588	size_t value_len;
 589};
 590
 591struct ext4_xattr_search {
 592	struct ext4_xattr_entry *first;
 593	void *base;
 594	void *end;
 595	struct ext4_xattr_entry *here;
 596	int not_found;
 597};
 598
 599static int
 600ext4_xattr_set_entry(struct ext4_xattr_info *i, struct ext4_xattr_search *s)
 601{
 602	struct ext4_xattr_entry *last;
 603	size_t free, min_offs = s->end - s->base, name_len = strlen(i->name);
 604
 605	/* Compute min_offs and last. */
 606	last = s->first;
 607	for (; !IS_LAST_ENTRY(last); last = EXT4_XATTR_NEXT(last)) {
 608		if (!last->e_value_block && last->e_value_size) {
 609			size_t offs = le16_to_cpu(last->e_value_offs);
 610			if (offs < min_offs)
 611				min_offs = offs;
 612		}
 613	}
 614	free = min_offs - ((void *)last - s->base) - sizeof(__u32);
 615	if (!s->not_found) {
 616		if (!s->here->e_value_block && s->here->e_value_size) {
 617			size_t size = le32_to_cpu(s->here->e_value_size);
 618			free += EXT4_XATTR_SIZE(size);
 619		}
 620		free += EXT4_XATTR_LEN(name_len);
 621	}
 622	if (i->value) {
 623		if (free < EXT4_XATTR_SIZE(i->value_len) ||
 624		    free < EXT4_XATTR_LEN(name_len) +
 625			   EXT4_XATTR_SIZE(i->value_len))
 626			return -ENOSPC;
 627	}
 628
 629	if (i->value && s->not_found) {
 630		/* Insert the new name. */
 631		size_t size = EXT4_XATTR_LEN(name_len);
 632		size_t rest = (void *)last - (void *)s->here + sizeof(__u32);
 633		memmove((void *)s->here + size, s->here, rest);
 634		memset(s->here, 0, size);
 635		s->here->e_name_index = i->name_index;
 636		s->here->e_name_len = name_len;
 637		memcpy(s->here->e_name, i->name, name_len);
 638	} else {
 639		if (!s->here->e_value_block && s->here->e_value_size) {
 640			void *first_val = s->base + min_offs;
 641			size_t offs = le16_to_cpu(s->here->e_value_offs);
 642			void *val = s->base + offs;
 643			size_t size = EXT4_XATTR_SIZE(
 644				le32_to_cpu(s->here->e_value_size));
 645
 646			if (i->value && size == EXT4_XATTR_SIZE(i->value_len)) {
 647				/* The old and the new value have the same
 648				   size. Just replace. */
 649				s->here->e_value_size =
 650					cpu_to_le32(i->value_len);
 651				memset(val + size - EXT4_XATTR_PAD, 0,
 652				       EXT4_XATTR_PAD); /* Clear pad bytes. */
 653				memcpy(val, i->value, i->value_len);
 
 
 
 
 
 654				return 0;
 655			}
 656
 657			/* Remove the old value. */
 658			memmove(first_val + size, first_val, val - first_val);
 659			memset(first_val, 0, size);
 660			s->here->e_value_size = 0;
 661			s->here->e_value_offs = 0;
 662			min_offs += size;
 663
 664			/* Adjust all value offsets. */
 665			last = s->first;
 666			while (!IS_LAST_ENTRY(last)) {
 667				size_t o = le16_to_cpu(last->e_value_offs);
 668				if (!last->e_value_block &&
 669				    last->e_value_size && o < offs)
 670					last->e_value_offs =
 671						cpu_to_le16(o + size);
 672				last = EXT4_XATTR_NEXT(last);
 673			}
 674		}
 675		if (!i->value) {
 676			/* Remove the old name. */
 677			size_t size = EXT4_XATTR_LEN(name_len);
 678			last = ENTRY((void *)last - size);
 679			memmove(s->here, (void *)s->here + size,
 680				(void *)last - (void *)s->here + sizeof(__u32));
 681			memset(last, 0, size);
 682		}
 683	}
 684
 685	if (i->value) {
 686		/* Insert the new value. */
 687		s->here->e_value_size = cpu_to_le32(i->value_len);
 688		if (i->value_len) {
 689			size_t size = EXT4_XATTR_SIZE(i->value_len);
 690			void *val = s->base + min_offs - size;
 691			s->here->e_value_offs = cpu_to_le16(min_offs - size);
 692			memset(val + size - EXT4_XATTR_PAD, 0,
 693			       EXT4_XATTR_PAD); /* Clear the pad bytes. */
 694			memcpy(val, i->value, i->value_len);
 
 
 
 
 
 695		}
 696	}
 697	return 0;
 698}
 699
 700struct ext4_xattr_block_find {
 701	struct ext4_xattr_search s;
 702	struct buffer_head *bh;
 703};
 704
 705static int
 706ext4_xattr_block_find(struct inode *inode, struct ext4_xattr_info *i,
 707		      struct ext4_xattr_block_find *bs)
 708{
 709	struct super_block *sb = inode->i_sb;
 710	int error;
 711
 712	ea_idebug(inode, "name=%d.%s, value=%p, value_len=%ld",
 713		  i->name_index, i->name, i->value, (long)i->value_len);
 714
 715	if (EXT4_I(inode)->i_file_acl) {
 716		/* The inode already has an extended attribute block. */
 717		bs->bh = sb_bread(sb, EXT4_I(inode)->i_file_acl);
 718		error = -EIO;
 719		if (!bs->bh)
 720			goto cleanup;
 721		ea_bdebug(bs->bh, "b_count=%d, refcount=%d",
 722			atomic_read(&(bs->bh->b_count)),
 723			le32_to_cpu(BHDR(bs->bh)->h_refcount));
 724		if (ext4_xattr_check_block(inode, bs->bh)) {
 725			EXT4_ERROR_INODE(inode, "bad block %llu",
 726					 EXT4_I(inode)->i_file_acl);
 727			error = -EIO;
 728			goto cleanup;
 729		}
 730		/* Find the named attribute. */
 731		bs->s.base = BHDR(bs->bh);
 732		bs->s.first = BFIRST(bs->bh);
 733		bs->s.end = bs->bh->b_data + bs->bh->b_size;
 734		bs->s.here = bs->s.first;
 735		error = ext4_xattr_find_entry(&bs->s.here, i->name_index,
 736					      i->name, bs->bh->b_size, 1);
 737		if (error && error != -ENODATA)
 738			goto cleanup;
 739		bs->s.not_found = error;
 740	}
 741	error = 0;
 742
 743cleanup:
 744	return error;
 745}
 746
 747static int
 748ext4_xattr_block_set(handle_t *handle, struct inode *inode,
 749		     struct ext4_xattr_info *i,
 750		     struct ext4_xattr_block_find *bs)
 751{
 752	struct super_block *sb = inode->i_sb;
 753	struct buffer_head *new_bh = NULL;
 754	struct ext4_xattr_search *s = &bs->s;
 755	struct mb_cache_entry *ce = NULL;
 756	int error = 0;
 
 757
 758#define header(x) ((struct ext4_xattr_header *)(x))
 759
 760	if (i->value && i->value_len > sb->s_blocksize)
 761		return -ENOSPC;
 762	if (s->base) {
 763		ce = mb_cache_entry_get(ext4_xattr_cache, bs->bh->b_bdev,
 764					bs->bh->b_blocknr);
 765		error = ext4_journal_get_write_access(handle, bs->bh);
 766		if (error)
 767			goto cleanup;
 768		lock_buffer(bs->bh);
 769
 770		if (header(s->base)->h_refcount == cpu_to_le32(1)) {
 771			if (ce) {
 772				mb_cache_entry_free(ce);
 773				ce = NULL;
 774			}
 775			ea_bdebug(bs->bh, "modifying in-place");
 776			error = ext4_xattr_set_entry(i, s);
 777			if (!error) {
 778				if (!IS_LAST_ENTRY(s->first))
 779					ext4_xattr_rehash(header(s->base),
 780							  s->here);
 781				ext4_xattr_cache_insert(bs->bh);
 
 782			}
 783			unlock_buffer(bs->bh);
 784			if (error == -EIO)
 785				goto bad_block;
 786			if (!error)
 787				error = ext4_handle_dirty_xattr_block(handle,
 788								      inode,
 789								      bs->bh);
 790			if (error)
 791				goto cleanup;
 792			goto inserted;
 793		} else {
 794			int offset = (char *)s->here - bs->bh->b_data;
 795
 796			unlock_buffer(bs->bh);
 797			ext4_handle_release_buffer(handle, bs->bh);
 798			if (ce) {
 799				mb_cache_entry_release(ce);
 800				ce = NULL;
 801			}
 802			ea_bdebug(bs->bh, "cloning");
 803			s->base = kmalloc(bs->bh->b_size, GFP_NOFS);
 804			error = -ENOMEM;
 805			if (s->base == NULL)
 806				goto cleanup;
 807			memcpy(s->base, BHDR(bs->bh), bs->bh->b_size);
 808			s->first = ENTRY(header(s->base)+1);
 809			header(s->base)->h_refcount = cpu_to_le32(1);
 810			s->here = ENTRY(s->base + offset);
 811			s->end = s->base + bs->bh->b_size;
 812		}
 813	} else {
 814		/* Allocate a buffer where we construct the new block. */
 815		s->base = kzalloc(sb->s_blocksize, GFP_NOFS);
 816		/* assert(header == s->base) */
 817		error = -ENOMEM;
 818		if (s->base == NULL)
 819			goto cleanup;
 820		header(s->base)->h_magic = cpu_to_le32(EXT4_XATTR_MAGIC);
 821		header(s->base)->h_blocks = cpu_to_le32(1);
 822		header(s->base)->h_refcount = cpu_to_le32(1);
 823		s->first = ENTRY(header(s->base)+1);
 824		s->here = ENTRY(header(s->base)+1);
 825		s->end = s->base + sb->s_blocksize;
 826	}
 827
 828	error = ext4_xattr_set_entry(i, s);
 829	if (error == -EIO)
 830		goto bad_block;
 831	if (error)
 832		goto cleanup;
 833	if (!IS_LAST_ENTRY(s->first))
 834		ext4_xattr_rehash(header(s->base), s->here);
 835
 836inserted:
 837	if (!IS_LAST_ENTRY(s->first)) {
 838		new_bh = ext4_xattr_cache_find(inode, header(s->base), &ce);
 839		if (new_bh) {
 840			/* We found an identical block in the cache. */
 841			if (new_bh == bs->bh)
 842				ea_bdebug(new_bh, "keeping");
 843			else {
 844				/* The old block is released after updating
 845				   the inode. */
 846				error = dquot_alloc_block(inode, 1);
 
 847				if (error)
 848					goto cleanup;
 849				error = ext4_journal_get_write_access(handle,
 850								      new_bh);
 851				if (error)
 852					goto cleanup_dquot;
 853				lock_buffer(new_bh);
 854				le32_add_cpu(&BHDR(new_bh)->h_refcount, 1);
 855				ea_bdebug(new_bh, "reusing; refcount now=%d",
 856					le32_to_cpu(BHDR(new_bh)->h_refcount));
 857				unlock_buffer(new_bh);
 858				error = ext4_handle_dirty_xattr_block(handle,
 859								      inode,
 860								      new_bh);
 861				if (error)
 862					goto cleanup_dquot;
 863			}
 864			mb_cache_entry_release(ce);
 865			ce = NULL;
 866		} else if (bs->bh && s->base == bs->bh->b_data) {
 867			/* We were modifying this block in-place. */
 868			ea_bdebug(bs->bh, "keeping this block");
 869			new_bh = bs->bh;
 870			get_bh(new_bh);
 871		} else {
 872			/* We need to allocate a new block */
 873			ext4_fsblk_t goal, block;
 874
 875			goal = ext4_group_first_block_no(sb,
 876						EXT4_I(inode)->i_block_group);
 877
 878			/* non-extent files can't have physical blocks past 2^32 */
 879			if (!(ext4_test_inode_flag(inode, EXT4_INODE_EXTENTS)))
 880				goal = goal & EXT4_MAX_BLOCK_FILE_PHYS;
 881
 882			/*
 883			 * take i_data_sem because we will test
 884			 * i_delalloc_reserved_flag in ext4_mb_new_blocks
 885			 */
 886			down_read((&EXT4_I(inode)->i_data_sem));
 887			block = ext4_new_meta_blocks(handle, inode, goal, 0,
 888						     NULL, &error);
 889			up_read((&EXT4_I(inode)->i_data_sem));
 890			if (error)
 891				goto cleanup;
 892
 893			if (!(ext4_test_inode_flag(inode, EXT4_INODE_EXTENTS)))
 894				BUG_ON(block > EXT4_MAX_BLOCK_FILE_PHYS);
 895
 896			ea_idebug(inode, "creating block %llu",
 897				  (unsigned long long)block);
 898
 899			new_bh = sb_getblk(sb, block);
 900			if (!new_bh) {
 
 901getblk_failed:
 902				ext4_free_blocks(handle, inode, NULL, block, 1,
 903						 EXT4_FREE_BLOCKS_METADATA);
 904				error = -EIO;
 905				goto cleanup;
 906			}
 907			lock_buffer(new_bh);
 908			error = ext4_journal_get_create_access(handle, new_bh);
 909			if (error) {
 910				unlock_buffer(new_bh);
 
 911				goto getblk_failed;
 912			}
 913			memcpy(new_bh->b_data, s->base, new_bh->b_size);
 914			set_buffer_uptodate(new_bh);
 915			unlock_buffer(new_bh);
 916			ext4_xattr_cache_insert(new_bh);
 917			error = ext4_handle_dirty_xattr_block(handle,
 918							      inode, new_bh);
 919			if (error)
 920				goto cleanup;
 921		}
 922	}
 923
 924	/* Update the inode. */
 925	EXT4_I(inode)->i_file_acl = new_bh ? new_bh->b_blocknr : 0;
 926
 927	/* Drop the previous xattr block. */
 928	if (bs->bh && bs->bh != new_bh)
 929		ext4_xattr_release_block(handle, inode, bs->bh);
 930	error = 0;
 931
 932cleanup:
 933	if (ce)
 934		mb_cache_entry_release(ce);
 935	brelse(new_bh);
 936	if (!(bs->bh && s->base == bs->bh->b_data))
 937		kfree(s->base);
 938
 939	return error;
 940
 941cleanup_dquot:
 942	dquot_free_block(inode, 1);
 943	goto cleanup;
 944
 945bad_block:
 946	EXT4_ERROR_INODE(inode, "bad block %llu",
 947			 EXT4_I(inode)->i_file_acl);
 948	goto cleanup;
 949
 950#undef header
 951}
 952
 953struct ext4_xattr_ibody_find {
 954	struct ext4_xattr_search s;
 955	struct ext4_iloc iloc;
 956};
 957
 958static int
 959ext4_xattr_ibody_find(struct inode *inode, struct ext4_xattr_info *i,
 960		      struct ext4_xattr_ibody_find *is)
 961{
 962	struct ext4_xattr_ibody_header *header;
 963	struct ext4_inode *raw_inode;
 964	int error;
 965
 966	if (EXT4_I(inode)->i_extra_isize == 0)
 967		return 0;
 968	raw_inode = ext4_raw_inode(&is->iloc);
 969	header = IHDR(inode, raw_inode);
 970	is->s.base = is->s.first = IFIRST(header);
 971	is->s.here = is->s.first;
 972	is->s.end = (void *)raw_inode + EXT4_SB(inode->i_sb)->s_inode_size;
 973	if (ext4_test_inode_state(inode, EXT4_STATE_XATTR)) {
 974		error = ext4_xattr_check_names(IFIRST(header), is->s.end);
 975		if (error)
 976			return error;
 977		/* Find the named attribute. */
 978		error = ext4_xattr_find_entry(&is->s.here, i->name_index,
 979					      i->name, is->s.end -
 980					      (void *)is->s.base, 0);
 981		if (error && error != -ENODATA)
 982			return error;
 983		is->s.not_found = error;
 984	}
 985	return 0;
 986}
 987
 988static int
 989ext4_xattr_ibody_set(handle_t *handle, struct inode *inode,
 990		     struct ext4_xattr_info *i,
 991		     struct ext4_xattr_ibody_find *is)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 992{
 993	struct ext4_xattr_ibody_header *header;
 994	struct ext4_xattr_search *s = &is->s;
 995	int error;
 996
 997	if (EXT4_I(inode)->i_extra_isize == 0)
 998		return -ENOSPC;
 999	error = ext4_xattr_set_entry(i, s);
1000	if (error)
1001		return error;
1002	header = IHDR(inode, ext4_raw_inode(&is->iloc));
1003	if (!IS_LAST_ENTRY(s->first)) {
1004		header->h_magic = cpu_to_le32(EXT4_XATTR_MAGIC);
1005		ext4_set_inode_state(inode, EXT4_STATE_XATTR);
1006	} else {
1007		header->h_magic = cpu_to_le32(0);
1008		ext4_clear_inode_state(inode, EXT4_STATE_XATTR);
1009	}
1010	return 0;
1011}
1012
1013/*
1014 * ext4_xattr_set_handle()
1015 *
1016 * Create, replace or remove an extended attribute for this inode.  Value
1017 * is NULL to remove an existing extended attribute, and non-NULL to
1018 * either replace an existing extended attribute, or create a new extended
1019 * attribute. The flags XATTR_REPLACE and XATTR_CREATE
1020 * specify that an extended attribute must exist and must not exist
1021 * previous to the call, respectively.
1022 *
1023 * Returns 0, or a negative error number on failure.
1024 */
1025int
1026ext4_xattr_set_handle(handle_t *handle, struct inode *inode, int name_index,
1027		      const char *name, const void *value, size_t value_len,
1028		      int flags)
1029{
1030	struct ext4_xattr_info i = {
1031		.name_index = name_index,
1032		.name = name,
1033		.value = value,
1034		.value_len = value_len,
1035
1036	};
1037	struct ext4_xattr_ibody_find is = {
1038		.s = { .not_found = -ENODATA, },
1039	};
1040	struct ext4_xattr_block_find bs = {
1041		.s = { .not_found = -ENODATA, },
1042	};
1043	unsigned long no_expand;
1044	int error;
1045
1046	if (!name)
1047		return -EINVAL;
1048	if (strlen(name) > 255)
1049		return -ERANGE;
1050	down_write(&EXT4_I(inode)->xattr_sem);
1051	no_expand = ext4_test_inode_state(inode, EXT4_STATE_NO_EXPAND);
1052	ext4_set_inode_state(inode, EXT4_STATE_NO_EXPAND);
1053
1054	error = ext4_reserve_inode_write(handle, inode, &is.iloc);
1055	if (error)
1056		goto cleanup;
1057
1058	if (ext4_test_inode_state(inode, EXT4_STATE_NEW)) {
1059		struct ext4_inode *raw_inode = ext4_raw_inode(&is.iloc);
1060		memset(raw_inode, 0, EXT4_SB(inode->i_sb)->s_inode_size);
1061		ext4_clear_inode_state(inode, EXT4_STATE_NEW);
1062	}
1063
1064	error = ext4_xattr_ibody_find(inode, &i, &is);
1065	if (error)
1066		goto cleanup;
1067	if (is.s.not_found)
1068		error = ext4_xattr_block_find(inode, &i, &bs);
1069	if (error)
1070		goto cleanup;
1071	if (is.s.not_found && bs.s.not_found) {
1072		error = -ENODATA;
1073		if (flags & XATTR_REPLACE)
1074			goto cleanup;
1075		error = 0;
1076		if (!value)
1077			goto cleanup;
1078	} else {
1079		error = -EEXIST;
1080		if (flags & XATTR_CREATE)
1081			goto cleanup;
1082	}
1083	if (!value) {
1084		if (!is.s.not_found)
1085			error = ext4_xattr_ibody_set(handle, inode, &i, &is);
1086		else if (!bs.s.not_found)
1087			error = ext4_xattr_block_set(handle, inode, &i, &bs);
1088	} else {
1089		error = ext4_xattr_ibody_set(handle, inode, &i, &is);
1090		if (!error && !bs.s.not_found) {
1091			i.value = NULL;
1092			error = ext4_xattr_block_set(handle, inode, &i, &bs);
1093		} else if (error == -ENOSPC) {
1094			if (EXT4_I(inode)->i_file_acl && !bs.s.base) {
1095				error = ext4_xattr_block_find(inode, &i, &bs);
1096				if (error)
1097					goto cleanup;
1098			}
1099			error = ext4_xattr_block_set(handle, inode, &i, &bs);
1100			if (error)
1101				goto cleanup;
1102			if (!is.s.not_found) {
1103				i.value = NULL;
1104				error = ext4_xattr_ibody_set(handle, inode, &i,
1105							     &is);
1106			}
1107		}
1108	}
1109	if (!error) {
1110		ext4_xattr_update_super_block(handle, inode->i_sb);
1111		inode->i_ctime = ext4_current_time(inode);
1112		if (!value)
1113			ext4_clear_inode_state(inode, EXT4_STATE_NO_EXPAND);
1114		error = ext4_mark_iloc_dirty(handle, inode, &is.iloc);
1115		/*
1116		 * The bh is consumed by ext4_mark_iloc_dirty, even with
1117		 * error != 0.
1118		 */
1119		is.iloc.bh = NULL;
1120		if (IS_SYNC(inode))
1121			ext4_handle_sync(handle);
1122	}
1123
1124cleanup:
1125	brelse(is.iloc.bh);
1126	brelse(bs.bh);
1127	if (no_expand == 0)
1128		ext4_clear_inode_state(inode, EXT4_STATE_NO_EXPAND);
1129	up_write(&EXT4_I(inode)->xattr_sem);
1130	return error;
1131}
1132
1133/*
1134 * ext4_xattr_set()
1135 *
1136 * Like ext4_xattr_set_handle, but start from an inode. This extended
1137 * attribute modification is a filesystem transaction by itself.
1138 *
1139 * Returns 0, or a negative error number on failure.
1140 */
1141int
1142ext4_xattr_set(struct inode *inode, int name_index, const char *name,
1143	       const void *value, size_t value_len, int flags)
1144{
1145	handle_t *handle;
1146	int error, retries = 0;
 
1147
1148retry:
1149	handle = ext4_journal_start(inode, EXT4_DATA_TRANS_BLOCKS(inode->i_sb));
1150	if (IS_ERR(handle)) {
1151		error = PTR_ERR(handle);
1152	} else {
1153		int error2;
1154
1155		error = ext4_xattr_set_handle(handle, inode, name_index, name,
1156					      value, value_len, flags);
1157		error2 = ext4_journal_stop(handle);
1158		if (error == -ENOSPC &&
1159		    ext4_should_retry_alloc(inode->i_sb, &retries))
1160			goto retry;
1161		if (error == 0)
1162			error = error2;
1163	}
1164
1165	return error;
1166}
1167
1168/*
1169 * Shift the EA entries in the inode to create space for the increased
1170 * i_extra_isize.
1171 */
1172static void ext4_xattr_shift_entries(struct ext4_xattr_entry *entry,
1173				     int value_offs_shift, void *to,
1174				     void *from, size_t n, int blocksize)
1175{
1176	struct ext4_xattr_entry *last = entry;
1177	int new_offs;
1178
1179	/* Adjust the value offsets of the entries */
1180	for (; !IS_LAST_ENTRY(last); last = EXT4_XATTR_NEXT(last)) {
1181		if (!last->e_value_block && last->e_value_size) {
1182			new_offs = le16_to_cpu(last->e_value_offs) +
1183							value_offs_shift;
1184			BUG_ON(new_offs + le32_to_cpu(last->e_value_size)
1185				 > blocksize);
1186			last->e_value_offs = cpu_to_le16(new_offs);
1187		}
1188	}
1189	/* Shift the entries by n bytes */
1190	memmove(to, from, n);
1191}
1192
1193/*
1194 * Expand an inode by new_extra_isize bytes when EAs are present.
1195 * Returns 0 on success or negative error number on failure.
1196 */
1197int ext4_expand_extra_isize_ea(struct inode *inode, int new_extra_isize,
1198			       struct ext4_inode *raw_inode, handle_t *handle)
1199{
1200	struct ext4_xattr_ibody_header *header;
1201	struct ext4_xattr_entry *entry, *last, *first;
1202	struct buffer_head *bh = NULL;
1203	struct ext4_xattr_ibody_find *is = NULL;
1204	struct ext4_xattr_block_find *bs = NULL;
1205	char *buffer = NULL, *b_entry_name = NULL;
1206	size_t min_offs, free;
1207	int total_ino, total_blk;
1208	void *base, *start, *end;
1209	int extra_isize = 0, error = 0, tried_min_extra_isize = 0;
1210	int s_min_extra_isize = le16_to_cpu(EXT4_SB(inode->i_sb)->s_es->s_min_extra_isize);
1211
1212	down_write(&EXT4_I(inode)->xattr_sem);
1213retry:
1214	if (EXT4_I(inode)->i_extra_isize >= new_extra_isize) {
1215		up_write(&EXT4_I(inode)->xattr_sem);
1216		return 0;
1217	}
1218
1219	header = IHDR(inode, raw_inode);
1220	entry = IFIRST(header);
1221
1222	/*
1223	 * Check if enough free space is available in the inode to shift the
1224	 * entries ahead by new_extra_isize.
1225	 */
1226
1227	base = start = entry;
1228	end = (void *)raw_inode + EXT4_SB(inode->i_sb)->s_inode_size;
1229	min_offs = end - base;
1230	last = entry;
1231	total_ino = sizeof(struct ext4_xattr_ibody_header);
1232
1233	free = ext4_xattr_free_space(last, &min_offs, base, &total_ino);
1234	if (free >= new_extra_isize) {
1235		entry = IFIRST(header);
1236		ext4_xattr_shift_entries(entry,	EXT4_I(inode)->i_extra_isize
1237				- new_extra_isize, (void *)raw_inode +
1238				EXT4_GOOD_OLD_INODE_SIZE + new_extra_isize,
1239				(void *)header, total_ino,
1240				inode->i_sb->s_blocksize);
1241		EXT4_I(inode)->i_extra_isize = new_extra_isize;
1242		error = 0;
1243		goto cleanup;
1244	}
1245
1246	/*
1247	 * Enough free space isn't available in the inode, check if
1248	 * EA block can hold new_extra_isize bytes.
1249	 */
1250	if (EXT4_I(inode)->i_file_acl) {
1251		bh = sb_bread(inode->i_sb, EXT4_I(inode)->i_file_acl);
1252		error = -EIO;
1253		if (!bh)
1254			goto cleanup;
1255		if (ext4_xattr_check_block(inode, bh)) {
1256			EXT4_ERROR_INODE(inode, "bad block %llu",
1257					 EXT4_I(inode)->i_file_acl);
1258			error = -EIO;
1259			goto cleanup;
1260		}
1261		base = BHDR(bh);
1262		first = BFIRST(bh);
1263		end = bh->b_data + bh->b_size;
1264		min_offs = end - base;
1265		free = ext4_xattr_free_space(first, &min_offs, base,
1266					     &total_blk);
1267		if (free < new_extra_isize) {
1268			if (!tried_min_extra_isize && s_min_extra_isize) {
1269				tried_min_extra_isize++;
1270				new_extra_isize = s_min_extra_isize;
1271				brelse(bh);
1272				goto retry;
1273			}
1274			error = -1;
1275			goto cleanup;
1276		}
1277	} else {
1278		free = inode->i_sb->s_blocksize;
1279	}
1280
1281	while (new_extra_isize > 0) {
1282		size_t offs, size, entry_size;
1283		struct ext4_xattr_entry *small_entry = NULL;
1284		struct ext4_xattr_info i = {
1285			.value = NULL,
1286			.value_len = 0,
1287		};
1288		unsigned int total_size;  /* EA entry size + value size */
1289		unsigned int shift_bytes; /* No. of bytes to shift EAs by? */
1290		unsigned int min_total_size = ~0U;
1291
1292		is = kzalloc(sizeof(struct ext4_xattr_ibody_find), GFP_NOFS);
1293		bs = kzalloc(sizeof(struct ext4_xattr_block_find), GFP_NOFS);
1294		if (!is || !bs) {
1295			error = -ENOMEM;
1296			goto cleanup;
1297		}
1298
1299		is->s.not_found = -ENODATA;
1300		bs->s.not_found = -ENODATA;
1301		is->iloc.bh = NULL;
1302		bs->bh = NULL;
1303
1304		last = IFIRST(header);
1305		/* Find the entry best suited to be pushed into EA block */
1306		entry = NULL;
1307		for (; !IS_LAST_ENTRY(last); last = EXT4_XATTR_NEXT(last)) {
1308			total_size =
1309			EXT4_XATTR_SIZE(le32_to_cpu(last->e_value_size)) +
1310					EXT4_XATTR_LEN(last->e_name_len);
1311			if (total_size <= free && total_size < min_total_size) {
1312				if (total_size < new_extra_isize) {
1313					small_entry = last;
1314				} else {
1315					entry = last;
1316					min_total_size = total_size;
1317				}
1318			}
1319		}
1320
1321		if (entry == NULL) {
1322			if (small_entry) {
1323				entry = small_entry;
1324			} else {
1325				if (!tried_min_extra_isize &&
1326				    s_min_extra_isize) {
1327					tried_min_extra_isize++;
1328					new_extra_isize = s_min_extra_isize;
 
 
 
1329					goto retry;
1330				}
1331				error = -1;
1332				goto cleanup;
1333			}
1334		}
1335		offs = le16_to_cpu(entry->e_value_offs);
1336		size = le32_to_cpu(entry->e_value_size);
1337		entry_size = EXT4_XATTR_LEN(entry->e_name_len);
1338		i.name_index = entry->e_name_index,
1339		buffer = kmalloc(EXT4_XATTR_SIZE(size), GFP_NOFS);
1340		b_entry_name = kmalloc(entry->e_name_len + 1, GFP_NOFS);
1341		if (!buffer || !b_entry_name) {
1342			error = -ENOMEM;
1343			goto cleanup;
1344		}
1345		/* Save the entry name and the entry value */
1346		memcpy(buffer, (void *)IFIRST(header) + offs,
1347		       EXT4_XATTR_SIZE(size));
1348		memcpy(b_entry_name, entry->e_name, entry->e_name_len);
1349		b_entry_name[entry->e_name_len] = '\0';
1350		i.name = b_entry_name;
1351
1352		error = ext4_get_inode_loc(inode, &is->iloc);
1353		if (error)
1354			goto cleanup;
1355
1356		error = ext4_xattr_ibody_find(inode, &i, is);
1357		if (error)
1358			goto cleanup;
1359
1360		/* Remove the chosen entry from the inode */
1361		error = ext4_xattr_ibody_set(handle, inode, &i, is);
1362		if (error)
1363			goto cleanup;
1364
1365		entry = IFIRST(header);
1366		if (entry_size + EXT4_XATTR_SIZE(size) >= new_extra_isize)
1367			shift_bytes = new_extra_isize;
1368		else
1369			shift_bytes = entry_size + size;
1370		/* Adjust the offsets and shift the remaining entries ahead */
1371		ext4_xattr_shift_entries(entry, EXT4_I(inode)->i_extra_isize -
1372			shift_bytes, (void *)raw_inode +
1373			EXT4_GOOD_OLD_INODE_SIZE + extra_isize + shift_bytes,
1374			(void *)header, total_ino - entry_size,
1375			inode->i_sb->s_blocksize);
1376
1377		extra_isize += shift_bytes;
1378		new_extra_isize -= shift_bytes;
1379		EXT4_I(inode)->i_extra_isize = extra_isize;
1380
1381		i.name = b_entry_name;
1382		i.value = buffer;
1383		i.value_len = size;
1384		error = ext4_xattr_block_find(inode, &i, bs);
1385		if (error)
1386			goto cleanup;
1387
1388		/* Add entry which was removed from the inode into the block */
1389		error = ext4_xattr_block_set(handle, inode, &i, bs);
1390		if (error)
1391			goto cleanup;
1392		kfree(b_entry_name);
1393		kfree(buffer);
1394		b_entry_name = NULL;
1395		buffer = NULL;
1396		brelse(is->iloc.bh);
1397		kfree(is);
1398		kfree(bs);
1399	}
1400	brelse(bh);
1401	up_write(&EXT4_I(inode)->xattr_sem);
1402	return 0;
1403
1404cleanup:
1405	kfree(b_entry_name);
1406	kfree(buffer);
1407	if (is)
1408		brelse(is->iloc.bh);
1409	kfree(is);
1410	kfree(bs);
1411	brelse(bh);
1412	up_write(&EXT4_I(inode)->xattr_sem);
1413	return error;
1414}
1415
1416
1417
1418/*
1419 * ext4_xattr_delete_inode()
1420 *
1421 * Free extended attribute resources associated with this inode. This
1422 * is called immediately before an inode is freed. We have exclusive
1423 * access to the inode.
1424 */
1425void
1426ext4_xattr_delete_inode(handle_t *handle, struct inode *inode)
1427{
1428	struct buffer_head *bh = NULL;
1429
1430	if (!EXT4_I(inode)->i_file_acl)
1431		goto cleanup;
1432	bh = sb_bread(inode->i_sb, EXT4_I(inode)->i_file_acl);
1433	if (!bh) {
1434		EXT4_ERROR_INODE(inode, "block %llu read error",
1435				 EXT4_I(inode)->i_file_acl);
1436		goto cleanup;
1437	}
1438	if (BHDR(bh)->h_magic != cpu_to_le32(EXT4_XATTR_MAGIC) ||
1439	    BHDR(bh)->h_blocks != cpu_to_le32(1)) {
1440		EXT4_ERROR_INODE(inode, "bad block %llu",
1441				 EXT4_I(inode)->i_file_acl);
1442		goto cleanup;
1443	}
1444	ext4_xattr_release_block(handle, inode, bh);
1445	EXT4_I(inode)->i_file_acl = 0;
1446
1447cleanup:
1448	brelse(bh);
1449}
1450
1451/*
1452 * ext4_xattr_put_super()
1453 *
1454 * This is called when a file system is unmounted.
1455 */
1456void
1457ext4_xattr_put_super(struct super_block *sb)
1458{
1459	mb_cache_shrink(sb->s_bdev);
1460}
1461
1462/*
1463 * ext4_xattr_cache_insert()
1464 *
1465 * Create a new entry in the extended attribute cache, and insert
1466 * it unless such an entry is already in the cache.
1467 *
1468 * Returns 0, or a negative error number on failure.
1469 */
1470static void
1471ext4_xattr_cache_insert(struct buffer_head *bh)
1472{
1473	__u32 hash = le32_to_cpu(BHDR(bh)->h_hash);
1474	struct mb_cache_entry *ce;
1475	int error;
1476
1477	ce = mb_cache_entry_alloc(ext4_xattr_cache, GFP_NOFS);
1478	if (!ce) {
1479		ea_bdebug(bh, "out of memory");
1480		return;
1481	}
1482	error = mb_cache_entry_insert(ce, bh->b_bdev, bh->b_blocknr, hash);
1483	if (error) {
1484		mb_cache_entry_free(ce);
1485		if (error == -EBUSY) {
1486			ea_bdebug(bh, "already in cache");
1487			error = 0;
1488		}
1489	} else {
1490		ea_bdebug(bh, "inserting [%x]", (int)hash);
1491		mb_cache_entry_release(ce);
1492	}
1493}
1494
1495/*
1496 * ext4_xattr_cmp()
1497 *
1498 * Compare two extended attribute blocks for equality.
1499 *
1500 * Returns 0 if the blocks are equal, 1 if they differ, and
1501 * a negative error number on errors.
1502 */
1503static int
1504ext4_xattr_cmp(struct ext4_xattr_header *header1,
1505	       struct ext4_xattr_header *header2)
1506{
1507	struct ext4_xattr_entry *entry1, *entry2;
1508
1509	entry1 = ENTRY(header1+1);
1510	entry2 = ENTRY(header2+1);
1511	while (!IS_LAST_ENTRY(entry1)) {
1512		if (IS_LAST_ENTRY(entry2))
1513			return 1;
1514		if (entry1->e_hash != entry2->e_hash ||
1515		    entry1->e_name_index != entry2->e_name_index ||
1516		    entry1->e_name_len != entry2->e_name_len ||
1517		    entry1->e_value_size != entry2->e_value_size ||
1518		    memcmp(entry1->e_name, entry2->e_name, entry1->e_name_len))
1519			return 1;
1520		if (entry1->e_value_block != 0 || entry2->e_value_block != 0)
1521			return -EIO;
1522		if (memcmp((char *)header1 + le16_to_cpu(entry1->e_value_offs),
1523			   (char *)header2 + le16_to_cpu(entry2->e_value_offs),
1524			   le32_to_cpu(entry1->e_value_size)))
1525			return 1;
1526
1527		entry1 = EXT4_XATTR_NEXT(entry1);
1528		entry2 = EXT4_XATTR_NEXT(entry2);
1529	}
1530	if (!IS_LAST_ENTRY(entry2))
1531		return 1;
1532	return 0;
1533}
1534
1535/*
1536 * ext4_xattr_cache_find()
1537 *
1538 * Find an identical extended attribute block.
1539 *
1540 * Returns a pointer to the block found, or NULL if such a block was
1541 * not found or an error occurred.
1542 */
1543static struct buffer_head *
1544ext4_xattr_cache_find(struct inode *inode, struct ext4_xattr_header *header,
1545		      struct mb_cache_entry **pce)
1546{
1547	__u32 hash = le32_to_cpu(header->h_hash);
1548	struct mb_cache_entry *ce;
 
1549
1550	if (!header->h_hash)
1551		return NULL;  /* never share */
1552	ea_idebug(inode, "looking for cached blocks [%x]", (int)hash);
1553again:
1554	ce = mb_cache_entry_find_first(ext4_xattr_cache, inode->i_sb->s_bdev,
1555				       hash);
1556	while (ce) {
1557		struct buffer_head *bh;
1558
1559		if (IS_ERR(ce)) {
1560			if (PTR_ERR(ce) == -EAGAIN)
1561				goto again;
1562			break;
1563		}
1564		bh = sb_bread(inode->i_sb, ce->e_block);
1565		if (!bh) {
1566			EXT4_ERROR_INODE(inode, "block %lu read error",
1567					 (unsigned long) ce->e_block);
1568		} else if (le32_to_cpu(BHDR(bh)->h_refcount) >=
1569				EXT4_XATTR_REFCOUNT_MAX) {
1570			ea_idebug(inode, "block %lu refcount %d>=%d",
1571				  (unsigned long) ce->e_block,
1572				  le32_to_cpu(BHDR(bh)->h_refcount),
1573					  EXT4_XATTR_REFCOUNT_MAX);
1574		} else if (ext4_xattr_cmp(header, BHDR(bh)) == 0) {
1575			*pce = ce;
1576			return bh;
1577		}
1578		brelse(bh);
1579		ce = mb_cache_entry_find_next(ce, inode->i_sb->s_bdev, hash);
1580	}
1581	return NULL;
1582}
1583
1584#define NAME_HASH_SHIFT 5
1585#define VALUE_HASH_SHIFT 16
1586
1587/*
1588 * ext4_xattr_hash_entry()
1589 *
1590 * Compute the hash of an extended attribute.
1591 */
1592static inline void ext4_xattr_hash_entry(struct ext4_xattr_header *header,
1593					 struct ext4_xattr_entry *entry)
1594{
1595	__u32 hash = 0;
1596	char *name = entry->e_name;
1597	int n;
1598
1599	for (n = 0; n < entry->e_name_len; n++) {
1600		hash = (hash << NAME_HASH_SHIFT) ^
1601		       (hash >> (8*sizeof(hash) - NAME_HASH_SHIFT)) ^
1602		       *name++;
1603	}
1604
1605	if (entry->e_value_block == 0 && entry->e_value_size != 0) {
1606		__le32 *value = (__le32 *)((char *)header +
1607			le16_to_cpu(entry->e_value_offs));
1608		for (n = (le32_to_cpu(entry->e_value_size) +
1609		     EXT4_XATTR_ROUND) >> EXT4_XATTR_PAD_BITS; n; n--) {
1610			hash = (hash << VALUE_HASH_SHIFT) ^
1611			       (hash >> (8*sizeof(hash) - VALUE_HASH_SHIFT)) ^
1612			       le32_to_cpu(*value++);
1613		}
1614	}
1615	entry->e_hash = cpu_to_le32(hash);
1616}
1617
1618#undef NAME_HASH_SHIFT
1619#undef VALUE_HASH_SHIFT
1620
1621#define BLOCK_HASH_SHIFT 16
1622
1623/*
1624 * ext4_xattr_rehash()
1625 *
1626 * Re-compute the extended attribute hash value after an entry has changed.
1627 */
1628static void ext4_xattr_rehash(struct ext4_xattr_header *header,
1629			      struct ext4_xattr_entry *entry)
1630{
1631	struct ext4_xattr_entry *here;
1632	__u32 hash = 0;
1633
1634	ext4_xattr_hash_entry(header, entry);
1635	here = ENTRY(header+1);
1636	while (!IS_LAST_ENTRY(here)) {
1637		if (!here->e_hash) {
1638			/* Block is not shared if an entry's hash value == 0 */
1639			hash = 0;
1640			break;
1641		}
1642		hash = (hash << BLOCK_HASH_SHIFT) ^
1643		       (hash >> (8*sizeof(hash) - BLOCK_HASH_SHIFT)) ^
1644		       le32_to_cpu(here->e_hash);
1645		here = EXT4_XATTR_NEXT(here);
1646	}
1647	header->h_hash = cpu_to_le32(hash);
1648}
1649
1650#undef BLOCK_HASH_SHIFT
1651
1652int __init
1653ext4_init_xattr(void)
 
 
1654{
1655	ext4_xattr_cache = mb_cache_create("ext4_xattr", 6);
1656	if (!ext4_xattr_cache)
1657		return -ENOMEM;
1658	return 0;
1659}
1660
1661void
1662ext4_exit_xattr(void)
1663{
1664	if (ext4_xattr_cache)
1665		mb_cache_destroy(ext4_xattr_cache);
1666	ext4_xattr_cache = NULL;
1667}
v3.15
   1/*
   2 * linux/fs/ext4/xattr.c
   3 *
   4 * Copyright (C) 2001-2003 Andreas Gruenbacher, <agruen@suse.de>
   5 *
   6 * Fix by Harrison Xing <harrison@mountainviewdata.com>.
   7 * Ext4 code with a lot of help from Eric Jarman <ejarman@acm.org>.
   8 * Extended attributes for symlinks and special files added per
   9 *  suggestion of Luka Renko <luka.renko@hermes.si>.
  10 * xattr consolidation Copyright (c) 2004 James Morris <jmorris@redhat.com>,
  11 *  Red Hat Inc.
  12 * ea-in-inode support by Alex Tomas <alex@clusterfs.com> aka bzzz
  13 *  and Andreas Gruenbacher <agruen@suse.de>.
  14 */
  15
  16/*
  17 * Extended attributes are stored directly in inodes (on file systems with
  18 * inodes bigger than 128 bytes) and on additional disk blocks. The i_file_acl
  19 * field contains the block number if an inode uses an additional block. All
  20 * attributes must fit in the inode and one additional block. Blocks that
  21 * contain the identical set of attributes may be shared among several inodes.
  22 * Identical blocks are detected by keeping a cache of blocks that have
  23 * recently been accessed.
  24 *
  25 * The attributes in inodes and on blocks have a different header; the entries
  26 * are stored in the same format:
  27 *
  28 *   +------------------+
  29 *   | header           |
  30 *   | entry 1          | |
  31 *   | entry 2          | | growing downwards
  32 *   | entry 3          | v
  33 *   | four null bytes  |
  34 *   | . . .            |
  35 *   | value 1          | ^
  36 *   | value 3          | | growing upwards
  37 *   | value 2          | |
  38 *   +------------------+
  39 *
  40 * The header is followed by multiple entry descriptors. In disk blocks, the
  41 * entry descriptors are kept sorted. In inodes, they are unsorted. The
  42 * attribute values are aligned to the end of the block in no specific order.
  43 *
  44 * Locking strategy
  45 * ----------------
  46 * EXT4_I(inode)->i_file_acl is protected by EXT4_I(inode)->xattr_sem.
  47 * EA blocks are only changed if they are exclusive to an inode, so
  48 * holding xattr_sem also means that nothing but the EA block's reference
  49 * count can change. Multiple writers to the same block are synchronized
  50 * by the buffer lock.
  51 */
  52
  53#include <linux/init.h>
  54#include <linux/fs.h>
  55#include <linux/slab.h>
  56#include <linux/mbcache.h>
  57#include <linux/quotaops.h>
  58#include <linux/rwsem.h>
  59#include "ext4_jbd2.h"
  60#include "ext4.h"
  61#include "xattr.h"
  62#include "acl.h"
  63
 
 
 
 
 
  64#ifdef EXT4_XATTR_DEBUG
  65# define ea_idebug(inode, f...) do { \
  66		printk(KERN_DEBUG "inode %s:%lu: ", \
  67			inode->i_sb->s_id, inode->i_ino); \
  68		printk(f); \
  69		printk("\n"); \
  70	} while (0)
  71# define ea_bdebug(bh, f...) do { \
  72		char b[BDEVNAME_SIZE]; \
  73		printk(KERN_DEBUG "block %s:%lu: ", \
  74			bdevname(bh->b_bdev, b), \
  75			(unsigned long) bh->b_blocknr); \
  76		printk(f); \
  77		printk("\n"); \
  78	} while (0)
  79#else
  80# define ea_idebug(inode, fmt, ...)	no_printk(fmt, ##__VA_ARGS__)
  81# define ea_bdebug(bh, fmt, ...)	no_printk(fmt, ##__VA_ARGS__)
  82#endif
  83
  84static void ext4_xattr_cache_insert(struct mb_cache *, struct buffer_head *);
  85static struct buffer_head *ext4_xattr_cache_find(struct inode *,
  86						 struct ext4_xattr_header *,
  87						 struct mb_cache_entry **);
  88static void ext4_xattr_rehash(struct ext4_xattr_header *,
  89			      struct ext4_xattr_entry *);
  90static int ext4_xattr_list(struct dentry *dentry, char *buffer,
  91			   size_t buffer_size);
  92
 
 
  93static const struct xattr_handler *ext4_xattr_handler_map[] = {
  94	[EXT4_XATTR_INDEX_USER]		     = &ext4_xattr_user_handler,
  95#ifdef CONFIG_EXT4_FS_POSIX_ACL
  96	[EXT4_XATTR_INDEX_POSIX_ACL_ACCESS]  = &posix_acl_access_xattr_handler,
  97	[EXT4_XATTR_INDEX_POSIX_ACL_DEFAULT] = &posix_acl_default_xattr_handler,
  98#endif
  99	[EXT4_XATTR_INDEX_TRUSTED]	     = &ext4_xattr_trusted_handler,
 100#ifdef CONFIG_EXT4_FS_SECURITY
 101	[EXT4_XATTR_INDEX_SECURITY]	     = &ext4_xattr_security_handler,
 102#endif
 103};
 104
 105const struct xattr_handler *ext4_xattr_handlers[] = {
 106	&ext4_xattr_user_handler,
 107	&ext4_xattr_trusted_handler,
 108#ifdef CONFIG_EXT4_FS_POSIX_ACL
 109	&posix_acl_access_xattr_handler,
 110	&posix_acl_default_xattr_handler,
 111#endif
 112#ifdef CONFIG_EXT4_FS_SECURITY
 113	&ext4_xattr_security_handler,
 114#endif
 115	NULL
 116};
 117
 118#define EXT4_GET_MB_CACHE(inode)	(((struct ext4_sb_info *) \
 119				inode->i_sb->s_fs_info)->s_mb_cache)
 120
 121static __le32 ext4_xattr_block_csum(struct inode *inode,
 122				    sector_t block_nr,
 123				    struct ext4_xattr_header *hdr)
 124{
 125	struct ext4_sb_info *sbi = EXT4_SB(inode->i_sb);
 126	__u32 csum;
 127	__le32 save_csum;
 128	__le64 dsk_block_nr = cpu_to_le64(block_nr);
 129
 130	save_csum = hdr->h_checksum;
 131	hdr->h_checksum = 0;
 132	csum = ext4_chksum(sbi, sbi->s_csum_seed, (__u8 *)&dsk_block_nr,
 133			   sizeof(dsk_block_nr));
 
 134	csum = ext4_chksum(sbi, csum, (__u8 *)hdr,
 135			   EXT4_BLOCK_SIZE(inode->i_sb));
 136
 137	hdr->h_checksum = save_csum;
 138	return cpu_to_le32(csum);
 139}
 140
 141static int ext4_xattr_block_csum_verify(struct inode *inode,
 142					sector_t block_nr,
 143					struct ext4_xattr_header *hdr)
 144{
 145	if (EXT4_HAS_RO_COMPAT_FEATURE(inode->i_sb,
 146		EXT4_FEATURE_RO_COMPAT_METADATA_CSUM) &&
 147	    (hdr->h_checksum != ext4_xattr_block_csum(inode, block_nr, hdr)))
 148		return 0;
 149	return 1;
 150}
 151
 152static void ext4_xattr_block_csum_set(struct inode *inode,
 153				      sector_t block_nr,
 154				      struct ext4_xattr_header *hdr)
 155{
 156	if (!EXT4_HAS_RO_COMPAT_FEATURE(inode->i_sb,
 157		EXT4_FEATURE_RO_COMPAT_METADATA_CSUM))
 158		return;
 159
 160	hdr->h_checksum = ext4_xattr_block_csum(inode, block_nr, hdr);
 161}
 162
 163static inline int ext4_handle_dirty_xattr_block(handle_t *handle,
 164						struct inode *inode,
 165						struct buffer_head *bh)
 166{
 167	ext4_xattr_block_csum_set(inode, bh->b_blocknr, BHDR(bh));
 168	return ext4_handle_dirty_metadata(handle, inode, bh);
 169}
 170
 171static inline const struct xattr_handler *
 172ext4_xattr_handler(int name_index)
 173{
 174	const struct xattr_handler *handler = NULL;
 175
 176	if (name_index > 0 && name_index < ARRAY_SIZE(ext4_xattr_handler_map))
 177		handler = ext4_xattr_handler_map[name_index];
 178	return handler;
 179}
 180
 181/*
 182 * Inode operation listxattr()
 183 *
 184 * dentry->d_inode->i_mutex: don't care
 185 */
 186ssize_t
 187ext4_listxattr(struct dentry *dentry, char *buffer, size_t size)
 188{
 189	return ext4_xattr_list(dentry, buffer, size);
 190}
 191
 192static int
 193ext4_xattr_check_names(struct ext4_xattr_entry *entry, void *end)
 194{
 195	while (!IS_LAST_ENTRY(entry)) {
 196		struct ext4_xattr_entry *next = EXT4_XATTR_NEXT(entry);
 197		if ((void *)next >= end)
 198			return -EIO;
 199		entry = next;
 200	}
 201	return 0;
 202}
 203
 204static inline int
 205ext4_xattr_check_block(struct inode *inode, struct buffer_head *bh)
 206{
 207	int error;
 208
 209	if (buffer_verified(bh))
 210		return 0;
 211
 212	if (BHDR(bh)->h_magic != cpu_to_le32(EXT4_XATTR_MAGIC) ||
 213	    BHDR(bh)->h_blocks != cpu_to_le32(1))
 214		return -EIO;
 215	if (!ext4_xattr_block_csum_verify(inode, bh->b_blocknr, BHDR(bh)))
 216		return -EIO;
 217	error = ext4_xattr_check_names(BFIRST(bh), bh->b_data + bh->b_size);
 218	if (!error)
 219		set_buffer_verified(bh);
 220	return error;
 221}
 222
 223static inline int
 224ext4_xattr_check_entry(struct ext4_xattr_entry *entry, size_t size)
 225{
 226	size_t value_size = le32_to_cpu(entry->e_value_size);
 227
 228	if (entry->e_value_block != 0 || value_size > size ||
 229	    le16_to_cpu(entry->e_value_offs) + value_size > size)
 230		return -EIO;
 231	return 0;
 232}
 233
 234static int
 235ext4_xattr_find_entry(struct ext4_xattr_entry **pentry, int name_index,
 236		      const char *name, size_t size, int sorted)
 237{
 238	struct ext4_xattr_entry *entry;
 239	size_t name_len;
 240	int cmp = 1;
 241
 242	if (name == NULL)
 243		return -EINVAL;
 244	name_len = strlen(name);
 245	entry = *pentry;
 246	for (; !IS_LAST_ENTRY(entry); entry = EXT4_XATTR_NEXT(entry)) {
 247		cmp = name_index - entry->e_name_index;
 248		if (!cmp)
 249			cmp = name_len - entry->e_name_len;
 250		if (!cmp)
 251			cmp = memcmp(name, entry->e_name, name_len);
 252		if (cmp <= 0 && (sorted || cmp == 0))
 253			break;
 254	}
 255	*pentry = entry;
 256	if (!cmp && ext4_xattr_check_entry(entry, size))
 257			return -EIO;
 258	return cmp ? -ENODATA : 0;
 259}
 260
 261static int
 262ext4_xattr_block_get(struct inode *inode, int name_index, const char *name,
 263		     void *buffer, size_t buffer_size)
 264{
 265	struct buffer_head *bh = NULL;
 266	struct ext4_xattr_entry *entry;
 267	size_t size;
 268	int error;
 269	struct mb_cache *ext4_mb_cache = EXT4_GET_MB_CACHE(inode);
 270
 271	ea_idebug(inode, "name=%d.%s, buffer=%p, buffer_size=%ld",
 272		  name_index, name, buffer, (long)buffer_size);
 273
 274	error = -ENODATA;
 275	if (!EXT4_I(inode)->i_file_acl)
 276		goto cleanup;
 277	ea_idebug(inode, "reading block %llu",
 278		  (unsigned long long)EXT4_I(inode)->i_file_acl);
 279	bh = sb_bread(inode->i_sb, EXT4_I(inode)->i_file_acl);
 280	if (!bh)
 281		goto cleanup;
 282	ea_bdebug(bh, "b_count=%d, refcount=%d",
 283		atomic_read(&(bh->b_count)), le32_to_cpu(BHDR(bh)->h_refcount));
 284	if (ext4_xattr_check_block(inode, bh)) {
 285bad_block:
 286		EXT4_ERROR_INODE(inode, "bad block %llu",
 287				 EXT4_I(inode)->i_file_acl);
 288		error = -EIO;
 289		goto cleanup;
 290	}
 291	ext4_xattr_cache_insert(ext4_mb_cache, bh);
 292	entry = BFIRST(bh);
 293	error = ext4_xattr_find_entry(&entry, name_index, name, bh->b_size, 1);
 294	if (error == -EIO)
 295		goto bad_block;
 296	if (error)
 297		goto cleanup;
 298	size = le32_to_cpu(entry->e_value_size);
 299	if (buffer) {
 300		error = -ERANGE;
 301		if (size > buffer_size)
 302			goto cleanup;
 303		memcpy(buffer, bh->b_data + le16_to_cpu(entry->e_value_offs),
 304		       size);
 305	}
 306	error = size;
 307
 308cleanup:
 309	brelse(bh);
 310	return error;
 311}
 312
 313int
 314ext4_xattr_ibody_get(struct inode *inode, int name_index, const char *name,
 315		     void *buffer, size_t buffer_size)
 316{
 317	struct ext4_xattr_ibody_header *header;
 318	struct ext4_xattr_entry *entry;
 319	struct ext4_inode *raw_inode;
 320	struct ext4_iloc iloc;
 321	size_t size;
 322	void *end;
 323	int error;
 324
 325	if (!ext4_test_inode_state(inode, EXT4_STATE_XATTR))
 326		return -ENODATA;
 327	error = ext4_get_inode_loc(inode, &iloc);
 328	if (error)
 329		return error;
 330	raw_inode = ext4_raw_inode(&iloc);
 331	header = IHDR(inode, raw_inode);
 332	entry = IFIRST(header);
 333	end = (void *)raw_inode + EXT4_SB(inode->i_sb)->s_inode_size;
 334	error = ext4_xattr_check_names(entry, end);
 335	if (error)
 336		goto cleanup;
 337	error = ext4_xattr_find_entry(&entry, name_index, name,
 338				      end - (void *)entry, 0);
 339	if (error)
 340		goto cleanup;
 341	size = le32_to_cpu(entry->e_value_size);
 342	if (buffer) {
 343		error = -ERANGE;
 344		if (size > buffer_size)
 345			goto cleanup;
 346		memcpy(buffer, (void *)IFIRST(header) +
 347		       le16_to_cpu(entry->e_value_offs), size);
 348	}
 349	error = size;
 350
 351cleanup:
 352	brelse(iloc.bh);
 353	return error;
 354}
 355
 356/*
 357 * ext4_xattr_get()
 358 *
 359 * Copy an extended attribute into the buffer
 360 * provided, or compute the buffer size required.
 361 * Buffer is NULL to compute the size of the buffer required.
 362 *
 363 * Returns a negative error number on failure, or the number of bytes
 364 * used / required on success.
 365 */
 366int
 367ext4_xattr_get(struct inode *inode, int name_index, const char *name,
 368	       void *buffer, size_t buffer_size)
 369{
 370	int error;
 371
 372	down_read(&EXT4_I(inode)->xattr_sem);
 373	error = ext4_xattr_ibody_get(inode, name_index, name, buffer,
 374				     buffer_size);
 375	if (error == -ENODATA)
 376		error = ext4_xattr_block_get(inode, name_index, name, buffer,
 377					     buffer_size);
 378	up_read(&EXT4_I(inode)->xattr_sem);
 379	return error;
 380}
 381
 382static int
 383ext4_xattr_list_entries(struct dentry *dentry, struct ext4_xattr_entry *entry,
 384			char *buffer, size_t buffer_size)
 385{
 386	size_t rest = buffer_size;
 387
 388	for (; !IS_LAST_ENTRY(entry); entry = EXT4_XATTR_NEXT(entry)) {
 389		const struct xattr_handler *handler =
 390			ext4_xattr_handler(entry->e_name_index);
 391
 392		if (handler) {
 393			size_t size = handler->list(dentry, buffer, rest,
 394						    entry->e_name,
 395						    entry->e_name_len,
 396						    handler->flags);
 397			if (buffer) {
 398				if (size > rest)
 399					return -ERANGE;
 400				buffer += size;
 401			}
 402			rest -= size;
 403		}
 404	}
 405	return buffer_size - rest;
 406}
 407
 408static int
 409ext4_xattr_block_list(struct dentry *dentry, char *buffer, size_t buffer_size)
 410{
 411	struct inode *inode = dentry->d_inode;
 412	struct buffer_head *bh = NULL;
 413	int error;
 414	struct mb_cache *ext4_mb_cache = EXT4_GET_MB_CACHE(inode);
 415
 416	ea_idebug(inode, "buffer=%p, buffer_size=%ld",
 417		  buffer, (long)buffer_size);
 418
 419	error = 0;
 420	if (!EXT4_I(inode)->i_file_acl)
 421		goto cleanup;
 422	ea_idebug(inode, "reading block %llu",
 423		  (unsigned long long)EXT4_I(inode)->i_file_acl);
 424	bh = sb_bread(inode->i_sb, EXT4_I(inode)->i_file_acl);
 425	error = -EIO;
 426	if (!bh)
 427		goto cleanup;
 428	ea_bdebug(bh, "b_count=%d, refcount=%d",
 429		atomic_read(&(bh->b_count)), le32_to_cpu(BHDR(bh)->h_refcount));
 430	if (ext4_xattr_check_block(inode, bh)) {
 431		EXT4_ERROR_INODE(inode, "bad block %llu",
 432				 EXT4_I(inode)->i_file_acl);
 433		error = -EIO;
 434		goto cleanup;
 435	}
 436	ext4_xattr_cache_insert(ext4_mb_cache, bh);
 437	error = ext4_xattr_list_entries(dentry, BFIRST(bh), buffer, buffer_size);
 438
 439cleanup:
 440	brelse(bh);
 441
 442	return error;
 443}
 444
 445static int
 446ext4_xattr_ibody_list(struct dentry *dentry, char *buffer, size_t buffer_size)
 447{
 448	struct inode *inode = dentry->d_inode;
 449	struct ext4_xattr_ibody_header *header;
 450	struct ext4_inode *raw_inode;
 451	struct ext4_iloc iloc;
 452	void *end;
 453	int error;
 454
 455	if (!ext4_test_inode_state(inode, EXT4_STATE_XATTR))
 456		return 0;
 457	error = ext4_get_inode_loc(inode, &iloc);
 458	if (error)
 459		return error;
 460	raw_inode = ext4_raw_inode(&iloc);
 461	header = IHDR(inode, raw_inode);
 462	end = (void *)raw_inode + EXT4_SB(inode->i_sb)->s_inode_size;
 463	error = ext4_xattr_check_names(IFIRST(header), end);
 464	if (error)
 465		goto cleanup;
 466	error = ext4_xattr_list_entries(dentry, IFIRST(header),
 467					buffer, buffer_size);
 468
 469cleanup:
 470	brelse(iloc.bh);
 471	return error;
 472}
 473
 474/*
 475 * ext4_xattr_list()
 476 *
 477 * Copy a list of attribute names into the buffer
 478 * provided, or compute the buffer size required.
 479 * Buffer is NULL to compute the size of the buffer required.
 480 *
 481 * Returns a negative error number on failure, or the number of bytes
 482 * used / required on success.
 483 */
 484static int
 485ext4_xattr_list(struct dentry *dentry, char *buffer, size_t buffer_size)
 486{
 487	int ret, ret2;
 488
 489	down_read(&EXT4_I(dentry->d_inode)->xattr_sem);
 490	ret = ret2 = ext4_xattr_ibody_list(dentry, buffer, buffer_size);
 491	if (ret < 0)
 492		goto errout;
 493	if (buffer) {
 494		buffer += ret;
 495		buffer_size -= ret;
 496	}
 497	ret = ext4_xattr_block_list(dentry, buffer, buffer_size);
 498	if (ret < 0)
 499		goto errout;
 500	ret += ret2;
 501errout:
 502	up_read(&EXT4_I(dentry->d_inode)->xattr_sem);
 503	return ret;
 504}
 505
 506/*
 507 * If the EXT4_FEATURE_COMPAT_EXT_ATTR feature of this file system is
 508 * not set, set it.
 509 */
 510static void ext4_xattr_update_super_block(handle_t *handle,
 511					  struct super_block *sb)
 512{
 513	if (EXT4_HAS_COMPAT_FEATURE(sb, EXT4_FEATURE_COMPAT_EXT_ATTR))
 514		return;
 515
 516	if (ext4_journal_get_write_access(handle, EXT4_SB(sb)->s_sbh) == 0) {
 517		EXT4_SET_COMPAT_FEATURE(sb, EXT4_FEATURE_COMPAT_EXT_ATTR);
 518		ext4_handle_dirty_super(handle, sb);
 519	}
 520}
 521
 522/*
 523 * Release the xattr block BH: If the reference count is > 1, decrement it;
 524 * otherwise free the block.
 525 */
 526static void
 527ext4_xattr_release_block(handle_t *handle, struct inode *inode,
 528			 struct buffer_head *bh)
 529{
 530	struct mb_cache_entry *ce = NULL;
 531	int error = 0;
 532	struct mb_cache *ext4_mb_cache = EXT4_GET_MB_CACHE(inode);
 533
 534	ce = mb_cache_entry_get(ext4_mb_cache, bh->b_bdev, bh->b_blocknr);
 535	error = ext4_journal_get_write_access(handle, bh);
 536	if (error)
 537		goto out;
 538
 539	lock_buffer(bh);
 540	if (BHDR(bh)->h_refcount == cpu_to_le32(1)) {
 541		ea_bdebug(bh, "refcount now=0; freeing");
 542		if (ce)
 543			mb_cache_entry_free(ce);
 544		get_bh(bh);
 545		unlock_buffer(bh);
 546		ext4_free_blocks(handle, inode, bh, 0, 1,
 547				 EXT4_FREE_BLOCKS_METADATA |
 548				 EXT4_FREE_BLOCKS_FORGET);
 
 549	} else {
 550		le32_add_cpu(&BHDR(bh)->h_refcount, -1);
 551		if (ce)
 552			mb_cache_entry_release(ce);
 553		/*
 554		 * Beware of this ugliness: Releasing of xattr block references
 555		 * from different inodes can race and so we have to protect
 556		 * from a race where someone else frees the block (and releases
 557		 * its journal_head) before we are done dirtying the buffer. In
 558		 * nojournal mode this race is harmless and we actually cannot
 559		 * call ext4_handle_dirty_xattr_block() with locked buffer as
 560		 * that function can call sync_dirty_buffer() so for that case
 561		 * we handle the dirtying after unlocking the buffer.
 562		 */
 563		if (ext4_handle_valid(handle))
 564			error = ext4_handle_dirty_xattr_block(handle, inode,
 565							      bh);
 566		unlock_buffer(bh);
 567		if (!ext4_handle_valid(handle))
 568			error = ext4_handle_dirty_xattr_block(handle, inode,
 569							      bh);
 570		if (IS_SYNC(inode))
 571			ext4_handle_sync(handle);
 572		dquot_free_block(inode, EXT4_C2B(EXT4_SB(inode->i_sb), 1));
 573		ea_bdebug(bh, "refcount now=%d; releasing",
 574			  le32_to_cpu(BHDR(bh)->h_refcount));
 575	}
 576out:
 577	ext4_std_error(inode->i_sb, error);
 578	return;
 579}
 580
 581/*
 582 * Find the available free space for EAs. This also returns the total number of
 583 * bytes used by EA entries.
 584 */
 585static size_t ext4_xattr_free_space(struct ext4_xattr_entry *last,
 586				    size_t *min_offs, void *base, int *total)
 587{
 588	for (; !IS_LAST_ENTRY(last); last = EXT4_XATTR_NEXT(last)) {
 
 589		if (!last->e_value_block && last->e_value_size) {
 590			size_t offs = le16_to_cpu(last->e_value_offs);
 591			if (offs < *min_offs)
 592				*min_offs = offs;
 593		}
 594		if (total)
 595			*total += EXT4_XATTR_LEN(last->e_name_len);
 596	}
 597	return (*min_offs - ((void *)last - base) - sizeof(__u32));
 598}
 599
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 600static int
 601ext4_xattr_set_entry(struct ext4_xattr_info *i, struct ext4_xattr_search *s)
 602{
 603	struct ext4_xattr_entry *last;
 604	size_t free, min_offs = s->end - s->base, name_len = strlen(i->name);
 605
 606	/* Compute min_offs and last. */
 607	last = s->first;
 608	for (; !IS_LAST_ENTRY(last); last = EXT4_XATTR_NEXT(last)) {
 609		if (!last->e_value_block && last->e_value_size) {
 610			size_t offs = le16_to_cpu(last->e_value_offs);
 611			if (offs < min_offs)
 612				min_offs = offs;
 613		}
 614	}
 615	free = min_offs - ((void *)last - s->base) - sizeof(__u32);
 616	if (!s->not_found) {
 617		if (!s->here->e_value_block && s->here->e_value_size) {
 618			size_t size = le32_to_cpu(s->here->e_value_size);
 619			free += EXT4_XATTR_SIZE(size);
 620		}
 621		free += EXT4_XATTR_LEN(name_len);
 622	}
 623	if (i->value) {
 624		if (free < EXT4_XATTR_SIZE(i->value_len) ||
 625		    free < EXT4_XATTR_LEN(name_len) +
 626			   EXT4_XATTR_SIZE(i->value_len))
 627			return -ENOSPC;
 628	}
 629
 630	if (i->value && s->not_found) {
 631		/* Insert the new name. */
 632		size_t size = EXT4_XATTR_LEN(name_len);
 633		size_t rest = (void *)last - (void *)s->here + sizeof(__u32);
 634		memmove((void *)s->here + size, s->here, rest);
 635		memset(s->here, 0, size);
 636		s->here->e_name_index = i->name_index;
 637		s->here->e_name_len = name_len;
 638		memcpy(s->here->e_name, i->name, name_len);
 639	} else {
 640		if (!s->here->e_value_block && s->here->e_value_size) {
 641			void *first_val = s->base + min_offs;
 642			size_t offs = le16_to_cpu(s->here->e_value_offs);
 643			void *val = s->base + offs;
 644			size_t size = EXT4_XATTR_SIZE(
 645				le32_to_cpu(s->here->e_value_size));
 646
 647			if (i->value && size == EXT4_XATTR_SIZE(i->value_len)) {
 648				/* The old and the new value have the same
 649				   size. Just replace. */
 650				s->here->e_value_size =
 651					cpu_to_le32(i->value_len);
 652				if (i->value == EXT4_ZERO_XATTR_VALUE) {
 653					memset(val, 0, size);
 654				} else {
 655					/* Clear pad bytes first. */
 656					memset(val + size - EXT4_XATTR_PAD, 0,
 657					       EXT4_XATTR_PAD);
 658					memcpy(val, i->value, i->value_len);
 659				}
 660				return 0;
 661			}
 662
 663			/* Remove the old value. */
 664			memmove(first_val + size, first_val, val - first_val);
 665			memset(first_val, 0, size);
 666			s->here->e_value_size = 0;
 667			s->here->e_value_offs = 0;
 668			min_offs += size;
 669
 670			/* Adjust all value offsets. */
 671			last = s->first;
 672			while (!IS_LAST_ENTRY(last)) {
 673				size_t o = le16_to_cpu(last->e_value_offs);
 674				if (!last->e_value_block &&
 675				    last->e_value_size && o < offs)
 676					last->e_value_offs =
 677						cpu_to_le16(o + size);
 678				last = EXT4_XATTR_NEXT(last);
 679			}
 680		}
 681		if (!i->value) {
 682			/* Remove the old name. */
 683			size_t size = EXT4_XATTR_LEN(name_len);
 684			last = ENTRY((void *)last - size);
 685			memmove(s->here, (void *)s->here + size,
 686				(void *)last - (void *)s->here + sizeof(__u32));
 687			memset(last, 0, size);
 688		}
 689	}
 690
 691	if (i->value) {
 692		/* Insert the new value. */
 693		s->here->e_value_size = cpu_to_le32(i->value_len);
 694		if (i->value_len) {
 695			size_t size = EXT4_XATTR_SIZE(i->value_len);
 696			void *val = s->base + min_offs - size;
 697			s->here->e_value_offs = cpu_to_le16(min_offs - size);
 698			if (i->value == EXT4_ZERO_XATTR_VALUE) {
 699				memset(val, 0, size);
 700			} else {
 701				/* Clear the pad bytes first. */
 702				memset(val + size - EXT4_XATTR_PAD, 0,
 703				       EXT4_XATTR_PAD);
 704				memcpy(val, i->value, i->value_len);
 705			}
 706		}
 707	}
 708	return 0;
 709}
 710
 711struct ext4_xattr_block_find {
 712	struct ext4_xattr_search s;
 713	struct buffer_head *bh;
 714};
 715
 716static int
 717ext4_xattr_block_find(struct inode *inode, struct ext4_xattr_info *i,
 718		      struct ext4_xattr_block_find *bs)
 719{
 720	struct super_block *sb = inode->i_sb;
 721	int error;
 722
 723	ea_idebug(inode, "name=%d.%s, value=%p, value_len=%ld",
 724		  i->name_index, i->name, i->value, (long)i->value_len);
 725
 726	if (EXT4_I(inode)->i_file_acl) {
 727		/* The inode already has an extended attribute block. */
 728		bs->bh = sb_bread(sb, EXT4_I(inode)->i_file_acl);
 729		error = -EIO;
 730		if (!bs->bh)
 731			goto cleanup;
 732		ea_bdebug(bs->bh, "b_count=%d, refcount=%d",
 733			atomic_read(&(bs->bh->b_count)),
 734			le32_to_cpu(BHDR(bs->bh)->h_refcount));
 735		if (ext4_xattr_check_block(inode, bs->bh)) {
 736			EXT4_ERROR_INODE(inode, "bad block %llu",
 737					 EXT4_I(inode)->i_file_acl);
 738			error = -EIO;
 739			goto cleanup;
 740		}
 741		/* Find the named attribute. */
 742		bs->s.base = BHDR(bs->bh);
 743		bs->s.first = BFIRST(bs->bh);
 744		bs->s.end = bs->bh->b_data + bs->bh->b_size;
 745		bs->s.here = bs->s.first;
 746		error = ext4_xattr_find_entry(&bs->s.here, i->name_index,
 747					      i->name, bs->bh->b_size, 1);
 748		if (error && error != -ENODATA)
 749			goto cleanup;
 750		bs->s.not_found = error;
 751	}
 752	error = 0;
 753
 754cleanup:
 755	return error;
 756}
 757
 758static int
 759ext4_xattr_block_set(handle_t *handle, struct inode *inode,
 760		     struct ext4_xattr_info *i,
 761		     struct ext4_xattr_block_find *bs)
 762{
 763	struct super_block *sb = inode->i_sb;
 764	struct buffer_head *new_bh = NULL;
 765	struct ext4_xattr_search *s = &bs->s;
 766	struct mb_cache_entry *ce = NULL;
 767	int error = 0;
 768	struct mb_cache *ext4_mb_cache = EXT4_GET_MB_CACHE(inode);
 769
 770#define header(x) ((struct ext4_xattr_header *)(x))
 771
 772	if (i->value && i->value_len > sb->s_blocksize)
 773		return -ENOSPC;
 774	if (s->base) {
 775		ce = mb_cache_entry_get(ext4_mb_cache, bs->bh->b_bdev,
 776					bs->bh->b_blocknr);
 777		error = ext4_journal_get_write_access(handle, bs->bh);
 778		if (error)
 779			goto cleanup;
 780		lock_buffer(bs->bh);
 781
 782		if (header(s->base)->h_refcount == cpu_to_le32(1)) {
 783			if (ce) {
 784				mb_cache_entry_free(ce);
 785				ce = NULL;
 786			}
 787			ea_bdebug(bs->bh, "modifying in-place");
 788			error = ext4_xattr_set_entry(i, s);
 789			if (!error) {
 790				if (!IS_LAST_ENTRY(s->first))
 791					ext4_xattr_rehash(header(s->base),
 792							  s->here);
 793				ext4_xattr_cache_insert(ext4_mb_cache,
 794					bs->bh);
 795			}
 796			unlock_buffer(bs->bh);
 797			if (error == -EIO)
 798				goto bad_block;
 799			if (!error)
 800				error = ext4_handle_dirty_xattr_block(handle,
 801								      inode,
 802								      bs->bh);
 803			if (error)
 804				goto cleanup;
 805			goto inserted;
 806		} else {
 807			int offset = (char *)s->here - bs->bh->b_data;
 808
 809			unlock_buffer(bs->bh);
 
 810			if (ce) {
 811				mb_cache_entry_release(ce);
 812				ce = NULL;
 813			}
 814			ea_bdebug(bs->bh, "cloning");
 815			s->base = kmalloc(bs->bh->b_size, GFP_NOFS);
 816			error = -ENOMEM;
 817			if (s->base == NULL)
 818				goto cleanup;
 819			memcpy(s->base, BHDR(bs->bh), bs->bh->b_size);
 820			s->first = ENTRY(header(s->base)+1);
 821			header(s->base)->h_refcount = cpu_to_le32(1);
 822			s->here = ENTRY(s->base + offset);
 823			s->end = s->base + bs->bh->b_size;
 824		}
 825	} else {
 826		/* Allocate a buffer where we construct the new block. */
 827		s->base = kzalloc(sb->s_blocksize, GFP_NOFS);
 828		/* assert(header == s->base) */
 829		error = -ENOMEM;
 830		if (s->base == NULL)
 831			goto cleanup;
 832		header(s->base)->h_magic = cpu_to_le32(EXT4_XATTR_MAGIC);
 833		header(s->base)->h_blocks = cpu_to_le32(1);
 834		header(s->base)->h_refcount = cpu_to_le32(1);
 835		s->first = ENTRY(header(s->base)+1);
 836		s->here = ENTRY(header(s->base)+1);
 837		s->end = s->base + sb->s_blocksize;
 838	}
 839
 840	error = ext4_xattr_set_entry(i, s);
 841	if (error == -EIO)
 842		goto bad_block;
 843	if (error)
 844		goto cleanup;
 845	if (!IS_LAST_ENTRY(s->first))
 846		ext4_xattr_rehash(header(s->base), s->here);
 847
 848inserted:
 849	if (!IS_LAST_ENTRY(s->first)) {
 850		new_bh = ext4_xattr_cache_find(inode, header(s->base), &ce);
 851		if (new_bh) {
 852			/* We found an identical block in the cache. */
 853			if (new_bh == bs->bh)
 854				ea_bdebug(new_bh, "keeping");
 855			else {
 856				/* The old block is released after updating
 857				   the inode. */
 858				error = dquot_alloc_block(inode,
 859						EXT4_C2B(EXT4_SB(sb), 1));
 860				if (error)
 861					goto cleanup;
 862				error = ext4_journal_get_write_access(handle,
 863								      new_bh);
 864				if (error)
 865					goto cleanup_dquot;
 866				lock_buffer(new_bh);
 867				le32_add_cpu(&BHDR(new_bh)->h_refcount, 1);
 868				ea_bdebug(new_bh, "reusing; refcount now=%d",
 869					le32_to_cpu(BHDR(new_bh)->h_refcount));
 870				unlock_buffer(new_bh);
 871				error = ext4_handle_dirty_xattr_block(handle,
 872								      inode,
 873								      new_bh);
 874				if (error)
 875					goto cleanup_dquot;
 876			}
 877			mb_cache_entry_release(ce);
 878			ce = NULL;
 879		} else if (bs->bh && s->base == bs->bh->b_data) {
 880			/* We were modifying this block in-place. */
 881			ea_bdebug(bs->bh, "keeping this block");
 882			new_bh = bs->bh;
 883			get_bh(new_bh);
 884		} else {
 885			/* We need to allocate a new block */
 886			ext4_fsblk_t goal, block;
 887
 888			goal = ext4_group_first_block_no(sb,
 889						EXT4_I(inode)->i_block_group);
 890
 891			/* non-extent files can't have physical blocks past 2^32 */
 892			if (!(ext4_test_inode_flag(inode, EXT4_INODE_EXTENTS)))
 893				goal = goal & EXT4_MAX_BLOCK_FILE_PHYS;
 894
 895			/*
 896			 * take i_data_sem because we will test
 897			 * i_delalloc_reserved_flag in ext4_mb_new_blocks
 898			 */
 899			down_read((&EXT4_I(inode)->i_data_sem));
 900			block = ext4_new_meta_blocks(handle, inode, goal, 0,
 901						     NULL, &error);
 902			up_read((&EXT4_I(inode)->i_data_sem));
 903			if (error)
 904				goto cleanup;
 905
 906			if (!(ext4_test_inode_flag(inode, EXT4_INODE_EXTENTS)))
 907				BUG_ON(block > EXT4_MAX_BLOCK_FILE_PHYS);
 908
 909			ea_idebug(inode, "creating block %llu",
 910				  (unsigned long long)block);
 911
 912			new_bh = sb_getblk(sb, block);
 913			if (unlikely(!new_bh)) {
 914				error = -ENOMEM;
 915getblk_failed:
 916				ext4_free_blocks(handle, inode, NULL, block, 1,
 917						 EXT4_FREE_BLOCKS_METADATA);
 
 918				goto cleanup;
 919			}
 920			lock_buffer(new_bh);
 921			error = ext4_journal_get_create_access(handle, new_bh);
 922			if (error) {
 923				unlock_buffer(new_bh);
 924				error = -EIO;
 925				goto getblk_failed;
 926			}
 927			memcpy(new_bh->b_data, s->base, new_bh->b_size);
 928			set_buffer_uptodate(new_bh);
 929			unlock_buffer(new_bh);
 930			ext4_xattr_cache_insert(ext4_mb_cache, new_bh);
 931			error = ext4_handle_dirty_xattr_block(handle,
 932							      inode, new_bh);
 933			if (error)
 934				goto cleanup;
 935		}
 936	}
 937
 938	/* Update the inode. */
 939	EXT4_I(inode)->i_file_acl = new_bh ? new_bh->b_blocknr : 0;
 940
 941	/* Drop the previous xattr block. */
 942	if (bs->bh && bs->bh != new_bh)
 943		ext4_xattr_release_block(handle, inode, bs->bh);
 944	error = 0;
 945
 946cleanup:
 947	if (ce)
 948		mb_cache_entry_release(ce);
 949	brelse(new_bh);
 950	if (!(bs->bh && s->base == bs->bh->b_data))
 951		kfree(s->base);
 952
 953	return error;
 954
 955cleanup_dquot:
 956	dquot_free_block(inode, EXT4_C2B(EXT4_SB(sb), 1));
 957	goto cleanup;
 958
 959bad_block:
 960	EXT4_ERROR_INODE(inode, "bad block %llu",
 961			 EXT4_I(inode)->i_file_acl);
 962	goto cleanup;
 963
 964#undef header
 965}
 966
 967int ext4_xattr_ibody_find(struct inode *inode, struct ext4_xattr_info *i,
 968			  struct ext4_xattr_ibody_find *is)
 
 
 
 
 
 
 969{
 970	struct ext4_xattr_ibody_header *header;
 971	struct ext4_inode *raw_inode;
 972	int error;
 973
 974	if (EXT4_I(inode)->i_extra_isize == 0)
 975		return 0;
 976	raw_inode = ext4_raw_inode(&is->iloc);
 977	header = IHDR(inode, raw_inode);
 978	is->s.base = is->s.first = IFIRST(header);
 979	is->s.here = is->s.first;
 980	is->s.end = (void *)raw_inode + EXT4_SB(inode->i_sb)->s_inode_size;
 981	if (ext4_test_inode_state(inode, EXT4_STATE_XATTR)) {
 982		error = ext4_xattr_check_names(IFIRST(header), is->s.end);
 983		if (error)
 984			return error;
 985		/* Find the named attribute. */
 986		error = ext4_xattr_find_entry(&is->s.here, i->name_index,
 987					      i->name, is->s.end -
 988					      (void *)is->s.base, 0);
 989		if (error && error != -ENODATA)
 990			return error;
 991		is->s.not_found = error;
 992	}
 993	return 0;
 994}
 995
 996int ext4_xattr_ibody_inline_set(handle_t *handle, struct inode *inode,
 997				struct ext4_xattr_info *i,
 998				struct ext4_xattr_ibody_find *is)
 999{
1000	struct ext4_xattr_ibody_header *header;
1001	struct ext4_xattr_search *s = &is->s;
1002	int error;
1003
1004	if (EXT4_I(inode)->i_extra_isize == 0)
1005		return -ENOSPC;
1006	error = ext4_xattr_set_entry(i, s);
1007	if (error) {
1008		if (error == -ENOSPC &&
1009		    ext4_has_inline_data(inode)) {
1010			error = ext4_try_to_evict_inline_data(handle, inode,
1011					EXT4_XATTR_LEN(strlen(i->name) +
1012					EXT4_XATTR_SIZE(i->value_len)));
1013			if (error)
1014				return error;
1015			error = ext4_xattr_ibody_find(inode, i, is);
1016			if (error)
1017				return error;
1018			error = ext4_xattr_set_entry(i, s);
1019		}
1020		if (error)
1021			return error;
1022	}
1023	header = IHDR(inode, ext4_raw_inode(&is->iloc));
1024	if (!IS_LAST_ENTRY(s->first)) {
1025		header->h_magic = cpu_to_le32(EXT4_XATTR_MAGIC);
1026		ext4_set_inode_state(inode, EXT4_STATE_XATTR);
1027	} else {
1028		header->h_magic = cpu_to_le32(0);
1029		ext4_clear_inode_state(inode, EXT4_STATE_XATTR);
1030	}
1031	return 0;
1032}
1033
1034static int ext4_xattr_ibody_set(handle_t *handle, struct inode *inode,
1035				struct ext4_xattr_info *i,
1036				struct ext4_xattr_ibody_find *is)
1037{
1038	struct ext4_xattr_ibody_header *header;
1039	struct ext4_xattr_search *s = &is->s;
1040	int error;
1041
1042	if (EXT4_I(inode)->i_extra_isize == 0)
1043		return -ENOSPC;
1044	error = ext4_xattr_set_entry(i, s);
1045	if (error)
1046		return error;
1047	header = IHDR(inode, ext4_raw_inode(&is->iloc));
1048	if (!IS_LAST_ENTRY(s->first)) {
1049		header->h_magic = cpu_to_le32(EXT4_XATTR_MAGIC);
1050		ext4_set_inode_state(inode, EXT4_STATE_XATTR);
1051	} else {
1052		header->h_magic = cpu_to_le32(0);
1053		ext4_clear_inode_state(inode, EXT4_STATE_XATTR);
1054	}
1055	return 0;
1056}
1057
1058/*
1059 * ext4_xattr_set_handle()
1060 *
1061 * Create, replace or remove an extended attribute for this inode.  Value
1062 * is NULL to remove an existing extended attribute, and non-NULL to
1063 * either replace an existing extended attribute, or create a new extended
1064 * attribute. The flags XATTR_REPLACE and XATTR_CREATE
1065 * specify that an extended attribute must exist and must not exist
1066 * previous to the call, respectively.
1067 *
1068 * Returns 0, or a negative error number on failure.
1069 */
1070int
1071ext4_xattr_set_handle(handle_t *handle, struct inode *inode, int name_index,
1072		      const char *name, const void *value, size_t value_len,
1073		      int flags)
1074{
1075	struct ext4_xattr_info i = {
1076		.name_index = name_index,
1077		.name = name,
1078		.value = value,
1079		.value_len = value_len,
1080
1081	};
1082	struct ext4_xattr_ibody_find is = {
1083		.s = { .not_found = -ENODATA, },
1084	};
1085	struct ext4_xattr_block_find bs = {
1086		.s = { .not_found = -ENODATA, },
1087	};
1088	unsigned long no_expand;
1089	int error;
1090
1091	if (!name)
1092		return -EINVAL;
1093	if (strlen(name) > 255)
1094		return -ERANGE;
1095	down_write(&EXT4_I(inode)->xattr_sem);
1096	no_expand = ext4_test_inode_state(inode, EXT4_STATE_NO_EXPAND);
1097	ext4_set_inode_state(inode, EXT4_STATE_NO_EXPAND);
1098
1099	error = ext4_reserve_inode_write(handle, inode, &is.iloc);
1100	if (error)
1101		goto cleanup;
1102
1103	if (ext4_test_inode_state(inode, EXT4_STATE_NEW)) {
1104		struct ext4_inode *raw_inode = ext4_raw_inode(&is.iloc);
1105		memset(raw_inode, 0, EXT4_SB(inode->i_sb)->s_inode_size);
1106		ext4_clear_inode_state(inode, EXT4_STATE_NEW);
1107	}
1108
1109	error = ext4_xattr_ibody_find(inode, &i, &is);
1110	if (error)
1111		goto cleanup;
1112	if (is.s.not_found)
1113		error = ext4_xattr_block_find(inode, &i, &bs);
1114	if (error)
1115		goto cleanup;
1116	if (is.s.not_found && bs.s.not_found) {
1117		error = -ENODATA;
1118		if (flags & XATTR_REPLACE)
1119			goto cleanup;
1120		error = 0;
1121		if (!value)
1122			goto cleanup;
1123	} else {
1124		error = -EEXIST;
1125		if (flags & XATTR_CREATE)
1126			goto cleanup;
1127	}
1128	if (!value) {
1129		if (!is.s.not_found)
1130			error = ext4_xattr_ibody_set(handle, inode, &i, &is);
1131		else if (!bs.s.not_found)
1132			error = ext4_xattr_block_set(handle, inode, &i, &bs);
1133	} else {
1134		error = ext4_xattr_ibody_set(handle, inode, &i, &is);
1135		if (!error && !bs.s.not_found) {
1136			i.value = NULL;
1137			error = ext4_xattr_block_set(handle, inode, &i, &bs);
1138		} else if (error == -ENOSPC) {
1139			if (EXT4_I(inode)->i_file_acl && !bs.s.base) {
1140				error = ext4_xattr_block_find(inode, &i, &bs);
1141				if (error)
1142					goto cleanup;
1143			}
1144			error = ext4_xattr_block_set(handle, inode, &i, &bs);
1145			if (error)
1146				goto cleanup;
1147			if (!is.s.not_found) {
1148				i.value = NULL;
1149				error = ext4_xattr_ibody_set(handle, inode, &i,
1150							     &is);
1151			}
1152		}
1153	}
1154	if (!error) {
1155		ext4_xattr_update_super_block(handle, inode->i_sb);
1156		inode->i_ctime = ext4_current_time(inode);
1157		if (!value)
1158			ext4_clear_inode_state(inode, EXT4_STATE_NO_EXPAND);
1159		error = ext4_mark_iloc_dirty(handle, inode, &is.iloc);
1160		/*
1161		 * The bh is consumed by ext4_mark_iloc_dirty, even with
1162		 * error != 0.
1163		 */
1164		is.iloc.bh = NULL;
1165		if (IS_SYNC(inode))
1166			ext4_handle_sync(handle);
1167	}
1168
1169cleanup:
1170	brelse(is.iloc.bh);
1171	brelse(bs.bh);
1172	if (no_expand == 0)
1173		ext4_clear_inode_state(inode, EXT4_STATE_NO_EXPAND);
1174	up_write(&EXT4_I(inode)->xattr_sem);
1175	return error;
1176}
1177
1178/*
1179 * ext4_xattr_set()
1180 *
1181 * Like ext4_xattr_set_handle, but start from an inode. This extended
1182 * attribute modification is a filesystem transaction by itself.
1183 *
1184 * Returns 0, or a negative error number on failure.
1185 */
1186int
1187ext4_xattr_set(struct inode *inode, int name_index, const char *name,
1188	       const void *value, size_t value_len, int flags)
1189{
1190	handle_t *handle;
1191	int error, retries = 0;
1192	int credits = ext4_jbd2_credits_xattr(inode);
1193
1194retry:
1195	handle = ext4_journal_start(inode, EXT4_HT_XATTR, credits);
1196	if (IS_ERR(handle)) {
1197		error = PTR_ERR(handle);
1198	} else {
1199		int error2;
1200
1201		error = ext4_xattr_set_handle(handle, inode, name_index, name,
1202					      value, value_len, flags);
1203		error2 = ext4_journal_stop(handle);
1204		if (error == -ENOSPC &&
1205		    ext4_should_retry_alloc(inode->i_sb, &retries))
1206			goto retry;
1207		if (error == 0)
1208			error = error2;
1209	}
1210
1211	return error;
1212}
1213
1214/*
1215 * Shift the EA entries in the inode to create space for the increased
1216 * i_extra_isize.
1217 */
1218static void ext4_xattr_shift_entries(struct ext4_xattr_entry *entry,
1219				     int value_offs_shift, void *to,
1220				     void *from, size_t n, int blocksize)
1221{
1222	struct ext4_xattr_entry *last = entry;
1223	int new_offs;
1224
1225	/* Adjust the value offsets of the entries */
1226	for (; !IS_LAST_ENTRY(last); last = EXT4_XATTR_NEXT(last)) {
1227		if (!last->e_value_block && last->e_value_size) {
1228			new_offs = le16_to_cpu(last->e_value_offs) +
1229							value_offs_shift;
1230			BUG_ON(new_offs + le32_to_cpu(last->e_value_size)
1231				 > blocksize);
1232			last->e_value_offs = cpu_to_le16(new_offs);
1233		}
1234	}
1235	/* Shift the entries by n bytes */
1236	memmove(to, from, n);
1237}
1238
1239/*
1240 * Expand an inode by new_extra_isize bytes when EAs are present.
1241 * Returns 0 on success or negative error number on failure.
1242 */
1243int ext4_expand_extra_isize_ea(struct inode *inode, int new_extra_isize,
1244			       struct ext4_inode *raw_inode, handle_t *handle)
1245{
1246	struct ext4_xattr_ibody_header *header;
1247	struct ext4_xattr_entry *entry, *last, *first;
1248	struct buffer_head *bh = NULL;
1249	struct ext4_xattr_ibody_find *is = NULL;
1250	struct ext4_xattr_block_find *bs = NULL;
1251	char *buffer = NULL, *b_entry_name = NULL;
1252	size_t min_offs, free;
1253	int total_ino;
1254	void *base, *start, *end;
1255	int extra_isize = 0, error = 0, tried_min_extra_isize = 0;
1256	int s_min_extra_isize = le16_to_cpu(EXT4_SB(inode->i_sb)->s_es->s_min_extra_isize);
1257
1258	down_write(&EXT4_I(inode)->xattr_sem);
1259retry:
1260	if (EXT4_I(inode)->i_extra_isize >= new_extra_isize) {
1261		up_write(&EXT4_I(inode)->xattr_sem);
1262		return 0;
1263	}
1264
1265	header = IHDR(inode, raw_inode);
1266	entry = IFIRST(header);
1267
1268	/*
1269	 * Check if enough free space is available in the inode to shift the
1270	 * entries ahead by new_extra_isize.
1271	 */
1272
1273	base = start = entry;
1274	end = (void *)raw_inode + EXT4_SB(inode->i_sb)->s_inode_size;
1275	min_offs = end - base;
1276	last = entry;
1277	total_ino = sizeof(struct ext4_xattr_ibody_header);
1278
1279	free = ext4_xattr_free_space(last, &min_offs, base, &total_ino);
1280	if (free >= new_extra_isize) {
1281		entry = IFIRST(header);
1282		ext4_xattr_shift_entries(entry,	EXT4_I(inode)->i_extra_isize
1283				- new_extra_isize, (void *)raw_inode +
1284				EXT4_GOOD_OLD_INODE_SIZE + new_extra_isize,
1285				(void *)header, total_ino,
1286				inode->i_sb->s_blocksize);
1287		EXT4_I(inode)->i_extra_isize = new_extra_isize;
1288		error = 0;
1289		goto cleanup;
1290	}
1291
1292	/*
1293	 * Enough free space isn't available in the inode, check if
1294	 * EA block can hold new_extra_isize bytes.
1295	 */
1296	if (EXT4_I(inode)->i_file_acl) {
1297		bh = sb_bread(inode->i_sb, EXT4_I(inode)->i_file_acl);
1298		error = -EIO;
1299		if (!bh)
1300			goto cleanup;
1301		if (ext4_xattr_check_block(inode, bh)) {
1302			EXT4_ERROR_INODE(inode, "bad block %llu",
1303					 EXT4_I(inode)->i_file_acl);
1304			error = -EIO;
1305			goto cleanup;
1306		}
1307		base = BHDR(bh);
1308		first = BFIRST(bh);
1309		end = bh->b_data + bh->b_size;
1310		min_offs = end - base;
1311		free = ext4_xattr_free_space(first, &min_offs, base, NULL);
 
1312		if (free < new_extra_isize) {
1313			if (!tried_min_extra_isize && s_min_extra_isize) {
1314				tried_min_extra_isize++;
1315				new_extra_isize = s_min_extra_isize;
1316				brelse(bh);
1317				goto retry;
1318			}
1319			error = -1;
1320			goto cleanup;
1321		}
1322	} else {
1323		free = inode->i_sb->s_blocksize;
1324	}
1325
1326	while (new_extra_isize > 0) {
1327		size_t offs, size, entry_size;
1328		struct ext4_xattr_entry *small_entry = NULL;
1329		struct ext4_xattr_info i = {
1330			.value = NULL,
1331			.value_len = 0,
1332		};
1333		unsigned int total_size;  /* EA entry size + value size */
1334		unsigned int shift_bytes; /* No. of bytes to shift EAs by? */
1335		unsigned int min_total_size = ~0U;
1336
1337		is = kzalloc(sizeof(struct ext4_xattr_ibody_find), GFP_NOFS);
1338		bs = kzalloc(sizeof(struct ext4_xattr_block_find), GFP_NOFS);
1339		if (!is || !bs) {
1340			error = -ENOMEM;
1341			goto cleanup;
1342		}
1343
1344		is->s.not_found = -ENODATA;
1345		bs->s.not_found = -ENODATA;
1346		is->iloc.bh = NULL;
1347		bs->bh = NULL;
1348
1349		last = IFIRST(header);
1350		/* Find the entry best suited to be pushed into EA block */
1351		entry = NULL;
1352		for (; !IS_LAST_ENTRY(last); last = EXT4_XATTR_NEXT(last)) {
1353			total_size =
1354			EXT4_XATTR_SIZE(le32_to_cpu(last->e_value_size)) +
1355					EXT4_XATTR_LEN(last->e_name_len);
1356			if (total_size <= free && total_size < min_total_size) {
1357				if (total_size < new_extra_isize) {
1358					small_entry = last;
1359				} else {
1360					entry = last;
1361					min_total_size = total_size;
1362				}
1363			}
1364		}
1365
1366		if (entry == NULL) {
1367			if (small_entry) {
1368				entry = small_entry;
1369			} else {
1370				if (!tried_min_extra_isize &&
1371				    s_min_extra_isize) {
1372					tried_min_extra_isize++;
1373					new_extra_isize = s_min_extra_isize;
1374					kfree(is); is = NULL;
1375					kfree(bs); bs = NULL;
1376					brelse(bh);
1377					goto retry;
1378				}
1379				error = -1;
1380				goto cleanup;
1381			}
1382		}
1383		offs = le16_to_cpu(entry->e_value_offs);
1384		size = le32_to_cpu(entry->e_value_size);
1385		entry_size = EXT4_XATTR_LEN(entry->e_name_len);
1386		i.name_index = entry->e_name_index,
1387		buffer = kmalloc(EXT4_XATTR_SIZE(size), GFP_NOFS);
1388		b_entry_name = kmalloc(entry->e_name_len + 1, GFP_NOFS);
1389		if (!buffer || !b_entry_name) {
1390			error = -ENOMEM;
1391			goto cleanup;
1392		}
1393		/* Save the entry name and the entry value */
1394		memcpy(buffer, (void *)IFIRST(header) + offs,
1395		       EXT4_XATTR_SIZE(size));
1396		memcpy(b_entry_name, entry->e_name, entry->e_name_len);
1397		b_entry_name[entry->e_name_len] = '\0';
1398		i.name = b_entry_name;
1399
1400		error = ext4_get_inode_loc(inode, &is->iloc);
1401		if (error)
1402			goto cleanup;
1403
1404		error = ext4_xattr_ibody_find(inode, &i, is);
1405		if (error)
1406			goto cleanup;
1407
1408		/* Remove the chosen entry from the inode */
1409		error = ext4_xattr_ibody_set(handle, inode, &i, is);
1410		if (error)
1411			goto cleanup;
1412
1413		entry = IFIRST(header);
1414		if (entry_size + EXT4_XATTR_SIZE(size) >= new_extra_isize)
1415			shift_bytes = new_extra_isize;
1416		else
1417			shift_bytes = entry_size + size;
1418		/* Adjust the offsets and shift the remaining entries ahead */
1419		ext4_xattr_shift_entries(entry, EXT4_I(inode)->i_extra_isize -
1420			shift_bytes, (void *)raw_inode +
1421			EXT4_GOOD_OLD_INODE_SIZE + extra_isize + shift_bytes,
1422			(void *)header, total_ino - entry_size,
1423			inode->i_sb->s_blocksize);
1424
1425		extra_isize += shift_bytes;
1426		new_extra_isize -= shift_bytes;
1427		EXT4_I(inode)->i_extra_isize = extra_isize;
1428
1429		i.name = b_entry_name;
1430		i.value = buffer;
1431		i.value_len = size;
1432		error = ext4_xattr_block_find(inode, &i, bs);
1433		if (error)
1434			goto cleanup;
1435
1436		/* Add entry which was removed from the inode into the block */
1437		error = ext4_xattr_block_set(handle, inode, &i, bs);
1438		if (error)
1439			goto cleanup;
1440		kfree(b_entry_name);
1441		kfree(buffer);
1442		b_entry_name = NULL;
1443		buffer = NULL;
1444		brelse(is->iloc.bh);
1445		kfree(is);
1446		kfree(bs);
1447	}
1448	brelse(bh);
1449	up_write(&EXT4_I(inode)->xattr_sem);
1450	return 0;
1451
1452cleanup:
1453	kfree(b_entry_name);
1454	kfree(buffer);
1455	if (is)
1456		brelse(is->iloc.bh);
1457	kfree(is);
1458	kfree(bs);
1459	brelse(bh);
1460	up_write(&EXT4_I(inode)->xattr_sem);
1461	return error;
1462}
1463
1464
1465
1466/*
1467 * ext4_xattr_delete_inode()
1468 *
1469 * Free extended attribute resources associated with this inode. This
1470 * is called immediately before an inode is freed. We have exclusive
1471 * access to the inode.
1472 */
1473void
1474ext4_xattr_delete_inode(handle_t *handle, struct inode *inode)
1475{
1476	struct buffer_head *bh = NULL;
1477
1478	if (!EXT4_I(inode)->i_file_acl)
1479		goto cleanup;
1480	bh = sb_bread(inode->i_sb, EXT4_I(inode)->i_file_acl);
1481	if (!bh) {
1482		EXT4_ERROR_INODE(inode, "block %llu read error",
1483				 EXT4_I(inode)->i_file_acl);
1484		goto cleanup;
1485	}
1486	if (BHDR(bh)->h_magic != cpu_to_le32(EXT4_XATTR_MAGIC) ||
1487	    BHDR(bh)->h_blocks != cpu_to_le32(1)) {
1488		EXT4_ERROR_INODE(inode, "bad block %llu",
1489				 EXT4_I(inode)->i_file_acl);
1490		goto cleanup;
1491	}
1492	ext4_xattr_release_block(handle, inode, bh);
1493	EXT4_I(inode)->i_file_acl = 0;
1494
1495cleanup:
1496	brelse(bh);
1497}
1498
1499/*
1500 * ext4_xattr_put_super()
1501 *
1502 * This is called when a file system is unmounted.
1503 */
1504void
1505ext4_xattr_put_super(struct super_block *sb)
1506{
1507	mb_cache_shrink(sb->s_bdev);
1508}
1509
1510/*
1511 * ext4_xattr_cache_insert()
1512 *
1513 * Create a new entry in the extended attribute cache, and insert
1514 * it unless such an entry is already in the cache.
1515 *
1516 * Returns 0, or a negative error number on failure.
1517 */
1518static void
1519ext4_xattr_cache_insert(struct mb_cache *ext4_mb_cache, struct buffer_head *bh)
1520{
1521	__u32 hash = le32_to_cpu(BHDR(bh)->h_hash);
1522	struct mb_cache_entry *ce;
1523	int error;
1524
1525	ce = mb_cache_entry_alloc(ext4_mb_cache, GFP_NOFS);
1526	if (!ce) {
1527		ea_bdebug(bh, "out of memory");
1528		return;
1529	}
1530	error = mb_cache_entry_insert(ce, bh->b_bdev, bh->b_blocknr, hash);
1531	if (error) {
1532		mb_cache_entry_free(ce);
1533		if (error == -EBUSY) {
1534			ea_bdebug(bh, "already in cache");
1535			error = 0;
1536		}
1537	} else {
1538		ea_bdebug(bh, "inserting [%x]", (int)hash);
1539		mb_cache_entry_release(ce);
1540	}
1541}
1542
1543/*
1544 * ext4_xattr_cmp()
1545 *
1546 * Compare two extended attribute blocks for equality.
1547 *
1548 * Returns 0 if the blocks are equal, 1 if they differ, and
1549 * a negative error number on errors.
1550 */
1551static int
1552ext4_xattr_cmp(struct ext4_xattr_header *header1,
1553	       struct ext4_xattr_header *header2)
1554{
1555	struct ext4_xattr_entry *entry1, *entry2;
1556
1557	entry1 = ENTRY(header1+1);
1558	entry2 = ENTRY(header2+1);
1559	while (!IS_LAST_ENTRY(entry1)) {
1560		if (IS_LAST_ENTRY(entry2))
1561			return 1;
1562		if (entry1->e_hash != entry2->e_hash ||
1563		    entry1->e_name_index != entry2->e_name_index ||
1564		    entry1->e_name_len != entry2->e_name_len ||
1565		    entry1->e_value_size != entry2->e_value_size ||
1566		    memcmp(entry1->e_name, entry2->e_name, entry1->e_name_len))
1567			return 1;
1568		if (entry1->e_value_block != 0 || entry2->e_value_block != 0)
1569			return -EIO;
1570		if (memcmp((char *)header1 + le16_to_cpu(entry1->e_value_offs),
1571			   (char *)header2 + le16_to_cpu(entry2->e_value_offs),
1572			   le32_to_cpu(entry1->e_value_size)))
1573			return 1;
1574
1575		entry1 = EXT4_XATTR_NEXT(entry1);
1576		entry2 = EXT4_XATTR_NEXT(entry2);
1577	}
1578	if (!IS_LAST_ENTRY(entry2))
1579		return 1;
1580	return 0;
1581}
1582
1583/*
1584 * ext4_xattr_cache_find()
1585 *
1586 * Find an identical extended attribute block.
1587 *
1588 * Returns a pointer to the block found, or NULL if such a block was
1589 * not found or an error occurred.
1590 */
1591static struct buffer_head *
1592ext4_xattr_cache_find(struct inode *inode, struct ext4_xattr_header *header,
1593		      struct mb_cache_entry **pce)
1594{
1595	__u32 hash = le32_to_cpu(header->h_hash);
1596	struct mb_cache_entry *ce;
1597	struct mb_cache *ext4_mb_cache = EXT4_GET_MB_CACHE(inode);
1598
1599	if (!header->h_hash)
1600		return NULL;  /* never share */
1601	ea_idebug(inode, "looking for cached blocks [%x]", (int)hash);
1602again:
1603	ce = mb_cache_entry_find_first(ext4_mb_cache, inode->i_sb->s_bdev,
1604				       hash);
1605	while (ce) {
1606		struct buffer_head *bh;
1607
1608		if (IS_ERR(ce)) {
1609			if (PTR_ERR(ce) == -EAGAIN)
1610				goto again;
1611			break;
1612		}
1613		bh = sb_bread(inode->i_sb, ce->e_block);
1614		if (!bh) {
1615			EXT4_ERROR_INODE(inode, "block %lu read error",
1616					 (unsigned long) ce->e_block);
1617		} else if (le32_to_cpu(BHDR(bh)->h_refcount) >=
1618				EXT4_XATTR_REFCOUNT_MAX) {
1619			ea_idebug(inode, "block %lu refcount %d>=%d",
1620				  (unsigned long) ce->e_block,
1621				  le32_to_cpu(BHDR(bh)->h_refcount),
1622					  EXT4_XATTR_REFCOUNT_MAX);
1623		} else if (ext4_xattr_cmp(header, BHDR(bh)) == 0) {
1624			*pce = ce;
1625			return bh;
1626		}
1627		brelse(bh);
1628		ce = mb_cache_entry_find_next(ce, inode->i_sb->s_bdev, hash);
1629	}
1630	return NULL;
1631}
1632
1633#define NAME_HASH_SHIFT 5
1634#define VALUE_HASH_SHIFT 16
1635
1636/*
1637 * ext4_xattr_hash_entry()
1638 *
1639 * Compute the hash of an extended attribute.
1640 */
1641static inline void ext4_xattr_hash_entry(struct ext4_xattr_header *header,
1642					 struct ext4_xattr_entry *entry)
1643{
1644	__u32 hash = 0;
1645	char *name = entry->e_name;
1646	int n;
1647
1648	for (n = 0; n < entry->e_name_len; n++) {
1649		hash = (hash << NAME_HASH_SHIFT) ^
1650		       (hash >> (8*sizeof(hash) - NAME_HASH_SHIFT)) ^
1651		       *name++;
1652	}
1653
1654	if (entry->e_value_block == 0 && entry->e_value_size != 0) {
1655		__le32 *value = (__le32 *)((char *)header +
1656			le16_to_cpu(entry->e_value_offs));
1657		for (n = (le32_to_cpu(entry->e_value_size) +
1658		     EXT4_XATTR_ROUND) >> EXT4_XATTR_PAD_BITS; n; n--) {
1659			hash = (hash << VALUE_HASH_SHIFT) ^
1660			       (hash >> (8*sizeof(hash) - VALUE_HASH_SHIFT)) ^
1661			       le32_to_cpu(*value++);
1662		}
1663	}
1664	entry->e_hash = cpu_to_le32(hash);
1665}
1666
1667#undef NAME_HASH_SHIFT
1668#undef VALUE_HASH_SHIFT
1669
1670#define BLOCK_HASH_SHIFT 16
1671
1672/*
1673 * ext4_xattr_rehash()
1674 *
1675 * Re-compute the extended attribute hash value after an entry has changed.
1676 */
1677static void ext4_xattr_rehash(struct ext4_xattr_header *header,
1678			      struct ext4_xattr_entry *entry)
1679{
1680	struct ext4_xattr_entry *here;
1681	__u32 hash = 0;
1682
1683	ext4_xattr_hash_entry(header, entry);
1684	here = ENTRY(header+1);
1685	while (!IS_LAST_ENTRY(here)) {
1686		if (!here->e_hash) {
1687			/* Block is not shared if an entry's hash value == 0 */
1688			hash = 0;
1689			break;
1690		}
1691		hash = (hash << BLOCK_HASH_SHIFT) ^
1692		       (hash >> (8*sizeof(hash) - BLOCK_HASH_SHIFT)) ^
1693		       le32_to_cpu(here->e_hash);
1694		here = EXT4_XATTR_NEXT(here);
1695	}
1696	header->h_hash = cpu_to_le32(hash);
1697}
1698
1699#undef BLOCK_HASH_SHIFT
1700
1701#define	HASH_BUCKET_BITS	10
1702
1703struct mb_cache *
1704ext4_xattr_create_cache(char *name)
1705{
1706	return mb_cache_create(name, HASH_BUCKET_BITS);
 
 
 
1707}
1708
1709void ext4_xattr_destroy_cache(struct mb_cache *cache)
 
1710{
1711	if (cache)
1712		mb_cache_destroy(cache);
 
1713}
1714