Btrfs: do extent allocation and reference count updates in the background
[safe/jmp/linux-2.6] / fs / btrfs / file.c
1 /*
2  * Copyright (C) 2007 Oracle.  All rights reserved.
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public
6  * License v2 as published by the Free Software Foundation.
7  *
8  * This program is distributed in the hope that it will be useful,
9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11  * General Public License for more details.
12  *
13  * You should have received a copy of the GNU General Public
14  * License along with this program; if not, write to the
15  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
16  * Boston, MA 021110-1307, USA.
17  */
18
19 #include <linux/fs.h>
20 #include <linux/pagemap.h>
21 #include <linux/highmem.h>
22 #include <linux/time.h>
23 #include <linux/init.h>
24 #include <linux/string.h>
25 #include <linux/smp_lock.h>
26 #include <linux/backing-dev.h>
27 #include <linux/mpage.h>
28 #include <linux/swap.h>
29 #include <linux/writeback.h>
30 #include <linux/statfs.h>
31 #include <linux/compat.h>
32 #include "ctree.h"
33 #include "disk-io.h"
34 #include "transaction.h"
35 #include "btrfs_inode.h"
36 #include "ioctl.h"
37 #include "print-tree.h"
38 #include "tree-log.h"
39 #include "locking.h"
40 #include "compat.h"
41
42
43 /* simple helper to fault in pages and copy.  This should go away
44  * and be replaced with calls into generic code.
45  */
46 static noinline int btrfs_copy_from_user(loff_t pos, int num_pages,
47                                          int write_bytes,
48                                          struct page **prepared_pages,
49                                          const char __user *buf)
50 {
51         long page_fault = 0;
52         int i;
53         int offset = pos & (PAGE_CACHE_SIZE - 1);
54
55         for (i = 0; i < num_pages && write_bytes > 0; i++, offset = 0) {
56                 size_t count = min_t(size_t,
57                                      PAGE_CACHE_SIZE - offset, write_bytes);
58                 struct page *page = prepared_pages[i];
59                 fault_in_pages_readable(buf, count);
60
61                 /* Copy data from userspace to the current page */
62                 kmap(page);
63                 page_fault = __copy_from_user(page_address(page) + offset,
64                                               buf, count);
65                 /* Flush processor's dcache for this page */
66                 flush_dcache_page(page);
67                 kunmap(page);
68                 buf += count;
69                 write_bytes -= count;
70
71                 if (page_fault)
72                         break;
73         }
74         return page_fault ? -EFAULT : 0;
75 }
76
77 /*
78  * unlocks pages after btrfs_file_write is done with them
79  */
80 static noinline void btrfs_drop_pages(struct page **pages, size_t num_pages)
81 {
82         size_t i;
83         for (i = 0; i < num_pages; i++) {
84                 if (!pages[i])
85                         break;
86                 /* page checked is some magic around finding pages that
87                  * have been modified without going through btrfs_set_page_dirty
88                  * clear it here
89                  */
90                 ClearPageChecked(pages[i]);
91                 unlock_page(pages[i]);
92                 mark_page_accessed(pages[i]);
93                 page_cache_release(pages[i]);
94         }
95 }
96
97 /*
98  * after copy_from_user, pages need to be dirtied and we need to make
99  * sure holes are created between the current EOF and the start of
100  * any next extents (if required).
101  *
102  * this also makes the decision about creating an inline extent vs
103  * doing real data extents, marking pages dirty and delalloc as required.
104  */
105 static noinline int dirty_and_release_pages(struct btrfs_trans_handle *trans,
106                                    struct btrfs_root *root,
107                                    struct file *file,
108                                    struct page **pages,
109                                    size_t num_pages,
110                                    loff_t pos,
111                                    size_t write_bytes)
112 {
113         int err = 0;
114         int i;
115         struct inode *inode = fdentry(file)->d_inode;
116         struct extent_io_tree *io_tree = &BTRFS_I(inode)->io_tree;
117         u64 hint_byte;
118         u64 num_bytes;
119         u64 start_pos;
120         u64 end_of_last_block;
121         u64 end_pos = pos + write_bytes;
122         loff_t isize = i_size_read(inode);
123
124         start_pos = pos & ~((u64)root->sectorsize - 1);
125         num_bytes = (write_bytes + pos - start_pos +
126                     root->sectorsize - 1) & ~((u64)root->sectorsize - 1);
127
128         end_of_last_block = start_pos + num_bytes - 1;
129
130         lock_extent(io_tree, start_pos, end_of_last_block, GFP_NOFS);
131         trans = btrfs_join_transaction(root, 1);
132         if (!trans) {
133                 err = -ENOMEM;
134                 goto out_unlock;
135         }
136         btrfs_set_trans_block_group(trans, inode);
137         hint_byte = 0;
138
139         set_extent_uptodate(io_tree, start_pos, end_of_last_block, GFP_NOFS);
140
141         /* check for reserved extents on each page, we don't want
142          * to reset the delalloc bit on things that already have
143          * extents reserved.
144          */
145         btrfs_set_extent_delalloc(inode, start_pos, end_of_last_block);
146         for (i = 0; i < num_pages; i++) {
147                 struct page *p = pages[i];
148                 SetPageUptodate(p);
149                 ClearPageChecked(p);
150                 set_page_dirty(p);
151         }
152         if (end_pos > isize) {
153                 i_size_write(inode, end_pos);
154                 btrfs_update_inode(trans, root, inode);
155         }
156         err = btrfs_end_transaction(trans, root);
157 out_unlock:
158         unlock_extent(io_tree, start_pos, end_of_last_block, GFP_NOFS);
159         return err;
160 }
161
162 /*
163  * this drops all the extents in the cache that intersect the range
164  * [start, end].  Existing extents are split as required.
165  */
166 int btrfs_drop_extent_cache(struct inode *inode, u64 start, u64 end,
167                             int skip_pinned)
168 {
169         struct extent_map *em;
170         struct extent_map *split = NULL;
171         struct extent_map *split2 = NULL;
172         struct extent_map_tree *em_tree = &BTRFS_I(inode)->extent_tree;
173         u64 len = end - start + 1;
174         int ret;
175         int testend = 1;
176         unsigned long flags;
177         int compressed = 0;
178
179         WARN_ON(end < start);
180         if (end == (u64)-1) {
181                 len = (u64)-1;
182                 testend = 0;
183         }
184         while (1) {
185                 if (!split)
186                         split = alloc_extent_map(GFP_NOFS);
187                 if (!split2)
188                         split2 = alloc_extent_map(GFP_NOFS);
189
190                 spin_lock(&em_tree->lock);
191                 em = lookup_extent_mapping(em_tree, start, len);
192                 if (!em) {
193                         spin_unlock(&em_tree->lock);
194                         break;
195                 }
196                 flags = em->flags;
197                 if (skip_pinned && test_bit(EXTENT_FLAG_PINNED, &em->flags)) {
198                         spin_unlock(&em_tree->lock);
199                         if (em->start <= start &&
200                             (!testend || em->start + em->len >= start + len)) {
201                                 free_extent_map(em);
202                                 break;
203                         }
204                         if (start < em->start) {
205                                 len = em->start - start;
206                         } else {
207                                 len = start + len - (em->start + em->len);
208                                 start = em->start + em->len;
209                         }
210                         free_extent_map(em);
211                         continue;
212                 }
213                 compressed = test_bit(EXTENT_FLAG_COMPRESSED, &em->flags);
214                 clear_bit(EXTENT_FLAG_PINNED, &em->flags);
215                 remove_extent_mapping(em_tree, em);
216
217                 if (em->block_start < EXTENT_MAP_LAST_BYTE &&
218                     em->start < start) {
219                         split->start = em->start;
220                         split->len = start - em->start;
221                         split->orig_start = em->orig_start;
222                         split->block_start = em->block_start;
223
224                         if (compressed)
225                                 split->block_len = em->block_len;
226                         else
227                                 split->block_len = split->len;
228
229                         split->bdev = em->bdev;
230                         split->flags = flags;
231                         ret = add_extent_mapping(em_tree, split);
232                         BUG_ON(ret);
233                         free_extent_map(split);
234                         split = split2;
235                         split2 = NULL;
236                 }
237                 if (em->block_start < EXTENT_MAP_LAST_BYTE &&
238                     testend && em->start + em->len > start + len) {
239                         u64 diff = start + len - em->start;
240
241                         split->start = start + len;
242                         split->len = em->start + em->len - (start + len);
243                         split->bdev = em->bdev;
244                         split->flags = flags;
245
246                         if (compressed) {
247                                 split->block_len = em->block_len;
248                                 split->block_start = em->block_start;
249                                 split->orig_start = em->orig_start;
250                         } else {
251                                 split->block_len = split->len;
252                                 split->block_start = em->block_start + diff;
253                                 split->orig_start = split->start;
254                         }
255
256                         ret = add_extent_mapping(em_tree, split);
257                         BUG_ON(ret);
258                         free_extent_map(split);
259                         split = NULL;
260                 }
261                 spin_unlock(&em_tree->lock);
262
263                 /* once for us */
264                 free_extent_map(em);
265                 /* once for the tree*/
266                 free_extent_map(em);
267         }
268         if (split)
269                 free_extent_map(split);
270         if (split2)
271                 free_extent_map(split2);
272         return 0;
273 }
274
275 int btrfs_check_file(struct btrfs_root *root, struct inode *inode)
276 {
277         return 0;
278 #if 0
279         struct btrfs_path *path;
280         struct btrfs_key found_key;
281         struct extent_buffer *leaf;
282         struct btrfs_file_extent_item *extent;
283         u64 last_offset = 0;
284         int nritems;
285         int slot;
286         int found_type;
287         int ret;
288         int err = 0;
289         u64 extent_end = 0;
290
291         path = btrfs_alloc_path();
292         ret = btrfs_lookup_file_extent(NULL, root, path, inode->i_ino,
293                                        last_offset, 0);
294         while (1) {
295                 nritems = btrfs_header_nritems(path->nodes[0]);
296                 if (path->slots[0] >= nritems) {
297                         ret = btrfs_next_leaf(root, path);
298                         if (ret)
299                                 goto out;
300                         nritems = btrfs_header_nritems(path->nodes[0]);
301                 }
302                 slot = path->slots[0];
303                 leaf = path->nodes[0];
304                 btrfs_item_key_to_cpu(leaf, &found_key, slot);
305                 if (found_key.objectid != inode->i_ino)
306                         break;
307                 if (found_key.type != BTRFS_EXTENT_DATA_KEY)
308                         goto out;
309
310                 if (found_key.offset < last_offset) {
311                         WARN_ON(1);
312                         btrfs_print_leaf(root, leaf);
313                         printk(KERN_ERR "inode %lu found offset %llu "
314                                "expected %llu\n", inode->i_ino,
315                                (unsigned long long)found_key.offset,
316                                (unsigned long long)last_offset);
317                         err = 1;
318                         goto out;
319                 }
320                 extent = btrfs_item_ptr(leaf, slot,
321                                         struct btrfs_file_extent_item);
322                 found_type = btrfs_file_extent_type(leaf, extent);
323                 if (found_type == BTRFS_FILE_EXTENT_REG) {
324                         extent_end = found_key.offset +
325                              btrfs_file_extent_num_bytes(leaf, extent);
326                 } else if (found_type == BTRFS_FILE_EXTENT_INLINE) {
327                         struct btrfs_item *item;
328                         item = btrfs_item_nr(leaf, slot);
329                         extent_end = found_key.offset +
330                              btrfs_file_extent_inline_len(leaf, extent);
331                         extent_end = (extent_end + root->sectorsize - 1) &
332                                 ~((u64)root->sectorsize - 1);
333                 }
334                 last_offset = extent_end;
335                 path->slots[0]++;
336         }
337         if (0 && last_offset < inode->i_size) {
338                 WARN_ON(1);
339                 btrfs_print_leaf(root, leaf);
340                 printk(KERN_ERR "inode %lu found offset %llu size %llu\n",
341                        inode->i_ino, (unsigned long long)last_offset,
342                        (unsigned long long)inode->i_size);
343                 err = 1;
344
345         }
346 out:
347         btrfs_free_path(path);
348         return err;
349 #endif
350 }
351
352 /*
353  * this is very complex, but the basic idea is to drop all extents
354  * in the range start - end.  hint_block is filled in with a block number
355  * that would be a good hint to the block allocator for this file.
356  *
357  * If an extent intersects the range but is not entirely inside the range
358  * it is either truncated or split.  Anything entirely inside the range
359  * is deleted from the tree.
360  *
361  * inline_limit is used to tell this code which offsets in the file to keep
362  * if they contain inline extents.
363  */
364 noinline int btrfs_drop_extents(struct btrfs_trans_handle *trans,
365                        struct btrfs_root *root, struct inode *inode,
366                        u64 start, u64 end, u64 inline_limit, u64 *hint_byte)
367 {
368         u64 extent_end = 0;
369         u64 locked_end = end;
370         u64 search_start = start;
371         u64 leaf_start;
372         u64 ram_bytes = 0;
373         u64 orig_parent = 0;
374         u64 disk_bytenr = 0;
375         u8 compression;
376         u8 encryption;
377         u16 other_encoding = 0;
378         u64 root_gen;
379         u64 root_owner;
380         struct extent_buffer *leaf;
381         struct btrfs_file_extent_item *extent;
382         struct btrfs_path *path;
383         struct btrfs_key key;
384         struct btrfs_file_extent_item old;
385         int keep;
386         int slot;
387         int bookend;
388         int found_type = 0;
389         int found_extent;
390         int found_inline;
391         int recow;
392         int ret;
393
394         inline_limit = 0;
395         btrfs_drop_extent_cache(inode, start, end - 1, 0);
396
397         path = btrfs_alloc_path();
398         if (!path)
399                 return -ENOMEM;
400         while (1) {
401                 recow = 0;
402                 btrfs_release_path(root, path);
403                 ret = btrfs_lookup_file_extent(trans, root, path, inode->i_ino,
404                                                search_start, -1);
405                 if (ret < 0)
406                         goto out;
407                 if (ret > 0) {
408                         if (path->slots[0] == 0) {
409                                 ret = 0;
410                                 goto out;
411                         }
412                         path->slots[0]--;
413                 }
414 next_slot:
415                 keep = 0;
416                 bookend = 0;
417                 found_extent = 0;
418                 found_inline = 0;
419                 leaf_start = 0;
420                 root_gen = 0;
421                 root_owner = 0;
422                 compression = 0;
423                 encryption = 0;
424                 extent = NULL;
425                 leaf = path->nodes[0];
426                 slot = path->slots[0];
427                 ret = 0;
428                 btrfs_item_key_to_cpu(leaf, &key, slot);
429                 if (btrfs_key_type(&key) == BTRFS_EXTENT_DATA_KEY &&
430                     key.offset >= end) {
431                         goto out;
432                 }
433                 if (btrfs_key_type(&key) > BTRFS_EXTENT_DATA_KEY ||
434                     key.objectid != inode->i_ino) {
435                         goto out;
436                 }
437                 if (recow) {
438                         search_start = max(key.offset, start);
439                         continue;
440                 }
441                 if (btrfs_key_type(&key) == BTRFS_EXTENT_DATA_KEY) {
442                         extent = btrfs_item_ptr(leaf, slot,
443                                                 struct btrfs_file_extent_item);
444                         found_type = btrfs_file_extent_type(leaf, extent);
445                         compression = btrfs_file_extent_compression(leaf,
446                                                                     extent);
447                         encryption = btrfs_file_extent_encryption(leaf,
448                                                                   extent);
449                         other_encoding = btrfs_file_extent_other_encoding(leaf,
450                                                                   extent);
451                         if (found_type == BTRFS_FILE_EXTENT_REG ||
452                             found_type == BTRFS_FILE_EXTENT_PREALLOC) {
453                                 extent_end =
454                                      btrfs_file_extent_disk_bytenr(leaf,
455                                                                    extent);
456                                 if (extent_end)
457                                         *hint_byte = extent_end;
458
459                                 extent_end = key.offset +
460                                      btrfs_file_extent_num_bytes(leaf, extent);
461                                 ram_bytes = btrfs_file_extent_ram_bytes(leaf,
462                                                                 extent);
463                                 found_extent = 1;
464                         } else if (found_type == BTRFS_FILE_EXTENT_INLINE) {
465                                 found_inline = 1;
466                                 extent_end = key.offset +
467                                      btrfs_file_extent_inline_len(leaf, extent);
468                         }
469                 } else {
470                         extent_end = search_start;
471                 }
472
473                 /* we found nothing we can drop */
474                 if ((!found_extent && !found_inline) ||
475                     search_start >= extent_end) {
476                         int nextret;
477                         u32 nritems;
478                         nritems = btrfs_header_nritems(leaf);
479                         if (slot >= nritems - 1) {
480                                 nextret = btrfs_next_leaf(root, path);
481                                 if (nextret)
482                                         goto out;
483                                 recow = 1;
484                         } else {
485                                 path->slots[0]++;
486                         }
487                         goto next_slot;
488                 }
489
490                 if (end <= extent_end && start >= key.offset && found_inline)
491                         *hint_byte = EXTENT_MAP_INLINE;
492
493                 if (found_extent) {
494                         read_extent_buffer(leaf, &old, (unsigned long)extent,
495                                            sizeof(old));
496                         root_gen = btrfs_header_generation(leaf);
497                         root_owner = btrfs_header_owner(leaf);
498                         leaf_start = leaf->start;
499                 }
500
501                 if (end < extent_end && end >= key.offset) {
502                         bookend = 1;
503                         if (found_inline && start <= key.offset)
504                                 keep = 1;
505                 }
506
507                 if (bookend && found_extent) {
508                         if (locked_end < extent_end) {
509                                 ret = try_lock_extent(&BTRFS_I(inode)->io_tree,
510                                                 locked_end, extent_end - 1,
511                                                 GFP_NOFS);
512                                 if (!ret) {
513                                         btrfs_release_path(root, path);
514                                         lock_extent(&BTRFS_I(inode)->io_tree,
515                                                 locked_end, extent_end - 1,
516                                                 GFP_NOFS);
517                                         locked_end = extent_end;
518                                         continue;
519                                 }
520                                 locked_end = extent_end;
521                         }
522                         orig_parent = path->nodes[0]->start;
523                         disk_bytenr = le64_to_cpu(old.disk_bytenr);
524                         if (disk_bytenr != 0) {
525                                 ret = btrfs_inc_extent_ref(trans, root,
526                                            disk_bytenr,
527                                            le64_to_cpu(old.disk_num_bytes),
528                                            orig_parent, root->root_key.objectid,
529                                            trans->transid, inode->i_ino);
530                                 BUG_ON(ret);
531                         }
532                 }
533
534                 if (found_inline) {
535                         u64 mask = root->sectorsize - 1;
536                         search_start = (extent_end + mask) & ~mask;
537                 } else
538                         search_start = extent_end;
539
540                 /* truncate existing extent */
541                 if (start > key.offset) {
542                         u64 new_num;
543                         u64 old_num;
544                         keep = 1;
545                         WARN_ON(start & (root->sectorsize - 1));
546                         if (found_extent) {
547                                 new_num = start - key.offset;
548                                 old_num = btrfs_file_extent_num_bytes(leaf,
549                                                                       extent);
550                                 *hint_byte =
551                                         btrfs_file_extent_disk_bytenr(leaf,
552                                                                       extent);
553                                 if (btrfs_file_extent_disk_bytenr(leaf,
554                                                                   extent)) {
555                                         inode_sub_bytes(inode, old_num -
556                                                         new_num);
557                                 }
558                                 btrfs_set_file_extent_num_bytes(leaf,
559                                                         extent, new_num);
560                                 btrfs_mark_buffer_dirty(leaf);
561                         } else if (key.offset < inline_limit &&
562                                    (end > extent_end) &&
563                                    (inline_limit < extent_end)) {
564                                 u32 new_size;
565                                 new_size = btrfs_file_extent_calc_inline_size(
566                                                    inline_limit - key.offset);
567                                 inode_sub_bytes(inode, extent_end -
568                                                 inline_limit);
569                                 btrfs_set_file_extent_ram_bytes(leaf, extent,
570                                                         new_size);
571                                 if (!compression && !encryption) {
572                                         btrfs_truncate_item(trans, root, path,
573                                                             new_size, 1);
574                                 }
575                         }
576                 }
577                 /* delete the entire extent */
578                 if (!keep) {
579                         if (found_inline)
580                                 inode_sub_bytes(inode, extent_end -
581                                                 key.offset);
582                         ret = btrfs_del_item(trans, root, path);
583                         /* TODO update progress marker and return */
584                         BUG_ON(ret);
585                         extent = NULL;
586                         btrfs_release_path(root, path);
587                         /* the extent will be freed later */
588                 }
589                 if (bookend && found_inline && start <= key.offset) {
590                         u32 new_size;
591                         new_size = btrfs_file_extent_calc_inline_size(
592                                                    extent_end - end);
593                         inode_sub_bytes(inode, end - key.offset);
594                         btrfs_set_file_extent_ram_bytes(leaf, extent,
595                                                         new_size);
596                         if (!compression && !encryption)
597                                 ret = btrfs_truncate_item(trans, root, path,
598                                                           new_size, 0);
599                         BUG_ON(ret);
600                 }
601                 /* create bookend, splitting the extent in two */
602                 if (bookend && found_extent) {
603                         struct btrfs_key ins;
604                         ins.objectid = inode->i_ino;
605                         ins.offset = end;
606                         btrfs_set_key_type(&ins, BTRFS_EXTENT_DATA_KEY);
607
608                         btrfs_release_path(root, path);
609                         ret = btrfs_insert_empty_item(trans, root, path, &ins,
610                                                       sizeof(*extent));
611                         BUG_ON(ret);
612
613                         leaf = path->nodes[0];
614                         extent = btrfs_item_ptr(leaf, path->slots[0],
615                                                 struct btrfs_file_extent_item);
616                         write_extent_buffer(leaf, &old,
617                                             (unsigned long)extent, sizeof(old));
618
619                         btrfs_set_file_extent_compression(leaf, extent,
620                                                           compression);
621                         btrfs_set_file_extent_encryption(leaf, extent,
622                                                          encryption);
623                         btrfs_set_file_extent_other_encoding(leaf, extent,
624                                                              other_encoding);
625                         btrfs_set_file_extent_offset(leaf, extent,
626                                     le64_to_cpu(old.offset) + end - key.offset);
627                         WARN_ON(le64_to_cpu(old.num_bytes) <
628                                 (extent_end - end));
629                         btrfs_set_file_extent_num_bytes(leaf, extent,
630                                                         extent_end - end);
631
632                         /*
633                          * set the ram bytes to the size of the full extent
634                          * before splitting.  This is a worst case flag,
635                          * but its the best we can do because we don't know
636                          * how splitting affects compression
637                          */
638                         btrfs_set_file_extent_ram_bytes(leaf, extent,
639                                                         ram_bytes);
640                         btrfs_set_file_extent_type(leaf, extent, found_type);
641
642                         btrfs_mark_buffer_dirty(path->nodes[0]);
643
644                         if (disk_bytenr != 0) {
645                                 ret = btrfs_update_extent_ref(trans, root,
646                                                 disk_bytenr,
647                                                 le64_to_cpu(old.disk_num_bytes),
648                                                 orig_parent,
649                                                 leaf->start,
650                                                 root->root_key.objectid,
651                                                 trans->transid, ins.objectid);
652
653                                 BUG_ON(ret);
654                         }
655                         btrfs_release_path(root, path);
656                         if (disk_bytenr != 0)
657                                 inode_add_bytes(inode, extent_end - end);
658                 }
659
660                 if (found_extent && !keep) {
661                         u64 old_disk_bytenr = le64_to_cpu(old.disk_bytenr);
662
663                         if (old_disk_bytenr != 0) {
664                                 inode_sub_bytes(inode,
665                                                 le64_to_cpu(old.num_bytes));
666                                 ret = btrfs_free_extent(trans, root,
667                                                 old_disk_bytenr,
668                                                 le64_to_cpu(old.disk_num_bytes),
669                                                 leaf_start, root_owner,
670                                                 root_gen, key.objectid, 0);
671                                 BUG_ON(ret);
672                                 *hint_byte = old_disk_bytenr;
673                         }
674                 }
675
676                 if (search_start >= end) {
677                         ret = 0;
678                         goto out;
679                 }
680         }
681 out:
682         btrfs_free_path(path);
683         if (locked_end > end) {
684                 unlock_extent(&BTRFS_I(inode)->io_tree, end, locked_end - 1,
685                               GFP_NOFS);
686         }
687         btrfs_check_file(root, inode);
688         return ret;
689 }
690
691 static int extent_mergeable(struct extent_buffer *leaf, int slot,
692                             u64 objectid, u64 bytenr, u64 *start, u64 *end)
693 {
694         struct btrfs_file_extent_item *fi;
695         struct btrfs_key key;
696         u64 extent_end;
697
698         if (slot < 0 || slot >= btrfs_header_nritems(leaf))
699                 return 0;
700
701         btrfs_item_key_to_cpu(leaf, &key, slot);
702         if (key.objectid != objectid || key.type != BTRFS_EXTENT_DATA_KEY)
703                 return 0;
704
705         fi = btrfs_item_ptr(leaf, slot, struct btrfs_file_extent_item);
706         if (btrfs_file_extent_type(leaf, fi) != BTRFS_FILE_EXTENT_REG ||
707             btrfs_file_extent_disk_bytenr(leaf, fi) != bytenr ||
708             btrfs_file_extent_compression(leaf, fi) ||
709             btrfs_file_extent_encryption(leaf, fi) ||
710             btrfs_file_extent_other_encoding(leaf, fi))
711                 return 0;
712
713         extent_end = key.offset + btrfs_file_extent_num_bytes(leaf, fi);
714         if ((*start && *start != key.offset) || (*end && *end != extent_end))
715                 return 0;
716
717         *start = key.offset;
718         *end = extent_end;
719         return 1;
720 }
721
722 /*
723  * Mark extent in the range start - end as written.
724  *
725  * This changes extent type from 'pre-allocated' to 'regular'. If only
726  * part of extent is marked as written, the extent will be split into
727  * two or three.
728  */
729 int btrfs_mark_extent_written(struct btrfs_trans_handle *trans,
730                               struct btrfs_root *root,
731                               struct inode *inode, u64 start, u64 end)
732 {
733         struct extent_buffer *leaf;
734         struct btrfs_path *path;
735         struct btrfs_file_extent_item *fi;
736         struct btrfs_key key;
737         u64 bytenr;
738         u64 num_bytes;
739         u64 extent_end;
740         u64 extent_offset;
741         u64 other_start;
742         u64 other_end;
743         u64 split = start;
744         u64 locked_end = end;
745         u64 orig_parent;
746         int extent_type;
747         int split_end = 1;
748         int ret;
749
750         btrfs_drop_extent_cache(inode, start, end - 1, 0);
751
752         path = btrfs_alloc_path();
753         BUG_ON(!path);
754 again:
755         key.objectid = inode->i_ino;
756         key.type = BTRFS_EXTENT_DATA_KEY;
757         if (split == start)
758                 key.offset = split;
759         else
760                 key.offset = split - 1;
761
762         ret = btrfs_search_slot(trans, root, &key, path, -1, 1);
763         if (ret > 0 && path->slots[0] > 0)
764                 path->slots[0]--;
765
766         leaf = path->nodes[0];
767         btrfs_item_key_to_cpu(leaf, &key, path->slots[0]);
768         BUG_ON(key.objectid != inode->i_ino ||
769                key.type != BTRFS_EXTENT_DATA_KEY);
770         fi = btrfs_item_ptr(leaf, path->slots[0],
771                             struct btrfs_file_extent_item);
772         extent_type = btrfs_file_extent_type(leaf, fi);
773         BUG_ON(extent_type != BTRFS_FILE_EXTENT_PREALLOC);
774         extent_end = key.offset + btrfs_file_extent_num_bytes(leaf, fi);
775         BUG_ON(key.offset > start || extent_end < end);
776
777         bytenr = btrfs_file_extent_disk_bytenr(leaf, fi);
778         num_bytes = btrfs_file_extent_disk_num_bytes(leaf, fi);
779         extent_offset = btrfs_file_extent_offset(leaf, fi);
780
781         if (key.offset == start)
782                 split = end;
783
784         if (key.offset == start && extent_end == end) {
785                 int del_nr = 0;
786                 int del_slot = 0;
787                 u64 leaf_owner = btrfs_header_owner(leaf);
788                 u64 leaf_gen = btrfs_header_generation(leaf);
789                 other_start = end;
790                 other_end = 0;
791                 if (extent_mergeable(leaf, path->slots[0] + 1, inode->i_ino,
792                                      bytenr, &other_start, &other_end)) {
793                         extent_end = other_end;
794                         del_slot = path->slots[0] + 1;
795                         del_nr++;
796                         ret = btrfs_free_extent(trans, root, bytenr, num_bytes,
797                                                 leaf->start, leaf_owner,
798                                                 leaf_gen, inode->i_ino, 0);
799                         BUG_ON(ret);
800                 }
801                 other_start = 0;
802                 other_end = start;
803                 if (extent_mergeable(leaf, path->slots[0] - 1, inode->i_ino,
804                                      bytenr, &other_start, &other_end)) {
805                         key.offset = other_start;
806                         del_slot = path->slots[0];
807                         del_nr++;
808                         ret = btrfs_free_extent(trans, root, bytenr, num_bytes,
809                                                 leaf->start, leaf_owner,
810                                                 leaf_gen, inode->i_ino, 0);
811                         BUG_ON(ret);
812                 }
813                 split_end = 0;
814                 if (del_nr == 0) {
815                         btrfs_set_file_extent_type(leaf, fi,
816                                                    BTRFS_FILE_EXTENT_REG);
817                         goto done;
818                 }
819
820                 fi = btrfs_item_ptr(leaf, del_slot - 1,
821                                     struct btrfs_file_extent_item);
822                 btrfs_set_file_extent_type(leaf, fi, BTRFS_FILE_EXTENT_REG);
823                 btrfs_set_file_extent_num_bytes(leaf, fi,
824                                                 extent_end - key.offset);
825                 btrfs_mark_buffer_dirty(leaf);
826
827                 ret = btrfs_del_items(trans, root, path, del_slot, del_nr);
828                 BUG_ON(ret);
829                 goto done;
830         } else if (split == start) {
831                 if (locked_end < extent_end) {
832                         ret = try_lock_extent(&BTRFS_I(inode)->io_tree,
833                                         locked_end, extent_end - 1, GFP_NOFS);
834                         if (!ret) {
835                                 btrfs_release_path(root, path);
836                                 lock_extent(&BTRFS_I(inode)->io_tree,
837                                         locked_end, extent_end - 1, GFP_NOFS);
838                                 locked_end = extent_end;
839                                 goto again;
840                         }
841                         locked_end = extent_end;
842                 }
843                 btrfs_set_file_extent_num_bytes(leaf, fi, split - key.offset);
844                 extent_offset += split - key.offset;
845         } else  {
846                 BUG_ON(key.offset != start);
847                 btrfs_set_file_extent_offset(leaf, fi, extent_offset +
848                                              split - key.offset);
849                 btrfs_set_file_extent_num_bytes(leaf, fi, extent_end - split);
850                 key.offset = split;
851                 btrfs_set_item_key_safe(trans, root, path, &key);
852                 extent_end = split;
853         }
854
855         if (extent_end == end) {
856                 split_end = 0;
857                 extent_type = BTRFS_FILE_EXTENT_REG;
858         }
859         if (extent_end == end && split == start) {
860                 other_start = end;
861                 other_end = 0;
862                 if (extent_mergeable(leaf, path->slots[0] + 1, inode->i_ino,
863                                      bytenr, &other_start, &other_end)) {
864                         path->slots[0]++;
865                         fi = btrfs_item_ptr(leaf, path->slots[0],
866                                             struct btrfs_file_extent_item);
867                         key.offset = split;
868                         btrfs_set_item_key_safe(trans, root, path, &key);
869                         btrfs_set_file_extent_offset(leaf, fi, extent_offset);
870                         btrfs_set_file_extent_num_bytes(leaf, fi,
871                                                         other_end - split);
872                         goto done;
873                 }
874         }
875         if (extent_end == end && split == end) {
876                 other_start = 0;
877                 other_end = start;
878                 if (extent_mergeable(leaf, path->slots[0] - 1 , inode->i_ino,
879                                      bytenr, &other_start, &other_end)) {
880                         path->slots[0]--;
881                         fi = btrfs_item_ptr(leaf, path->slots[0],
882                                             struct btrfs_file_extent_item);
883                         btrfs_set_file_extent_num_bytes(leaf, fi, extent_end -
884                                                         other_start);
885                         goto done;
886                 }
887         }
888
889         btrfs_mark_buffer_dirty(leaf);
890
891         orig_parent = leaf->start;
892         ret = btrfs_inc_extent_ref(trans, root, bytenr, num_bytes,
893                                    orig_parent, root->root_key.objectid,
894                                    trans->transid, inode->i_ino);
895         BUG_ON(ret);
896         btrfs_release_path(root, path);
897
898         key.offset = start;
899         ret = btrfs_insert_empty_item(trans, root, path, &key, sizeof(*fi));
900         BUG_ON(ret);
901
902         leaf = path->nodes[0];
903         fi = btrfs_item_ptr(leaf, path->slots[0],
904                             struct btrfs_file_extent_item);
905         btrfs_set_file_extent_generation(leaf, fi, trans->transid);
906         btrfs_set_file_extent_type(leaf, fi, extent_type);
907         btrfs_set_file_extent_disk_bytenr(leaf, fi, bytenr);
908         btrfs_set_file_extent_disk_num_bytes(leaf, fi, num_bytes);
909         btrfs_set_file_extent_offset(leaf, fi, extent_offset);
910         btrfs_set_file_extent_num_bytes(leaf, fi, extent_end - key.offset);
911         btrfs_set_file_extent_ram_bytes(leaf, fi, num_bytes);
912         btrfs_set_file_extent_compression(leaf, fi, 0);
913         btrfs_set_file_extent_encryption(leaf, fi, 0);
914         btrfs_set_file_extent_other_encoding(leaf, fi, 0);
915
916         if (orig_parent != leaf->start) {
917                 ret = btrfs_update_extent_ref(trans, root, bytenr, num_bytes,
918                                               orig_parent, leaf->start,
919                                               root->root_key.objectid,
920                                               trans->transid, inode->i_ino);
921                 BUG_ON(ret);
922         }
923 done:
924         btrfs_mark_buffer_dirty(leaf);
925         btrfs_release_path(root, path);
926         if (split_end && split == start) {
927                 split = end;
928                 goto again;
929         }
930         if (locked_end > end) {
931                 unlock_extent(&BTRFS_I(inode)->io_tree, end, locked_end - 1,
932                               GFP_NOFS);
933         }
934         btrfs_free_path(path);
935         return 0;
936 }
937
938 /*
939  * this gets pages into the page cache and locks them down, it also properly
940  * waits for data=ordered extents to finish before allowing the pages to be
941  * modified.
942  */
943 static noinline int prepare_pages(struct btrfs_root *root, struct file *file,
944                          struct page **pages, size_t num_pages,
945                          loff_t pos, unsigned long first_index,
946                          unsigned long last_index, size_t write_bytes)
947 {
948         int i;
949         unsigned long index = pos >> PAGE_CACHE_SHIFT;
950         struct inode *inode = fdentry(file)->d_inode;
951         int err = 0;
952         u64 start_pos;
953         u64 last_pos;
954
955         start_pos = pos & ~((u64)root->sectorsize - 1);
956         last_pos = ((u64)index + num_pages) << PAGE_CACHE_SHIFT;
957
958         if (start_pos > inode->i_size) {
959                 err = btrfs_cont_expand(inode, start_pos);
960                 if (err)
961                         return err;
962         }
963
964         memset(pages, 0, num_pages * sizeof(struct page *));
965 again:
966         for (i = 0; i < num_pages; i++) {
967                 pages[i] = grab_cache_page(inode->i_mapping, index + i);
968                 if (!pages[i]) {
969                         err = -ENOMEM;
970                         BUG_ON(1);
971                 }
972                 wait_on_page_writeback(pages[i]);
973         }
974         if (start_pos < inode->i_size) {
975                 struct btrfs_ordered_extent *ordered;
976                 lock_extent(&BTRFS_I(inode)->io_tree,
977                             start_pos, last_pos - 1, GFP_NOFS);
978                 ordered = btrfs_lookup_first_ordered_extent(inode,
979                                                             last_pos - 1);
980                 if (ordered &&
981                     ordered->file_offset + ordered->len > start_pos &&
982                     ordered->file_offset < last_pos) {
983                         btrfs_put_ordered_extent(ordered);
984                         unlock_extent(&BTRFS_I(inode)->io_tree,
985                                       start_pos, last_pos - 1, GFP_NOFS);
986                         for (i = 0; i < num_pages; i++) {
987                                 unlock_page(pages[i]);
988                                 page_cache_release(pages[i]);
989                         }
990                         btrfs_wait_ordered_range(inode, start_pos,
991                                                  last_pos - start_pos);
992                         goto again;
993                 }
994                 if (ordered)
995                         btrfs_put_ordered_extent(ordered);
996
997                 clear_extent_bits(&BTRFS_I(inode)->io_tree, start_pos,
998                                   last_pos - 1, EXTENT_DIRTY | EXTENT_DELALLOC,
999                                   GFP_NOFS);
1000                 unlock_extent(&BTRFS_I(inode)->io_tree,
1001                               start_pos, last_pos - 1, GFP_NOFS);
1002         }
1003         for (i = 0; i < num_pages; i++) {
1004                 clear_page_dirty_for_io(pages[i]);
1005                 set_page_extent_mapped(pages[i]);
1006                 WARN_ON(!PageLocked(pages[i]));
1007         }
1008         return 0;
1009 }
1010
1011 static ssize_t btrfs_file_write(struct file *file, const char __user *buf,
1012                                 size_t count, loff_t *ppos)
1013 {
1014         loff_t pos;
1015         loff_t start_pos;
1016         ssize_t num_written = 0;
1017         ssize_t err = 0;
1018         int ret = 0;
1019         struct inode *inode = fdentry(file)->d_inode;
1020         struct btrfs_root *root = BTRFS_I(inode)->root;
1021         struct page **pages = NULL;
1022         int nrptrs;
1023         struct page *pinned[2];
1024         unsigned long first_index;
1025         unsigned long last_index;
1026         int will_write;
1027
1028         will_write = ((file->f_flags & O_SYNC) || IS_SYNC(inode) ||
1029                       (file->f_flags & O_DIRECT));
1030
1031         nrptrs = min((count + PAGE_CACHE_SIZE - 1) / PAGE_CACHE_SIZE,
1032                      PAGE_CACHE_SIZE / (sizeof(struct page *)));
1033         pinned[0] = NULL;
1034         pinned[1] = NULL;
1035
1036         pos = *ppos;
1037         start_pos = pos;
1038
1039         vfs_check_frozen(inode->i_sb, SB_FREEZE_WRITE);
1040         current->backing_dev_info = inode->i_mapping->backing_dev_info;
1041         err = generic_write_checks(file, &pos, &count, S_ISBLK(inode->i_mode));
1042         if (err)
1043                 goto out_nolock;
1044         if (count == 0)
1045                 goto out_nolock;
1046
1047         err = file_remove_suid(file);
1048         if (err)
1049                 goto out_nolock;
1050         file_update_time(file);
1051
1052         pages = kmalloc(nrptrs * sizeof(struct page *), GFP_KERNEL);
1053
1054         mutex_lock(&inode->i_mutex);
1055         BTRFS_I(inode)->sequence++;
1056         first_index = pos >> PAGE_CACHE_SHIFT;
1057         last_index = (pos + count) >> PAGE_CACHE_SHIFT;
1058
1059         /*
1060          * there are lots of better ways to do this, but this code
1061          * makes sure the first and last page in the file range are
1062          * up to date and ready for cow
1063          */
1064         if ((pos & (PAGE_CACHE_SIZE - 1))) {
1065                 pinned[0] = grab_cache_page(inode->i_mapping, first_index);
1066                 if (!PageUptodate(pinned[0])) {
1067                         ret = btrfs_readpage(NULL, pinned[0]);
1068                         BUG_ON(ret);
1069                         wait_on_page_locked(pinned[0]);
1070                 } else {
1071                         unlock_page(pinned[0]);
1072                 }
1073         }
1074         if ((pos + count) & (PAGE_CACHE_SIZE - 1)) {
1075                 pinned[1] = grab_cache_page(inode->i_mapping, last_index);
1076                 if (!PageUptodate(pinned[1])) {
1077                         ret = btrfs_readpage(NULL, pinned[1]);
1078                         BUG_ON(ret);
1079                         wait_on_page_locked(pinned[1]);
1080                 } else {
1081                         unlock_page(pinned[1]);
1082                 }
1083         }
1084
1085         while (count > 0) {
1086                 size_t offset = pos & (PAGE_CACHE_SIZE - 1);
1087                 size_t write_bytes = min(count, nrptrs *
1088                                         (size_t)PAGE_CACHE_SIZE -
1089                                          offset);
1090                 size_t num_pages = (write_bytes + PAGE_CACHE_SIZE - 1) >>
1091                                         PAGE_CACHE_SHIFT;
1092
1093                 WARN_ON(num_pages > nrptrs);
1094                 memset(pages, 0, sizeof(struct page *) * nrptrs);
1095
1096                 ret = btrfs_check_data_free_space(root, inode, write_bytes);
1097                 if (ret)
1098                         goto out;
1099
1100                 ret = prepare_pages(root, file, pages, num_pages,
1101                                     pos, first_index, last_index,
1102                                     write_bytes);
1103                 if (ret) {
1104                         btrfs_free_reserved_data_space(root, inode,
1105                                                        write_bytes);
1106                         goto out;
1107                 }
1108
1109                 ret = btrfs_copy_from_user(pos, num_pages,
1110                                            write_bytes, pages, buf);
1111                 if (ret) {
1112                         btrfs_free_reserved_data_space(root, inode,
1113                                                        write_bytes);
1114                         btrfs_drop_pages(pages, num_pages);
1115                         goto out;
1116                 }
1117
1118                 ret = dirty_and_release_pages(NULL, root, file, pages,
1119                                               num_pages, pos, write_bytes);
1120                 btrfs_drop_pages(pages, num_pages);
1121                 if (ret) {
1122                         btrfs_free_reserved_data_space(root, inode,
1123                                                        write_bytes);
1124                         goto out;
1125                 }
1126
1127                 if (will_write) {
1128                         btrfs_fdatawrite_range(inode->i_mapping, pos,
1129                                                pos + write_bytes - 1,
1130                                                WB_SYNC_NONE);
1131                 } else {
1132                         balance_dirty_pages_ratelimited_nr(inode->i_mapping,
1133                                                            num_pages);
1134                         if (num_pages <
1135                             (root->leafsize >> PAGE_CACHE_SHIFT) + 1)
1136                                 btrfs_btree_balance_dirty(root, 1);
1137                         btrfs_throttle(root);
1138                 }
1139
1140                 buf += write_bytes;
1141                 count -= write_bytes;
1142                 pos += write_bytes;
1143                 num_written += write_bytes;
1144
1145                 cond_resched();
1146         }
1147 out:
1148         mutex_unlock(&inode->i_mutex);
1149         if (ret)
1150                 err = ret;
1151
1152 out_nolock:
1153         kfree(pages);
1154         if (pinned[0])
1155                 page_cache_release(pinned[0]);
1156         if (pinned[1])
1157                 page_cache_release(pinned[1]);
1158         *ppos = pos;
1159
1160         if (num_written > 0 && will_write) {
1161                 struct btrfs_trans_handle *trans;
1162
1163                 err = btrfs_wait_ordered_range(inode, start_pos, num_written);
1164                 if (err)
1165                         num_written = err;
1166
1167                 if ((file->f_flags & O_SYNC) || IS_SYNC(inode)) {
1168                         trans = btrfs_start_transaction(root, 1);
1169                         ret = btrfs_log_dentry_safe(trans, root,
1170                                                     file->f_dentry);
1171                         if (ret == 0) {
1172                                 btrfs_sync_log(trans, root);
1173                                 btrfs_end_transaction(trans, root);
1174                         } else {
1175                                 btrfs_commit_transaction(trans, root);
1176                         }
1177                 }
1178                 if (file->f_flags & O_DIRECT) {
1179                         invalidate_mapping_pages(inode->i_mapping,
1180                               start_pos >> PAGE_CACHE_SHIFT,
1181                              (start_pos + num_written - 1) >> PAGE_CACHE_SHIFT);
1182                 }
1183         }
1184         current->backing_dev_info = NULL;
1185         return num_written ? num_written : err;
1186 }
1187
1188 int btrfs_release_file(struct inode *inode, struct file *filp)
1189 {
1190         if (filp->private_data)
1191                 btrfs_ioctl_trans_end(filp);
1192         return 0;
1193 }
1194
1195 /*
1196  * fsync call for both files and directories.  This logs the inode into
1197  * the tree log instead of forcing full commits whenever possible.
1198  *
1199  * It needs to call filemap_fdatawait so that all ordered extent updates are
1200  * in the metadata btree are up to date for copying to the log.
1201  *
1202  * It drops the inode mutex before doing the tree log commit.  This is an
1203  * important optimization for directories because holding the mutex prevents
1204  * new operations on the dir while we write to disk.
1205  */
1206 int btrfs_sync_file(struct file *file, struct dentry *dentry, int datasync)
1207 {
1208         struct inode *inode = dentry->d_inode;
1209         struct btrfs_root *root = BTRFS_I(inode)->root;
1210         int ret = 0;
1211         struct btrfs_trans_handle *trans;
1212
1213         /*
1214          * check the transaction that last modified this inode
1215          * and see if its already been committed
1216          */
1217         if (!BTRFS_I(inode)->last_trans)
1218                 goto out;
1219
1220         mutex_lock(&root->fs_info->trans_mutex);
1221         if (BTRFS_I(inode)->last_trans <=
1222             root->fs_info->last_trans_committed) {
1223                 BTRFS_I(inode)->last_trans = 0;
1224                 mutex_unlock(&root->fs_info->trans_mutex);
1225                 goto out;
1226         }
1227         mutex_unlock(&root->fs_info->trans_mutex);
1228
1229         root->log_batch++;
1230         filemap_fdatawrite(inode->i_mapping);
1231         btrfs_wait_ordered_range(inode, 0, (u64)-1);
1232         root->log_batch++;
1233
1234         /*
1235          * ok we haven't committed the transaction yet, lets do a commit
1236          */
1237         if (file && file->private_data)
1238                 btrfs_ioctl_trans_end(file);
1239
1240         trans = btrfs_start_transaction(root, 1);
1241         if (!trans) {
1242                 ret = -ENOMEM;
1243                 goto out;
1244         }
1245
1246         ret = btrfs_log_dentry_safe(trans, root, dentry);
1247         if (ret < 0)
1248                 goto out;
1249
1250         /* we've logged all the items and now have a consistent
1251          * version of the file in the log.  It is possible that
1252          * someone will come in and modify the file, but that's
1253          * fine because the log is consistent on disk, and we
1254          * have references to all of the file's extents
1255          *
1256          * It is possible that someone will come in and log the
1257          * file again, but that will end up using the synchronization
1258          * inside btrfs_sync_log to keep things safe.
1259          */
1260         mutex_unlock(&dentry->d_inode->i_mutex);
1261
1262         if (ret > 0) {
1263                 ret = btrfs_commit_transaction(trans, root);
1264         } else {
1265                 btrfs_sync_log(trans, root);
1266                 ret = btrfs_end_transaction(trans, root);
1267         }
1268         mutex_lock(&dentry->d_inode->i_mutex);
1269 out:
1270         return ret > 0 ? EIO : ret;
1271 }
1272
1273 static struct vm_operations_struct btrfs_file_vm_ops = {
1274         .fault          = filemap_fault,
1275         .page_mkwrite   = btrfs_page_mkwrite,
1276 };
1277
1278 static int btrfs_file_mmap(struct file  *filp, struct vm_area_struct *vma)
1279 {
1280         vma->vm_ops = &btrfs_file_vm_ops;
1281         file_accessed(filp);
1282         return 0;
1283 }
1284
1285 struct file_operations btrfs_file_operations = {
1286         .llseek         = generic_file_llseek,
1287         .read           = do_sync_read,
1288         .aio_read       = generic_file_aio_read,
1289         .splice_read    = generic_file_splice_read,
1290         .write          = btrfs_file_write,
1291         .mmap           = btrfs_file_mmap,
1292         .open           = generic_file_open,
1293         .release        = btrfs_release_file,
1294         .fsync          = btrfs_sync_file,
1295         .unlocked_ioctl = btrfs_ioctl,
1296 #ifdef CONFIG_COMPAT
1297         .compat_ioctl   = btrfs_ioctl,
1298 #endif
1299 };