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