2 * Copyright (C) 2008 Oracle. All rights reserved.
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.
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.
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.
19 #define _XOPEN_SOURCE 500
24 #include <sys/types.h>
30 #include "kerncompat.h"
34 #include "transaction.h"
38 #include "extent_io.h"
40 #define HEADER_MAGIC 0xbd5c25e27295668bULL
41 #define MAX_PENDING_SIZE (256 * 1024)
42 #define BLOCK_SIZE 1024
43 #define BLOCK_MASK (BLOCK_SIZE - 1)
45 #define COMPRESS_NONE 0
46 #define COMPRESS_ZLIB 1
48 struct meta_cluster_item {
51 } __attribute__ ((__packed__));
53 struct meta_cluster_header {
58 } __attribute__ ((__packed__));
60 /* cluster header + index items + buffers */
62 struct meta_cluster_header header;
63 struct meta_cluster_item items[];
64 } __attribute__ ((__packed__));
66 #define ITEMS_PER_CLUSTER ((BLOCK_SIZE - sizeof(struct meta_cluster)) / \
67 sizeof(struct meta_cluster_item))
77 struct list_head list;
78 struct list_head ordered;
86 struct metadump_struct {
87 struct btrfs_root *root;
90 struct meta_cluster *cluster;
94 pthread_mutex_t mutex;
96 struct rb_root name_tree;
98 struct list_head list;
99 struct list_head ordered;
119 struct mdrestore_struct {
125 pthread_mutex_t mutex;
128 struct rb_root chunk_tree;
129 struct list_head list;
133 u8 uuid[BTRFS_UUID_SIZE];
134 u8 fsid[BTRFS_FSID_SIZE];
142 struct btrfs_fs_info *info;
145 static void print_usage(void) __attribute__((noreturn));
146 static int search_for_chunk_blocks(struct mdrestore_struct *mdres,
147 u64 search, u64 cluster_bytenr);
148 static struct extent_buffer *alloc_dummy_eb(u64 bytenr, u32 size);
150 static void csum_block(u8 *buf, size_t len)
152 char result[BTRFS_CRC32_SIZE];
154 crc = crc32c(crc, buf + BTRFS_CSUM_SIZE, len - BTRFS_CSUM_SIZE);
155 btrfs_csum_final(crc, result);
156 memcpy(buf, result, BTRFS_CRC32_SIZE);
159 static int has_name(struct btrfs_key *key)
162 case BTRFS_DIR_ITEM_KEY:
163 case BTRFS_DIR_INDEX_KEY:
164 case BTRFS_INODE_REF_KEY:
165 case BTRFS_INODE_EXTREF_KEY:
166 case BTRFS_XATTR_ITEM_KEY:
175 static char *generate_garbage(u32 name_len)
177 char *buf = malloc(name_len);
183 for (i = 0; i < name_len; i++) {
184 char c = rand() % 94 + 33;
194 static int name_cmp(struct rb_node *a, struct rb_node *b, int fuzz)
196 struct name *entry = rb_entry(a, struct name, n);
197 struct name *ins = rb_entry(b, struct name, n);
200 len = min(ins->len, entry->len);
201 return memcmp(ins->val, entry->val, len);
204 static int chunk_cmp(struct rb_node *a, struct rb_node *b, int fuzz)
206 struct fs_chunk *entry = rb_entry(a, struct fs_chunk, n);
207 struct fs_chunk *ins = rb_entry(b, struct fs_chunk, n);
209 if (fuzz && ins->logical >= entry->logical &&
210 ins->logical < entry->logical + entry->bytes)
213 if (ins->logical < entry->logical)
215 else if (ins->logical > entry->logical)
220 static void tree_insert(struct rb_root *root, struct rb_node *ins,
221 int (*cmp)(struct rb_node *a, struct rb_node *b,
224 struct rb_node ** p = &root->rb_node;
225 struct rb_node * parent = NULL;
231 dir = cmp(*p, ins, 0);
240 rb_link_node(ins, parent, p);
241 rb_insert_color(ins, root);
244 static struct rb_node *tree_search(struct rb_root *root,
245 struct rb_node *search,
246 int (*cmp)(struct rb_node *a,
247 struct rb_node *b, int fuzz),
250 struct rb_node *n = root->rb_node;
254 dir = cmp(n, search, fuzz);
266 static char *find_collision(struct metadump_struct *md, char *name,
270 struct rb_node *entry;
272 unsigned long checksum;
278 entry = tree_search(&md->name_tree, &tmp.n, name_cmp, 0);
280 val = rb_entry(entry, struct name, n);
285 val = malloc(sizeof(struct name));
287 fprintf(stderr, "Couldn't sanitize name, enomem\n");
292 memset(val, 0, sizeof(*val));
296 val->sub = malloc(name_len);
298 fprintf(stderr, "Couldn't sanitize name, enomem\n");
304 checksum = crc32c(~1, val->val, name_len);
305 memset(val->sub, ' ', name_len);
308 if (crc32c(~1, val->sub, name_len) == checksum &&
309 memcmp(val->sub, val->val, val->len)) {
314 if (val->sub[i] == 127) {
319 } while (val->sub[i] == 127);
324 if (val->sub[i] == '/')
326 memset(val->sub, ' ', i);
331 if (val->sub[i] == '/')
337 fprintf(stderr, "Couldn't find a collision for '%.*s', "
338 "generating normal garbage, it won't match indexes\n",
340 for (i = 0; i < name_len; i++) {
341 char c = rand() % 94 + 33;
349 tree_insert(&md->name_tree, &val->n, name_cmp);
353 static void sanitize_dir_item(struct metadump_struct *md, struct extent_buffer *eb,
356 struct btrfs_dir_item *dir_item;
359 unsigned long name_ptr;
364 int free_garbage = (md->sanitize_names == 1);
366 dir_item = btrfs_item_ptr(eb, slot, struct btrfs_dir_item);
367 total_len = btrfs_item_size_nr(eb, slot);
368 while (cur < total_len) {
369 this_len = sizeof(*dir_item) +
370 btrfs_dir_name_len(eb, dir_item) +
371 btrfs_dir_data_len(eb, dir_item);
372 name_ptr = (unsigned long)(dir_item + 1);
373 name_len = btrfs_dir_name_len(eb, dir_item);
375 if (md->sanitize_names > 1) {
376 buf = malloc(name_len);
378 fprintf(stderr, "Couldn't sanitize name, "
382 read_extent_buffer(eb, buf, name_ptr, name_len);
383 garbage = find_collision(md, buf, name_len);
385 garbage = generate_garbage(name_len);
388 fprintf(stderr, "Couldn't sanitize name, enomem\n");
391 write_extent_buffer(eb, garbage, name_ptr, name_len);
393 dir_item = (struct btrfs_dir_item *)((char *)dir_item +
400 static void sanitize_inode_ref(struct metadump_struct *md,
401 struct extent_buffer *eb, int slot, int ext)
403 struct btrfs_inode_extref *extref;
404 struct btrfs_inode_ref *ref;
407 unsigned long name_ptr;
411 int free_garbage = (md->sanitize_names == 1);
413 item_size = btrfs_item_size_nr(eb, slot);
414 ptr = btrfs_item_ptr_offset(eb, slot);
415 while (cur_offset < item_size) {
417 extref = (struct btrfs_inode_extref *)(ptr +
419 name_ptr = (unsigned long)(&extref->name);
420 len = btrfs_inode_extref_name_len(eb, extref);
421 cur_offset += sizeof(*extref);
423 ref = (struct btrfs_inode_ref *)(ptr + cur_offset);
424 len = btrfs_inode_ref_name_len(eb, ref);
425 name_ptr = (unsigned long)(ref + 1);
426 cur_offset += sizeof(*ref);
430 if (md->sanitize_names > 1) {
433 fprintf(stderr, "Couldn't sanitize name, "
437 read_extent_buffer(eb, buf, name_ptr, len);
438 garbage = find_collision(md, buf, len);
440 garbage = generate_garbage(len);
444 fprintf(stderr, "Couldn't sanitize name, enomem\n");
447 write_extent_buffer(eb, garbage, name_ptr, len);
453 static void sanitize_xattr(struct metadump_struct *md,
454 struct extent_buffer *eb, int slot)
456 struct btrfs_dir_item *dir_item;
457 unsigned long data_ptr;
460 dir_item = btrfs_item_ptr(eb, slot, struct btrfs_dir_item);
461 data_len = btrfs_dir_data_len(eb, dir_item);
463 data_ptr = (unsigned long)((char *)(dir_item + 1) +
464 btrfs_dir_name_len(eb, dir_item));
465 memset_extent_buffer(eb, 0, data_ptr, data_len);
468 static void sanitize_name(struct metadump_struct *md, u8 *dst,
469 struct extent_buffer *src, struct btrfs_key *key,
472 struct extent_buffer *eb;
474 eb = alloc_dummy_eb(src->start, src->len);
476 fprintf(stderr, "Couldn't sanitize name, no memory\n");
480 memcpy(eb->data, dst, eb->len);
483 case BTRFS_DIR_ITEM_KEY:
484 case BTRFS_DIR_INDEX_KEY:
485 sanitize_dir_item(md, eb, slot);
487 case BTRFS_INODE_REF_KEY:
488 sanitize_inode_ref(md, eb, slot, 0);
490 case BTRFS_INODE_EXTREF_KEY:
491 sanitize_inode_ref(md, eb, slot, 1);
493 case BTRFS_XATTR_ITEM_KEY:
494 sanitize_xattr(md, eb, slot);
500 memcpy(dst, eb->data, eb->len);
505 * zero inline extents and csum items
507 static void zero_items(struct metadump_struct *md, u8 *dst,
508 struct extent_buffer *src)
510 struct btrfs_file_extent_item *fi;
511 struct btrfs_item *item;
512 struct btrfs_key key;
513 u32 nritems = btrfs_header_nritems(src);
518 for (i = 0; i < nritems; i++) {
519 item = btrfs_item_nr(i);
520 btrfs_item_key_to_cpu(src, &key, i);
521 if (key.type == BTRFS_CSUM_ITEM_KEY) {
522 size = btrfs_item_size_nr(src, i);
523 memset(dst + btrfs_leaf_data(src) +
524 btrfs_item_offset_nr(src, i), 0, size);
528 if (md->sanitize_names && has_name(&key)) {
529 sanitize_name(md, dst, src, &key, i);
533 if (key.type != BTRFS_EXTENT_DATA_KEY)
536 fi = btrfs_item_ptr(src, i, struct btrfs_file_extent_item);
537 extent_type = btrfs_file_extent_type(src, fi);
538 if (extent_type != BTRFS_FILE_EXTENT_INLINE)
541 ptr = btrfs_file_extent_inline_start(fi);
542 size = btrfs_file_extent_inline_item_len(src, item);
543 memset(dst + ptr, 0, size);
548 * copy buffer and zero useless data in the buffer
550 static void copy_buffer(struct metadump_struct *md, u8 *dst,
551 struct extent_buffer *src)
557 memcpy(dst, src->data, src->len);
558 if (src->start == BTRFS_SUPER_INFO_OFFSET)
561 level = btrfs_header_level(src);
562 nritems = btrfs_header_nritems(src);
565 size = sizeof(struct btrfs_header);
566 memset(dst + size, 0, src->len - size);
567 } else if (level == 0) {
568 size = btrfs_leaf_data(src) +
569 btrfs_item_offset_nr(src, nritems - 1) -
570 btrfs_item_nr_offset(nritems);
571 memset(dst + btrfs_item_nr_offset(nritems), 0, size);
572 zero_items(md, dst, src);
574 size = offsetof(struct btrfs_node, ptrs) +
575 sizeof(struct btrfs_key_ptr) * nritems;
576 memset(dst + size, 0, src->len - size);
578 csum_block(dst, src->len);
581 static void *dump_worker(void *data)
583 struct metadump_struct *md = (struct metadump_struct *)data;
584 struct async_work *async;
588 pthread_mutex_lock(&md->mutex);
589 while (list_empty(&md->list)) {
591 pthread_mutex_unlock(&md->mutex);
594 pthread_cond_wait(&md->cond, &md->mutex);
596 async = list_entry(md->list.next, struct async_work, list);
597 list_del_init(&async->list);
598 pthread_mutex_unlock(&md->mutex);
600 if (md->compress_level > 0) {
601 u8 *orig = async->buffer;
603 async->bufsize = compressBound(async->size);
604 async->buffer = malloc(async->bufsize);
606 ret = compress2(async->buffer,
607 (unsigned long *)&async->bufsize,
608 orig, async->size, md->compress_level);
616 pthread_mutex_lock(&md->mutex);
618 pthread_mutex_unlock(&md->mutex);
624 static void meta_cluster_init(struct metadump_struct *md, u64 start)
626 struct meta_cluster_header *header;
630 header = &md->cluster->header;
631 header->magic = cpu_to_le64(HEADER_MAGIC);
632 header->bytenr = cpu_to_le64(start);
633 header->nritems = cpu_to_le32(0);
634 header->compress = md->compress_level > 0 ?
635 COMPRESS_ZLIB : COMPRESS_NONE;
638 static int metadump_init(struct metadump_struct *md, struct btrfs_root *root,
639 FILE *out, int num_threads, int compress_level,
644 memset(md, 0, sizeof(*md));
645 pthread_cond_init(&md->cond, NULL);
646 pthread_mutex_init(&md->mutex, NULL);
647 INIT_LIST_HEAD(&md->list);
648 INIT_LIST_HEAD(&md->ordered);
651 md->pending_start = (u64)-1;
652 md->compress_level = compress_level;
653 md->cluster = calloc(1, BLOCK_SIZE);
654 md->sanitize_names = sanitize_names;
655 if (sanitize_names > 1)
656 crc32c_optimization_init();
659 pthread_cond_destroy(&md->cond);
660 pthread_mutex_destroy(&md->mutex);
664 meta_cluster_init(md, 0);
668 md->name_tree.rb_node = NULL;
669 md->num_threads = num_threads;
670 md->threads = calloc(num_threads, sizeof(pthread_t));
673 pthread_cond_destroy(&md->cond);
674 pthread_mutex_destroy(&md->mutex);
678 for (i = 0; i < num_threads; i++) {
679 ret = pthread_create(md->threads + i, NULL, dump_worker, md);
685 pthread_mutex_lock(&md->mutex);
687 pthread_cond_broadcast(&md->cond);
688 pthread_mutex_unlock(&md->mutex);
690 for (i--; i >= 0; i--)
691 pthread_join(md->threads[i], NULL);
693 pthread_cond_destroy(&md->cond);
694 pthread_mutex_destroy(&md->mutex);
702 static void metadump_destroy(struct metadump_struct *md)
707 pthread_mutex_lock(&md->mutex);
709 pthread_cond_broadcast(&md->cond);
710 pthread_mutex_unlock(&md->mutex);
712 for (i = 0; i < md->num_threads; i++)
713 pthread_join(md->threads[i], NULL);
715 pthread_cond_destroy(&md->cond);
716 pthread_mutex_destroy(&md->mutex);
718 while ((n = rb_first(&md->name_tree))) {
721 name = rb_entry(n, struct name, n);
722 rb_erase(n, &md->name_tree);
731 static int write_zero(FILE *out, size_t size)
733 static char zero[BLOCK_SIZE];
734 return fwrite(zero, size, 1, out);
737 static int write_buffers(struct metadump_struct *md, u64 *next)
739 struct meta_cluster_header *header = &md->cluster->header;
740 struct meta_cluster_item *item;
741 struct async_work *async;
747 if (list_empty(&md->ordered))
750 /* wait until all buffers are compressed */
751 while (md->num_items > md->num_ready) {
752 struct timespec ts = {
756 pthread_mutex_unlock(&md->mutex);
757 nanosleep(&ts, NULL);
758 pthread_mutex_lock(&md->mutex);
761 /* setup and write index block */
762 list_for_each_entry(async, &md->ordered, ordered) {
763 item = md->cluster->items + nritems;
764 item->bytenr = cpu_to_le64(async->start);
765 item->size = cpu_to_le32(async->bufsize);
768 header->nritems = cpu_to_le32(nritems);
770 ret = fwrite(md->cluster, BLOCK_SIZE, 1, md->out);
772 fprintf(stderr, "Error writing out cluster: %d\n", errno);
777 bytenr += le64_to_cpu(header->bytenr) + BLOCK_SIZE;
778 while (!list_empty(&md->ordered)) {
779 async = list_entry(md->ordered.next, struct async_work,
781 list_del_init(&async->ordered);
783 bytenr += async->bufsize;
785 ret = fwrite(async->buffer, async->bufsize, 1,
790 fprintf(stderr, "Error writing out cluster: %d\n",
798 /* zero unused space in the last block */
799 if (!err && bytenr & BLOCK_MASK) {
800 size_t size = BLOCK_SIZE - (bytenr & BLOCK_MASK);
803 ret = write_zero(md->out, size);
805 fprintf(stderr, "Error zeroing out buffer: %d\n",
815 static int read_data_extent(struct metadump_struct *md,
816 struct async_work *async)
818 struct btrfs_multi_bio *multi = NULL;
819 struct btrfs_device *device;
820 u64 bytes_left = async->size;
821 u64 logical = async->start;
830 read_len = bytes_left;
831 ret = btrfs_map_block(&md->root->fs_info->mapping_tree, READ,
832 logical, &read_len, &multi, 0, NULL);
834 fprintf(stderr, "Couldn't map data block %d\n", ret);
838 device = multi->stripes[0].dev;
840 if (device->fd == 0) {
842 "Device we need to read from is not open\n");
847 bytenr = multi->stripes[0].physical;
850 read_len = min(read_len, bytes_left);
851 done = pread64(fd, async->buffer+offset, read_len, bytenr);
852 if (done < read_len) {
854 fprintf(stderr, "Error reading extent %d\n",
857 fprintf(stderr, "Short read\n");
869 static int flush_pending(struct metadump_struct *md, int done)
871 struct async_work *async = NULL;
872 struct extent_buffer *eb;
873 u64 blocksize = md->root->nodesize;
879 if (md->pending_size) {
880 async = calloc(1, sizeof(*async));
884 async->start = md->pending_start;
885 async->size = md->pending_size;
886 async->bufsize = async->size;
887 async->buffer = malloc(async->bufsize);
888 if (!async->buffer) {
893 start = async->start;
897 ret = read_data_extent(md, async);
905 while (!md->data && size > 0) {
906 u64 this_read = min(blocksize, size);
907 eb = read_tree_block(md->root, start, this_read, 0);
912 "Error reading metadata block\n");
915 copy_buffer(md, async->buffer + offset, eb);
916 free_extent_buffer(eb);
922 md->pending_start = (u64)-1;
923 md->pending_size = 0;
928 pthread_mutex_lock(&md->mutex);
930 list_add_tail(&async->ordered, &md->ordered);
932 if (md->compress_level > 0) {
933 list_add_tail(&async->list, &md->list);
934 pthread_cond_signal(&md->cond);
939 if (md->num_items >= ITEMS_PER_CLUSTER || done) {
940 ret = write_buffers(md, &start);
942 fprintf(stderr, "Error writing buffers %d\n",
945 meta_cluster_init(md, start);
947 pthread_mutex_unlock(&md->mutex);
951 static int add_extent(u64 start, u64 size, struct metadump_struct *md,
955 if (md->data != data ||
956 md->pending_size + size > MAX_PENDING_SIZE ||
957 md->pending_start + md->pending_size != start) {
958 ret = flush_pending(md, 0);
961 md->pending_start = start;
963 readahead_tree_block(md->root, start, size, 0);
964 md->pending_size += size;
969 #ifdef BTRFS_COMPAT_EXTENT_TREE_V0
970 static int is_tree_block(struct btrfs_root *extent_root,
971 struct btrfs_path *path, u64 bytenr)
973 struct extent_buffer *leaf;
974 struct btrfs_key key;
978 leaf = path->nodes[0];
980 struct btrfs_extent_ref_v0 *ref_item;
982 if (path->slots[0] >= btrfs_header_nritems(leaf)) {
983 ret = btrfs_next_leaf(extent_root, path);
988 leaf = path->nodes[0];
990 btrfs_item_key_to_cpu(leaf, &key, path->slots[0]);
991 if (key.objectid != bytenr)
993 if (key.type != BTRFS_EXTENT_REF_V0_KEY)
995 ref_item = btrfs_item_ptr(leaf, path->slots[0],
996 struct btrfs_extent_ref_v0);
997 ref_objectid = btrfs_ref_objectid_v0(leaf, ref_item);
998 if (ref_objectid < BTRFS_FIRST_FREE_OBJECTID)
1006 static int copy_tree_blocks(struct btrfs_root *root, struct extent_buffer *eb,
1007 struct metadump_struct *metadump, int root_tree)
1009 struct extent_buffer *tmp;
1010 struct btrfs_root_item *ri;
1011 struct btrfs_key key;
1018 ret = add_extent(btrfs_header_bytenr(eb), root->leafsize, metadump, 0);
1020 fprintf(stderr, "Error adding metadata block\n");
1024 if (btrfs_header_level(eb) == 0 && !root_tree)
1027 level = btrfs_header_level(eb);
1028 nritems = btrfs_header_nritems(eb);
1029 for (i = 0; i < nritems; i++) {
1031 btrfs_item_key_to_cpu(eb, &key, i);
1032 if (key.type != BTRFS_ROOT_ITEM_KEY)
1034 ri = btrfs_item_ptr(eb, i, struct btrfs_root_item);
1035 bytenr = btrfs_disk_root_bytenr(eb, ri);
1036 tmp = read_tree_block(root, bytenr, root->leafsize, 0);
1039 "Error reading log root block\n");
1042 ret = copy_tree_blocks(root, tmp, metadump, 0);
1043 free_extent_buffer(tmp);
1047 bytenr = btrfs_node_blockptr(eb, i);
1048 tmp = read_tree_block(root, bytenr, root->leafsize, 0);
1050 fprintf(stderr, "Error reading log block\n");
1053 ret = copy_tree_blocks(root, tmp, metadump, root_tree);
1054 free_extent_buffer(tmp);
1063 static int copy_log_trees(struct btrfs_root *root,
1064 struct metadump_struct *metadump,
1065 struct btrfs_path *path)
1067 u64 blocknr = btrfs_super_log_root(root->fs_info->super_copy);
1072 if (!root->fs_info->log_root_tree ||
1073 !root->fs_info->log_root_tree->node) {
1074 fprintf(stderr, "Error copying tree log, it wasn't setup\n");
1078 return copy_tree_blocks(root, root->fs_info->log_root_tree->node,
1082 static int copy_space_cache(struct btrfs_root *root,
1083 struct metadump_struct *metadump,
1084 struct btrfs_path *path)
1086 struct extent_buffer *leaf;
1087 struct btrfs_file_extent_item *fi;
1088 struct btrfs_key key;
1089 u64 bytenr, num_bytes;
1092 root = root->fs_info->tree_root;
1095 key.type = BTRFS_EXTENT_DATA_KEY;
1098 ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
1100 fprintf(stderr, "Error searching for free space inode %d\n",
1106 leaf = path->nodes[0];
1107 if (path->slots[0] >= btrfs_header_nritems(leaf)) {
1108 ret = btrfs_next_leaf(root, path);
1110 fprintf(stderr, "Error going to next leaf "
1116 leaf = path->nodes[0];
1119 btrfs_item_key_to_cpu(leaf, &key, path->slots[0]);
1120 if (key.type != BTRFS_EXTENT_DATA_KEY) {
1125 fi = btrfs_item_ptr(leaf, path->slots[0],
1126 struct btrfs_file_extent_item);
1127 if (btrfs_file_extent_type(leaf, fi) !=
1128 BTRFS_FILE_EXTENT_REG) {
1133 bytenr = btrfs_file_extent_disk_bytenr(leaf, fi);
1134 num_bytes = btrfs_file_extent_disk_num_bytes(leaf, fi);
1135 ret = add_extent(bytenr, num_bytes, metadump, 1);
1137 fprintf(stderr, "Error adding space cache blocks %d\n",
1139 btrfs_release_path(path);
1148 static int copy_from_extent_tree(struct metadump_struct *metadump,
1149 struct btrfs_path *path)
1151 struct btrfs_root *extent_root;
1152 struct extent_buffer *leaf;
1153 struct btrfs_extent_item *ei;
1154 struct btrfs_key key;
1159 extent_root = metadump->root->fs_info->extent_root;
1160 bytenr = BTRFS_SUPER_INFO_OFFSET + 4096;
1161 key.objectid = bytenr;
1162 key.type = BTRFS_EXTENT_ITEM_KEY;
1165 ret = btrfs_search_slot(NULL, extent_root, &key, path, 0, 0);
1167 fprintf(stderr, "Error searching extent root %d\n", ret);
1173 leaf = path->nodes[0];
1174 if (path->slots[0] >= btrfs_header_nritems(leaf)) {
1175 ret = btrfs_next_leaf(extent_root, path);
1177 fprintf(stderr, "Error going to next leaf %d"
1185 leaf = path->nodes[0];
1188 btrfs_item_key_to_cpu(leaf, &key, path->slots[0]);
1189 if (key.objectid < bytenr ||
1190 (key.type != BTRFS_EXTENT_ITEM_KEY &&
1191 key.type != BTRFS_METADATA_ITEM_KEY)) {
1196 bytenr = key.objectid;
1197 if (key.type == BTRFS_METADATA_ITEM_KEY)
1198 num_bytes = extent_root->leafsize;
1200 num_bytes = key.offset;
1202 if (btrfs_item_size_nr(leaf, path->slots[0]) > sizeof(*ei)) {
1203 ei = btrfs_item_ptr(leaf, path->slots[0],
1204 struct btrfs_extent_item);
1205 if (btrfs_extent_flags(leaf, ei) &
1206 BTRFS_EXTENT_FLAG_TREE_BLOCK) {
1207 ret = add_extent(bytenr, num_bytes, metadump,
1210 fprintf(stderr, "Error adding block "
1216 #ifdef BTRFS_COMPAT_EXTENT_TREE_V0
1217 ret = is_tree_block(extent_root, path, bytenr);
1219 fprintf(stderr, "Error checking tree block "
1225 ret = add_extent(bytenr, num_bytes, metadump,
1228 fprintf(stderr, "Error adding block "
1235 fprintf(stderr, "Either extent tree corruption or "
1236 "you haven't built with V0 support\n");
1241 bytenr += num_bytes;
1244 btrfs_release_path(path);
1249 static int create_metadump(const char *input, FILE *out, int num_threads,
1250 int compress_level, int sanitize, int walk_trees)
1252 struct btrfs_root *root;
1253 struct btrfs_path *path = NULL;
1254 struct metadump_struct metadump;
1258 root = open_ctree(input, 0, 0);
1260 fprintf(stderr, "Open ctree failed\n");
1264 BUG_ON(root->nodesize != root->leafsize);
1266 ret = metadump_init(&metadump, root, out, num_threads,
1267 compress_level, sanitize);
1269 fprintf(stderr, "Error initing metadump %d\n", ret);
1274 ret = add_extent(BTRFS_SUPER_INFO_OFFSET, 4096, &metadump, 0);
1276 fprintf(stderr, "Error adding metadata %d\n", ret);
1281 path = btrfs_alloc_path();
1283 fprintf(stderr, "Out of memory allocing path\n");
1289 ret = copy_tree_blocks(root, root->fs_info->chunk_root->node,
1296 ret = copy_tree_blocks(root, root->fs_info->tree_root->node,
1303 ret = copy_from_extent_tree(&metadump, path);
1310 ret = copy_log_trees(root, &metadump, path);
1316 ret = copy_space_cache(root, &metadump, path);
1318 ret = flush_pending(&metadump, 1);
1322 fprintf(stderr, "Error flushing pending %d\n", ret);
1325 metadump_destroy(&metadump);
1327 btrfs_free_path(path);
1328 ret = close_ctree(root);
1329 return err ? err : ret;
1332 static void update_super_old(u8 *buffer)
1334 struct btrfs_super_block *super = (struct btrfs_super_block *)buffer;
1335 struct btrfs_chunk *chunk;
1336 struct btrfs_disk_key *key;
1337 u32 sectorsize = btrfs_super_sectorsize(super);
1338 u64 flags = btrfs_super_flags(super);
1340 flags |= BTRFS_SUPER_FLAG_METADUMP;
1341 btrfs_set_super_flags(super, flags);
1343 key = (struct btrfs_disk_key *)(super->sys_chunk_array);
1344 chunk = (struct btrfs_chunk *)(super->sys_chunk_array +
1345 sizeof(struct btrfs_disk_key));
1347 btrfs_set_disk_key_objectid(key, BTRFS_FIRST_CHUNK_TREE_OBJECTID);
1348 btrfs_set_disk_key_type(key, BTRFS_CHUNK_ITEM_KEY);
1349 btrfs_set_disk_key_offset(key, 0);
1351 btrfs_set_stack_chunk_length(chunk, (u64)-1);
1352 btrfs_set_stack_chunk_owner(chunk, BTRFS_EXTENT_TREE_OBJECTID);
1353 btrfs_set_stack_chunk_stripe_len(chunk, 64 * 1024);
1354 btrfs_set_stack_chunk_type(chunk, BTRFS_BLOCK_GROUP_SYSTEM);
1355 btrfs_set_stack_chunk_io_align(chunk, sectorsize);
1356 btrfs_set_stack_chunk_io_width(chunk, sectorsize);
1357 btrfs_set_stack_chunk_sector_size(chunk, sectorsize);
1358 btrfs_set_stack_chunk_num_stripes(chunk, 1);
1359 btrfs_set_stack_chunk_sub_stripes(chunk, 0);
1360 chunk->stripe.devid = super->dev_item.devid;
1361 btrfs_set_stack_stripe_offset(&chunk->stripe, 0);
1362 memcpy(chunk->stripe.dev_uuid, super->dev_item.uuid, BTRFS_UUID_SIZE);
1363 btrfs_set_super_sys_array_size(super, sizeof(*key) + sizeof(*chunk));
1364 csum_block(buffer, 4096);
1367 static int update_super(u8 *buffer)
1369 struct btrfs_super_block *super = (struct btrfs_super_block *)buffer;
1370 struct btrfs_chunk *chunk;
1371 struct btrfs_disk_key *disk_key;
1372 struct btrfs_key key;
1373 u32 new_array_size = 0;
1377 u8 *ptr, *write_ptr;
1378 int old_num_stripes;
1380 write_ptr = ptr = super->sys_chunk_array;
1381 array_size = btrfs_super_sys_array_size(super);
1383 while (cur < array_size) {
1384 disk_key = (struct btrfs_disk_key *)ptr;
1385 btrfs_disk_key_to_cpu(&key, disk_key);
1387 new_array_size += sizeof(*disk_key);
1388 memmove(write_ptr, ptr, sizeof(*disk_key));
1390 write_ptr += sizeof(*disk_key);
1391 ptr += sizeof(*disk_key);
1392 cur += sizeof(*disk_key);
1393 new_cur += sizeof(*disk_key);
1395 if (key.type == BTRFS_CHUNK_ITEM_KEY) {
1396 chunk = (struct btrfs_chunk *)ptr;
1397 old_num_stripes = btrfs_stack_chunk_num_stripes(chunk);
1398 chunk = (struct btrfs_chunk *)write_ptr;
1400 memmove(write_ptr, ptr, sizeof(*chunk));
1401 btrfs_set_stack_chunk_num_stripes(chunk, 1);
1402 btrfs_set_stack_chunk_sub_stripes(chunk, 0);
1403 btrfs_set_stack_chunk_type(chunk,
1404 BTRFS_BLOCK_GROUP_SYSTEM);
1405 chunk->stripe.devid = super->dev_item.devid;
1406 memcpy(chunk->stripe.dev_uuid, super->dev_item.uuid,
1408 new_array_size += sizeof(*chunk);
1409 new_cur += sizeof(*chunk);
1411 fprintf(stderr, "Bogus key in the sys chunk array "
1415 write_ptr += sizeof(*chunk);
1416 ptr += btrfs_chunk_item_size(old_num_stripes);
1417 cur += btrfs_chunk_item_size(old_num_stripes);
1420 btrfs_set_super_sys_array_size(super, new_array_size);
1421 csum_block(buffer, 4096);
1426 static struct extent_buffer *alloc_dummy_eb(u64 bytenr, u32 size)
1428 struct extent_buffer *eb;
1430 eb = malloc(sizeof(struct extent_buffer) + size);
1433 memset(eb, 0, sizeof(struct extent_buffer) + size);
1440 static void truncate_item(struct extent_buffer *eb, int slot, u32 new_size)
1442 struct btrfs_item *item;
1450 old_size = btrfs_item_size_nr(eb, slot);
1451 if (old_size == new_size)
1454 nritems = btrfs_header_nritems(eb);
1455 data_end = btrfs_item_offset_nr(eb, nritems - 1);
1457 old_data_start = btrfs_item_offset_nr(eb, slot);
1458 size_diff = old_size - new_size;
1460 for (i = slot; i < nritems; i++) {
1462 item = btrfs_item_nr(i);
1463 ioff = btrfs_item_offset(eb, item);
1464 btrfs_set_item_offset(eb, item, ioff + size_diff);
1467 memmove_extent_buffer(eb, btrfs_leaf_data(eb) + data_end + size_diff,
1468 btrfs_leaf_data(eb) + data_end,
1469 old_data_start + new_size - data_end);
1470 item = btrfs_item_nr(slot);
1471 btrfs_set_item_size(eb, item, new_size);
1474 static int fixup_chunk_tree_block(struct mdrestore_struct *mdres,
1475 struct async_work *async, u8 *buffer,
1478 struct extent_buffer *eb;
1479 size_t size_left = size;
1480 u64 bytenr = async->start;
1483 if (size_left % mdres->leafsize)
1486 eb = alloc_dummy_eb(bytenr, mdres->leafsize);
1492 memcpy(eb->data, buffer, mdres->leafsize);
1494 if (btrfs_header_bytenr(eb) != bytenr)
1496 if (memcmp(mdres->fsid,
1497 eb->data + offsetof(struct btrfs_header, fsid),
1501 if (btrfs_header_owner(eb) != BTRFS_CHUNK_TREE_OBJECTID)
1504 if (btrfs_header_level(eb) != 0)
1507 for (i = 0; i < btrfs_header_nritems(eb); i++) {
1508 struct btrfs_chunk chunk;
1509 struct btrfs_key key;
1512 btrfs_item_key_to_cpu(eb, &key, i);
1513 if (key.type != BTRFS_CHUNK_ITEM_KEY)
1515 truncate_item(eb, i, sizeof(chunk));
1516 read_extent_buffer(eb, &chunk,
1517 btrfs_item_ptr_offset(eb, i),
1520 /* Zero out the RAID profile */
1521 type = btrfs_stack_chunk_type(&chunk);
1522 type &= (BTRFS_BLOCK_GROUP_DATA |
1523 BTRFS_BLOCK_GROUP_SYSTEM |
1524 BTRFS_BLOCK_GROUP_METADATA);
1525 btrfs_set_stack_chunk_type(&chunk, type);
1527 btrfs_set_stack_chunk_num_stripes(&chunk, 1);
1528 btrfs_set_stack_chunk_sub_stripes(&chunk, 0);
1529 btrfs_set_stack_stripe_devid(&chunk.stripe, mdres->devid);
1530 memcpy(chunk.stripe.dev_uuid, mdres->uuid,
1532 write_extent_buffer(eb, &chunk,
1533 btrfs_item_ptr_offset(eb, i),
1536 memcpy(buffer, eb->data, eb->len);
1537 csum_block(buffer, eb->len);
1539 size_left -= mdres->leafsize;
1540 buffer += mdres->leafsize;
1541 bytenr += mdres->leafsize;
1547 static void write_backup_supers(int fd, u8 *buf)
1549 struct btrfs_super_block *super = (struct btrfs_super_block *)buf;
1556 if (fstat(fd, &st)) {
1557 fprintf(stderr, "Couldn't stat restore point, won't be able "
1558 "to write backup supers: %d\n", errno);
1562 size = btrfs_device_size(fd, &st);
1564 for (i = 1; i < BTRFS_SUPER_MIRROR_MAX; i++) {
1565 bytenr = btrfs_sb_offset(i);
1566 if (bytenr + 4096 > size)
1568 btrfs_set_super_bytenr(super, bytenr);
1569 csum_block(buf, 4096);
1570 ret = pwrite64(fd, buf, 4096, bytenr);
1573 fprintf(stderr, "Problem writing out backup "
1574 "super block %d, err %d\n", i, errno);
1576 fprintf(stderr, "Short write writing out "
1577 "backup super block\n");
1583 static u64 logical_to_physical(struct mdrestore_struct *mdres, u64 logical, u64 *size)
1585 struct fs_chunk *fs_chunk;
1586 struct rb_node *entry;
1587 struct fs_chunk search;
1590 if (logical == BTRFS_SUPER_INFO_OFFSET)
1593 search.logical = logical;
1594 entry = tree_search(&mdres->chunk_tree, &search.n, chunk_cmp, 1);
1596 if (mdres->in != stdin)
1597 printf("Couldn't find a chunk, using logical\n");
1600 fs_chunk = rb_entry(entry, struct fs_chunk, n);
1601 if (fs_chunk->logical > logical || fs_chunk->logical + fs_chunk->bytes < logical)
1603 offset = search.logical - fs_chunk->logical;
1605 *size = min(*size, fs_chunk->bytes + fs_chunk->logical - logical);
1606 return fs_chunk->physical + offset;
1609 static void *restore_worker(void *data)
1611 struct mdrestore_struct *mdres = (struct mdrestore_struct *)data;
1612 struct async_work *async;
1618 int compress_size = MAX_PENDING_SIZE * 4;
1620 outfd = fileno(mdres->out);
1621 buffer = malloc(compress_size);
1623 fprintf(stderr, "Error allocing buffer\n");
1624 pthread_mutex_lock(&mdres->mutex);
1626 mdres->error = -ENOMEM;
1627 pthread_mutex_unlock(&mdres->mutex);
1636 pthread_mutex_lock(&mdres->mutex);
1637 while (!mdres->leafsize || list_empty(&mdres->list)) {
1639 pthread_mutex_unlock(&mdres->mutex);
1642 pthread_cond_wait(&mdres->cond, &mdres->mutex);
1644 async = list_entry(mdres->list.next, struct async_work, list);
1645 list_del_init(&async->list);
1646 pthread_mutex_unlock(&mdres->mutex);
1648 if (mdres->compress_method == COMPRESS_ZLIB) {
1649 size = compress_size;
1650 ret = uncompress(buffer, (unsigned long *)&size,
1651 async->buffer, async->bufsize);
1653 fprintf(stderr, "Error decompressing %d\n",
1659 outbuf = async->buffer;
1660 size = async->bufsize;
1663 if (!mdres->multi_devices) {
1664 if (async->start == BTRFS_SUPER_INFO_OFFSET) {
1665 if (mdres->old_restore) {
1666 update_super_old(outbuf);
1668 ret = update_super(outbuf);
1672 } else if (!mdres->old_restore) {
1673 ret = fixup_chunk_tree_block(mdres, async, outbuf, size);
1679 if (!mdres->fixup_offset) {
1681 u64 chunk_size = size;
1682 if (!mdres->multi_devices)
1683 bytenr = logical_to_physical(mdres,
1684 async->start + offset,
1687 bytenr = async->start + offset;
1689 ret = pwrite64(outfd, outbuf+offset, chunk_size,
1691 if (ret != chunk_size) {
1693 fprintf(stderr, "Error writing to "
1694 "device %d\n", errno);
1698 fprintf(stderr, "Short write\n");
1704 offset += chunk_size;
1706 } else if (async->start != BTRFS_SUPER_INFO_OFFSET) {
1707 ret = write_data_to_disk(mdres->info, outbuf, async->start, size, 0);
1709 printk("Error write data\n");
1715 /* backup super blocks are already there at fixup_offset stage */
1716 if (!mdres->multi_devices && async->start == BTRFS_SUPER_INFO_OFFSET)
1717 write_backup_supers(outfd, outbuf);
1719 pthread_mutex_lock(&mdres->mutex);
1720 if (err && !mdres->error)
1723 pthread_mutex_unlock(&mdres->mutex);
1725 free(async->buffer);
1733 static void mdrestore_destroy(struct mdrestore_struct *mdres)
1738 while ((n = rb_first(&mdres->chunk_tree))) {
1739 struct fs_chunk *entry;
1741 entry = rb_entry(n, struct fs_chunk, n);
1742 rb_erase(n, &mdres->chunk_tree);
1745 pthread_mutex_lock(&mdres->mutex);
1747 pthread_cond_broadcast(&mdres->cond);
1748 pthread_mutex_unlock(&mdres->mutex);
1750 for (i = 0; i < mdres->num_threads; i++)
1751 pthread_join(mdres->threads[i], NULL);
1753 pthread_cond_destroy(&mdres->cond);
1754 pthread_mutex_destroy(&mdres->mutex);
1755 free(mdres->threads);
1758 static int mdrestore_init(struct mdrestore_struct *mdres,
1759 FILE *in, FILE *out, int old_restore,
1760 int num_threads, int fixup_offset,
1761 struct btrfs_fs_info *info, int multi_devices)
1765 memset(mdres, 0, sizeof(*mdres));
1766 pthread_cond_init(&mdres->cond, NULL);
1767 pthread_mutex_init(&mdres->mutex, NULL);
1768 INIT_LIST_HEAD(&mdres->list);
1771 mdres->old_restore = old_restore;
1772 mdres->chunk_tree.rb_node = NULL;
1773 mdres->fixup_offset = fixup_offset;
1775 mdres->multi_devices = multi_devices;
1780 mdres->num_threads = num_threads;
1781 mdres->threads = calloc(num_threads, sizeof(pthread_t));
1782 if (!mdres->threads)
1784 for (i = 0; i < num_threads; i++) {
1785 ret = pthread_create(mdres->threads + i, NULL, restore_worker,
1791 mdrestore_destroy(mdres);
1795 static int fill_mdres_info(struct mdrestore_struct *mdres,
1796 struct async_work *async)
1798 struct btrfs_super_block *super;
1803 /* We've already been initialized */
1804 if (mdres->leafsize)
1807 if (mdres->compress_method == COMPRESS_ZLIB) {
1808 size_t size = MAX_PENDING_SIZE * 2;
1810 buffer = malloc(MAX_PENDING_SIZE * 2);
1813 ret = uncompress(buffer, (unsigned long *)&size,
1814 async->buffer, async->bufsize);
1816 fprintf(stderr, "Error decompressing %d\n", ret);
1822 outbuf = async->buffer;
1825 super = (struct btrfs_super_block *)outbuf;
1826 mdres->leafsize = btrfs_super_leafsize(super);
1827 memcpy(mdres->fsid, super->fsid, BTRFS_FSID_SIZE);
1828 memcpy(mdres->uuid, super->dev_item.uuid,
1830 mdres->devid = le64_to_cpu(super->dev_item.devid);
1835 static int add_cluster(struct meta_cluster *cluster,
1836 struct mdrestore_struct *mdres, u64 *next)
1838 struct meta_cluster_item *item;
1839 struct meta_cluster_header *header = &cluster->header;
1840 struct async_work *async;
1845 BUG_ON(mdres->num_items);
1846 mdres->compress_method = header->compress;
1848 bytenr = le64_to_cpu(header->bytenr) + BLOCK_SIZE;
1849 nritems = le32_to_cpu(header->nritems);
1850 for (i = 0; i < nritems; i++) {
1851 item = &cluster->items[i];
1852 async = calloc(1, sizeof(*async));
1854 fprintf(stderr, "Error allocating async\n");
1857 async->start = le64_to_cpu(item->bytenr);
1858 async->bufsize = le32_to_cpu(item->size);
1859 async->buffer = malloc(async->bufsize);
1860 if (!async->buffer) {
1861 fprintf(stderr, "Error allocing async buffer\n");
1865 ret = fread(async->buffer, async->bufsize, 1, mdres->in);
1867 fprintf(stderr, "Error reading buffer %d\n", errno);
1868 free(async->buffer);
1872 bytenr += async->bufsize;
1874 pthread_mutex_lock(&mdres->mutex);
1875 if (async->start == BTRFS_SUPER_INFO_OFFSET) {
1876 ret = fill_mdres_info(mdres, async);
1878 fprintf(stderr, "Error setting up restore\n");
1879 pthread_mutex_unlock(&mdres->mutex);
1880 free(async->buffer);
1885 list_add_tail(&async->list, &mdres->list);
1887 pthread_cond_signal(&mdres->cond);
1888 pthread_mutex_unlock(&mdres->mutex);
1890 if (bytenr & BLOCK_MASK) {
1891 char buffer[BLOCK_MASK];
1892 size_t size = BLOCK_SIZE - (bytenr & BLOCK_MASK);
1895 ret = fread(buffer, size, 1, mdres->in);
1897 fprintf(stderr, "Error reading in buffer %d\n", errno);
1905 static int wait_for_worker(struct mdrestore_struct *mdres)
1909 pthread_mutex_lock(&mdres->mutex);
1911 while (!ret && mdres->num_items > 0) {
1912 struct timespec ts = {
1914 .tv_nsec = 10000000,
1916 pthread_mutex_unlock(&mdres->mutex);
1917 nanosleep(&ts, NULL);
1918 pthread_mutex_lock(&mdres->mutex);
1921 pthread_mutex_unlock(&mdres->mutex);
1925 static int read_chunk_block(struct mdrestore_struct *mdres, u8 *buffer,
1926 u64 bytenr, u64 item_bytenr, u32 bufsize,
1929 struct extent_buffer *eb;
1933 eb = alloc_dummy_eb(bytenr, mdres->leafsize);
1939 while (item_bytenr != bytenr) {
1940 buffer += mdres->leafsize;
1941 item_bytenr += mdres->leafsize;
1944 memcpy(eb->data, buffer, mdres->leafsize);
1945 if (btrfs_header_bytenr(eb) != bytenr) {
1946 fprintf(stderr, "Eb bytenr doesn't match found bytenr\n");
1951 if (memcmp(mdres->fsid, eb->data + offsetof(struct btrfs_header, fsid),
1953 fprintf(stderr, "Fsid doesn't match\n");
1958 if (btrfs_header_owner(eb) != BTRFS_CHUNK_TREE_OBJECTID) {
1959 fprintf(stderr, "Does not belong to the chunk tree\n");
1964 for (i = 0; i < btrfs_header_nritems(eb); i++) {
1965 struct btrfs_chunk chunk;
1966 struct fs_chunk *fs_chunk;
1967 struct btrfs_key key;
1969 if (btrfs_header_level(eb)) {
1970 u64 blockptr = btrfs_node_blockptr(eb, i);
1972 ret = search_for_chunk_blocks(mdres, blockptr,
1979 /* Yay a leaf! We loves leafs! */
1980 btrfs_item_key_to_cpu(eb, &key, i);
1981 if (key.type != BTRFS_CHUNK_ITEM_KEY)
1984 fs_chunk = malloc(sizeof(struct fs_chunk));
1986 fprintf(stderr, "Erorr allocating chunk\n");
1990 memset(fs_chunk, 0, sizeof(*fs_chunk));
1991 read_extent_buffer(eb, &chunk, btrfs_item_ptr_offset(eb, i),
1994 fs_chunk->logical = key.offset;
1995 fs_chunk->physical = btrfs_stack_stripe_offset(&chunk.stripe);
1996 fs_chunk->bytes = btrfs_stack_chunk_length(&chunk);
1997 tree_insert(&mdres->chunk_tree, &fs_chunk->n, chunk_cmp);
2004 /* If you have to ask you aren't worthy */
2005 static int search_for_chunk_blocks(struct mdrestore_struct *mdres,
2006 u64 search, u64 cluster_bytenr)
2008 struct meta_cluster *cluster;
2009 struct meta_cluster_header *header;
2010 struct meta_cluster_item *item;
2011 u64 current_cluster = cluster_bytenr, bytenr;
2013 u32 bufsize, nritems, i;
2014 u8 *buffer, *tmp = NULL;
2017 cluster = malloc(BLOCK_SIZE);
2019 fprintf(stderr, "Error allocating cluster\n");
2023 buffer = malloc(MAX_PENDING_SIZE * 2);
2025 fprintf(stderr, "Error allocing buffer\n");
2030 if (mdres->compress_method == COMPRESS_ZLIB) {
2031 tmp = malloc(MAX_PENDING_SIZE * 2);
2033 fprintf(stderr, "Error allocing tmp buffer\n");
2040 bytenr = current_cluster;
2042 if (fseek(mdres->in, current_cluster, SEEK_SET)) {
2043 fprintf(stderr, "Error seeking: %d\n", errno);
2048 ret = fread(cluster, BLOCK_SIZE, 1, mdres->in);
2050 if (cluster_bytenr != 0) {
2052 current_cluster = 0;
2056 printf("ok this is where we screwed up?\n");
2059 } else if (ret < 0) {
2060 fprintf(stderr, "Error reading image\n");
2065 header = &cluster->header;
2066 if (le64_to_cpu(header->magic) != HEADER_MAGIC ||
2067 le64_to_cpu(header->bytenr) != current_cluster) {
2068 fprintf(stderr, "bad header in metadump image\n");
2073 bytenr += BLOCK_SIZE;
2074 nritems = le32_to_cpu(header->nritems);
2075 for (i = 0; i < nritems; i++) {
2078 item = &cluster->items[i];
2079 bufsize = le32_to_cpu(item->size);
2080 item_bytenr = le64_to_cpu(item->bytenr);
2082 if (mdres->compress_method == COMPRESS_ZLIB) {
2083 ret = fread(tmp, bufsize, 1, mdres->in);
2085 fprintf(stderr, "Error reading: %d\n",
2091 size = MAX_PENDING_SIZE * 2;
2092 ret = uncompress(buffer,
2093 (unsigned long *)&size, tmp,
2096 fprintf(stderr, "Error decompressing "
2102 ret = fread(buffer, bufsize, 1, mdres->in);
2104 fprintf(stderr, "Error reading: %d\n",
2113 if (item_bytenr <= search &&
2114 item_bytenr + size > search) {
2115 ret = read_chunk_block(mdres, buffer, search,
2129 if (bytenr & BLOCK_MASK)
2130 bytenr += BLOCK_SIZE - (bytenr & BLOCK_MASK);
2131 current_cluster = bytenr;
2140 static int build_chunk_tree(struct mdrestore_struct *mdres,
2141 struct meta_cluster *cluster)
2143 struct btrfs_super_block *super;
2144 struct meta_cluster_header *header;
2145 struct meta_cluster_item *item = NULL;
2146 u64 chunk_root_bytenr = 0;
2152 /* We can't seek with stdin so don't bother doing this */
2153 if (mdres->in == stdin)
2156 ret = fread(cluster, BLOCK_SIZE, 1, mdres->in);
2158 fprintf(stderr, "Error reading in cluster: %d\n", errno);
2163 header = &cluster->header;
2164 if (le64_to_cpu(header->magic) != HEADER_MAGIC ||
2165 le64_to_cpu(header->bytenr) != 0) {
2166 fprintf(stderr, "bad header in metadump image\n");
2170 bytenr += BLOCK_SIZE;
2171 mdres->compress_method = header->compress;
2172 nritems = le32_to_cpu(header->nritems);
2173 for (i = 0; i < nritems; i++) {
2174 item = &cluster->items[i];
2176 if (le64_to_cpu(item->bytenr) == BTRFS_SUPER_INFO_OFFSET)
2178 bytenr += le32_to_cpu(item->size);
2179 if (fseek(mdres->in, le32_to_cpu(item->size), SEEK_CUR)) {
2180 fprintf(stderr, "Error seeking: %d\n", errno);
2185 if (!item || le64_to_cpu(item->bytenr) != BTRFS_SUPER_INFO_OFFSET) {
2186 fprintf(stderr, "Huh, didn't find the super?\n");
2190 buffer = malloc(le32_to_cpu(item->size));
2192 fprintf(stderr, "Error allocing buffer\n");
2196 ret = fread(buffer, le32_to_cpu(item->size), 1, mdres->in);
2198 fprintf(stderr, "Error reading buffer: %d\n", errno);
2203 if (mdres->compress_method == COMPRESS_ZLIB) {
2204 size_t size = MAX_PENDING_SIZE * 2;
2207 tmp = malloc(MAX_PENDING_SIZE * 2);
2212 ret = uncompress(tmp, (unsigned long *)&size,
2213 buffer, le32_to_cpu(item->size));
2215 fprintf(stderr, "Error decompressing %d\n", ret);
2224 super = (struct btrfs_super_block *)buffer;
2225 chunk_root_bytenr = btrfs_super_chunk_root(super);
2226 mdres->leafsize = btrfs_super_leafsize(super);
2227 memcpy(mdres->fsid, super->fsid, BTRFS_FSID_SIZE);
2228 memcpy(mdres->uuid, super->dev_item.uuid,
2230 mdres->devid = le64_to_cpu(super->dev_item.devid);
2233 return search_for_chunk_blocks(mdres, chunk_root_bytenr, 0);
2236 static int __restore_metadump(const char *input, FILE *out, int old_restore,
2237 int num_threads, int fixup_offset,
2238 const char *target, int multi_devices)
2240 struct meta_cluster *cluster = NULL;
2241 struct meta_cluster_header *header;
2242 struct mdrestore_struct mdrestore;
2243 struct btrfs_fs_info *info = NULL;
2248 if (!strcmp(input, "-")) {
2251 in = fopen(input, "r");
2253 perror("unable to open metadump image");
2258 /* NOTE: open with write mode */
2261 info = open_ctree_fs_info_restore(target, 0, 0, 1, 1);
2263 fprintf(stderr, "%s: open ctree failed\n", __func__);
2269 cluster = malloc(BLOCK_SIZE);
2271 fprintf(stderr, "Error allocating cluster\n");
2276 ret = mdrestore_init(&mdrestore, in, out, old_restore, num_threads,
2277 fixup_offset, info, multi_devices);
2279 fprintf(stderr, "Error initing mdrestore %d\n", ret);
2280 goto failed_cluster;
2283 if (!multi_devices) {
2284 ret = build_chunk_tree(&mdrestore, cluster);
2289 if (in != stdin && fseek(in, 0, SEEK_SET)) {
2290 fprintf(stderr, "Error seeking %d\n", errno);
2295 ret = fread(cluster, BLOCK_SIZE, 1, in);
2299 header = &cluster->header;
2300 if (le64_to_cpu(header->magic) != HEADER_MAGIC ||
2301 le64_to_cpu(header->bytenr) != bytenr) {
2302 fprintf(stderr, "bad header in metadump image\n");
2306 ret = add_cluster(cluster, &mdrestore, &bytenr);
2308 fprintf(stderr, "Error adding cluster\n");
2312 ret = wait_for_worker(&mdrestore);
2314 fprintf(stderr, "One of the threads errored out %d\n",
2320 mdrestore_destroy(&mdrestore);
2324 if (fixup_offset && info)
2325 close_ctree(info->chunk_root);
2332 static int restore_metadump(const char *input, FILE *out, int old_restore,
2333 int num_threads, int multi_devices)
2335 return __restore_metadump(input, out, old_restore, num_threads, 0, NULL,
2339 static int fixup_metadump(const char *input, FILE *out, int num_threads,
2342 return __restore_metadump(input, out, 0, num_threads, 1, target, 1);
2345 static int update_disk_super_on_device(struct btrfs_fs_info *info,
2346 const char *other_dev, u64 cur_devid)
2348 struct btrfs_key key;
2349 struct extent_buffer *leaf;
2350 struct btrfs_path path;
2351 struct btrfs_dev_item *dev_item;
2352 struct btrfs_super_block *disk_super;
2353 char dev_uuid[BTRFS_UUID_SIZE];
2354 char fs_uuid[BTRFS_UUID_SIZE];
2355 u64 devid, type, io_align, io_width;
2356 u64 sector_size, total_bytes, bytes_used;
2361 key.objectid = BTRFS_DEV_ITEMS_OBJECTID;
2362 key.type = BTRFS_DEV_ITEM_KEY;
2363 key.offset = cur_devid;
2365 btrfs_init_path(&path);
2366 ret = btrfs_search_slot(NULL, info->chunk_root, &key, &path, 0, 0);
2368 fprintf(stderr, "search key fails\n");
2372 leaf = path.nodes[0];
2373 dev_item = btrfs_item_ptr(leaf, path.slots[0],
2374 struct btrfs_dev_item);
2376 devid = btrfs_device_id(leaf, dev_item);
2377 if (devid != cur_devid) {
2378 printk("devid %llu mismatch with %llu\n", devid, cur_devid);
2382 type = btrfs_device_type(leaf, dev_item);
2383 io_align = btrfs_device_io_align(leaf, dev_item);
2384 io_width = btrfs_device_io_width(leaf, dev_item);
2385 sector_size = btrfs_device_sector_size(leaf, dev_item);
2386 total_bytes = btrfs_device_total_bytes(leaf, dev_item);
2387 bytes_used = btrfs_device_bytes_used(leaf, dev_item);
2388 read_extent_buffer(leaf, dev_uuid, (unsigned long)btrfs_device_uuid(dev_item), BTRFS_UUID_SIZE);
2389 read_extent_buffer(leaf, fs_uuid, (unsigned long)btrfs_device_fsid(dev_item), BTRFS_UUID_SIZE);
2391 btrfs_release_path(&path);
2393 printk("update disk super on %s devid=%llu\n", other_dev, devid);
2395 /* update other devices' super block */
2396 fp = open(other_dev, O_CREAT | O_RDWR, 0600);
2398 fprintf(stderr, "could not open %s\n", other_dev);
2402 buf = malloc(BTRFS_SUPER_INFO_SIZE);
2408 memcpy(buf, info->super_copy, BTRFS_SUPER_INFO_SIZE);
2410 disk_super = (struct btrfs_super_block *)buf;
2411 dev_item = &disk_super->dev_item;
2413 btrfs_set_stack_device_type(dev_item, type);
2414 btrfs_set_stack_device_id(dev_item, devid);
2415 btrfs_set_stack_device_total_bytes(dev_item, total_bytes);
2416 btrfs_set_stack_device_bytes_used(dev_item, bytes_used);
2417 btrfs_set_stack_device_io_align(dev_item, io_align);
2418 btrfs_set_stack_device_io_width(dev_item, io_width);
2419 btrfs_set_stack_device_sector_size(dev_item, sector_size);
2420 memcpy(dev_item->uuid, dev_uuid, BTRFS_UUID_SIZE);
2421 memcpy(dev_item->fsid, fs_uuid, BTRFS_UUID_SIZE);
2422 csum_block((u8 *)buf, BTRFS_SUPER_INFO_SIZE);
2424 ret = pwrite64(fp, buf, BTRFS_SUPER_INFO_SIZE, BTRFS_SUPER_INFO_OFFSET);
2425 if (ret != BTRFS_SUPER_INFO_SIZE) {
2430 write_backup_supers(fp, (u8 *)buf);
2438 static void print_usage(void)
2440 fprintf(stderr, "usage: btrfs-image [options] source target\n");
2441 fprintf(stderr, "\t-r \trestore metadump image\n");
2442 fprintf(stderr, "\t-c value\tcompression level (0 ~ 9)\n");
2443 fprintf(stderr, "\t-t value\tnumber of threads (1 ~ 32)\n");
2444 fprintf(stderr, "\t-o \tdon't mess with the chunk tree when restoring\n");
2445 fprintf(stderr, "\t-s \tsanitize file names, use once to just use garbage, use twice if you want crc collisions\n");
2446 fprintf(stderr, "\t-w \twalk all trees instead of using extent tree, do this if your extent tree is broken\n");
2450 int main(int argc, char *argv[])
2454 int num_threads = 0;
2455 int compress_level = 0;
2457 int old_restore = 0;
2459 int multi_devices = 0;
2466 int c = getopt(argc, argv, "rc:t:oswm");
2474 num_threads = atoi(optarg);
2475 if (num_threads <= 0 || num_threads > 32)
2479 compress_level = atoi(optarg);
2480 if (compress_level < 0 || compress_level > 9)
2501 if ((old_restore) && create)
2504 argc = argc - optind;
2507 if (multi_devices && dev_cnt < 2)
2509 if (!multi_devices && dev_cnt != 1)
2512 source = argv[optind];
2513 target = argv[optind + 1];
2515 if (create && !strcmp(target, "-")) {
2518 out = fopen(target, "w+");
2520 perror("unable to create target file");
2525 if (num_threads == 0 && compress_level > 0) {
2526 num_threads = sysconf(_SC_NPROCESSORS_ONLN);
2527 if (num_threads <= 0)
2532 ret = create_metadump(source, out, num_threads,
2533 compress_level, sanitize, walk_trees);
2535 ret = restore_metadump(source, out, old_restore, 1,
2538 printk("%s failed (%s)\n", (create) ? "create" : "restore",
2543 /* extended support for multiple devices */
2544 if (!create && multi_devices) {
2545 struct btrfs_fs_info *info;
2549 info = open_ctree_fs_info_restore(target, 0, 0, 0, 1);
2552 fprintf(stderr, "unable to open %s error = %s\n",
2553 target, strerror(e));
2557 total_devs = btrfs_super_num_devices(info->super_copy);
2558 if (total_devs != dev_cnt) {
2559 printk("it needs %llu devices but has only %d\n",
2560 total_devs, dev_cnt);
2561 close_ctree(info->chunk_root);
2565 /* update super block on other disks */
2566 for (i = 2; i <= dev_cnt; i++) {
2567 ret = update_disk_super_on_device(info,
2568 argv[optind + i], (u64)i);
2570 printk("update disk super failed devid=%d (error=%d)\n",
2572 close_ctree(info->chunk_root);
2577 close_ctree(info->chunk_root);
2579 /* fix metadata block to map correct chunk */
2580 ret = fixup_metadump(source, out, 1, target);
2582 fprintf(stderr, "fix metadump failed (error=%d)\n",