btrfs-progs: Add extra chunk item check to avoid btrfs-progs crash.
[platform/upstream/btrfs-progs.git] / btrfstune.c
1 /*
2  * Copyright (C) 2008 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 <stdio.h>
20 #include <stdlib.h>
21 #include <sys/types.h>
22 #include <sys/stat.h>
23 #include <fcntl.h>
24 #include <unistd.h>
25 #include <dirent.h>
26 #include <uuid/uuid.h>
27
28 #include "kerncompat.h"
29 #include "ctree.h"
30 #include "disk-io.h"
31 #include "transaction.h"
32 #include "utils.h"
33 #include "volumes.h"
34
35 static char *device;
36 static int force = 0;
37
38 static int update_seeding_flag(struct btrfs_root *root, int set_flag)
39 {
40         struct btrfs_trans_handle *trans;
41         struct btrfs_super_block *disk_super;
42         u64 super_flags;
43
44         disk_super = root->fs_info->super_copy;
45         super_flags = btrfs_super_flags(disk_super);
46         if (set_flag) {
47                 if (super_flags & BTRFS_SUPER_FLAG_SEEDING) {
48                         if (force)
49                                 return 0;
50                         else
51                                 fprintf(stderr, "seeding flag is already set on %s\n", device);
52                         return 1;
53                 }
54                 super_flags |= BTRFS_SUPER_FLAG_SEEDING;
55         } else {
56                 if (!(super_flags & BTRFS_SUPER_FLAG_SEEDING)) {
57                         fprintf(stderr, "seeding flag is not set on %s\n",
58                                 device);
59                         return 1;
60                 }
61                 super_flags &= ~BTRFS_SUPER_FLAG_SEEDING;
62                 fprintf(stderr, "Warning: Seeding flag cleared.\n");
63         }
64
65         trans = btrfs_start_transaction(root, 1);
66         btrfs_set_super_flags(disk_super, super_flags);
67         btrfs_commit_transaction(trans, root);
68
69         return 0;
70 }
71
72 static int enable_extrefs_flag(struct btrfs_root *root)
73 {
74         struct btrfs_trans_handle *trans;
75         struct btrfs_super_block *disk_super;
76         u64 super_flags;
77
78         disk_super = root->fs_info->super_copy;
79         super_flags = btrfs_super_incompat_flags(disk_super);
80         super_flags |= BTRFS_FEATURE_INCOMPAT_EXTENDED_IREF;
81         trans = btrfs_start_transaction(root, 1);
82         btrfs_set_super_incompat_flags(disk_super, super_flags);
83         btrfs_commit_transaction(trans, root);
84
85         return 0;
86 }
87
88 static int enable_skinny_metadata(struct btrfs_root *root)
89 {
90         struct btrfs_trans_handle *trans;
91         struct btrfs_super_block *disk_super;
92         u64 super_flags;
93
94         disk_super = root->fs_info->super_copy;
95         super_flags = btrfs_super_incompat_flags(disk_super);
96         super_flags |= BTRFS_FEATURE_INCOMPAT_SKINNY_METADATA;
97         trans = btrfs_start_transaction(root, 1);
98         btrfs_set_super_incompat_flags(disk_super, super_flags);
99         btrfs_commit_transaction(trans, root);
100
101         return 0;
102 }
103
104 static int change_header_uuid(struct btrfs_root *root, struct extent_buffer *eb)
105 {
106         struct btrfs_fs_info *fs_info = root->fs_info;
107         int same_fsid = 1;
108         int same_chunk_tree_uuid = 1;
109         int ret;
110
111         /* Check for whether we need to change fs/chunk id */
112         if (!fs_info->new_fsid && !fs_info->new_chunk_tree_uuid)
113                 return 0;
114         if (fs_info->new_fsid)
115                 same_fsid = !memcmp_extent_buffer(eb, fs_info->new_fsid,
116                                           btrfs_header_fsid(), BTRFS_FSID_SIZE);
117         if (fs_info->new_chunk_tree_uuid)
118                 same_chunk_tree_uuid =
119                         !memcmp_extent_buffer(eb, fs_info->new_chunk_tree_uuid,
120                                               btrfs_header_chunk_tree_uuid(eb),
121                                               BTRFS_UUID_SIZE);
122         if (same_fsid && same_chunk_tree_uuid)
123                 return 0;
124         if (!same_fsid)
125                 write_extent_buffer(eb, fs_info->new_fsid, btrfs_header_fsid(),
126                                     BTRFS_FSID_SIZE);
127         if (!same_chunk_tree_uuid)
128                 write_extent_buffer(eb, fs_info->new_chunk_tree_uuid,
129                                     btrfs_header_chunk_tree_uuid(eb),
130                                     BTRFS_UUID_SIZE);
131         ret = write_tree_block(NULL, root, eb);
132
133         return ret;
134 }
135
136 static int change_extents_uuid(struct btrfs_fs_info *fs_info)
137 {
138         struct btrfs_root *root = fs_info->extent_root;
139         struct btrfs_path *path;
140         struct btrfs_key key = {0, 0, 0};
141         int ret = 0;
142
143         if (!fs_info->new_fsid && !fs_info->new_chunk_tree_uuid)
144                 return 0;
145
146         path = btrfs_alloc_path();
147         if (!path)
148                 return -ENOMEM;
149
150         /*
151          * Here we don't use transaction as it will takes a lot of reserve
152          * space, and that will make a near-full btrfs unable to change uuid
153          */
154         ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
155         if (ret < 0)
156                 goto out;
157
158         while (1) {
159                 struct btrfs_extent_item *ei;
160                 struct extent_buffer *eb;
161                 u64 flags;
162                 u64 bytenr;
163
164                 btrfs_item_key_to_cpu(path->nodes[0], &key, path->slots[0]);
165                 if (key.type != BTRFS_EXTENT_ITEM_KEY &&
166                     key.type != BTRFS_METADATA_ITEM_KEY)
167                         goto next;
168                 ei = btrfs_item_ptr(path->nodes[0], path->slots[0],
169                                     struct btrfs_extent_item);
170                 flags = btrfs_extent_flags(path->nodes[0], ei);
171                 if (!(flags & BTRFS_EXTENT_FLAG_TREE_BLOCK))
172                         goto next;
173
174                 bytenr = key.objectid;
175                 eb = read_tree_block(root, bytenr, root->nodesize, 0);
176                 if (IS_ERR(eb)) {
177                         fprintf(stderr, "Failed to read tree block: %llu\n",
178                                 bytenr);
179                         ret = PTR_ERR(eb);
180                         goto out;
181                 }
182                 ret = change_header_uuid(root, eb);
183                 free_extent_buffer(eb);
184                 if (ret < 0) {
185                         fprintf(stderr, "Failed to change uuid of tree block: %llu\n",
186                                 bytenr);
187                         goto out;
188                 }
189 next:
190                 ret = btrfs_next_item(root, path);
191                 if (ret < 0)
192                         goto out;
193                 if (ret > 0) {
194                         ret = 0;
195                         goto out;
196                 }
197         }
198
199 out:
200         btrfs_free_path(path);
201         return ret;
202 }
203
204 static int change_device_uuid(struct btrfs_root *root, struct extent_buffer *eb,
205                               int slot)
206 {
207         struct btrfs_fs_info *fs_info = root->fs_info;
208         struct btrfs_dev_item *di;
209         int ret = 0;
210
211         di = btrfs_item_ptr(eb, slot, struct btrfs_dev_item);
212         if (fs_info->new_fsid) {
213                 if (!memcmp_extent_buffer(eb, fs_info->new_fsid,
214                                           (unsigned long)btrfs_device_fsid(di),
215                                           BTRFS_FSID_SIZE))
216                         return ret;
217                 write_extent_buffer(eb, fs_info->new_fsid,
218                                     (unsigned long)btrfs_device_fsid(di),
219                                     BTRFS_FSID_SIZE);
220                 ret = write_tree_block(NULL, root, eb);
221         }
222         return ret;
223 }
224
225 static int change_devices_uuid(struct btrfs_fs_info *fs_info)
226 {
227         struct btrfs_root *root = fs_info->chunk_root;
228         struct btrfs_path *path;
229         struct btrfs_key key = {0, 0, 0};
230         int ret = 0;
231
232         /*
233          * Unlike change_extents_uuid, we only need to change fsid in dev_item
234          */
235         if (!fs_info->new_fsid)
236                 return 0;
237
238         path = btrfs_alloc_path();
239         if (!path)
240                 return -ENOMEM;
241         /* No transaction again */
242         ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
243         if (ret < 0)
244                 goto out;
245
246         while (1) {
247                 btrfs_item_key_to_cpu(path->nodes[0], &key, path->slots[0]);
248                 if (key.type != BTRFS_DEV_ITEM_KEY ||
249                     key.objectid != BTRFS_DEV_ITEMS_OBJECTID)
250                         goto next;
251                 ret = change_device_uuid(root, path->nodes[0], path->slots[0]);
252                 if (ret < 0)
253                         goto out;
254 next:
255                 ret = btrfs_next_item(root, path);
256                 if (ret < 0)
257                         goto out;
258                 if (ret > 0) {
259                         ret = 0;
260                         goto out;
261                 }
262         }
263 out:
264         btrfs_free_path(path);
265         return ret;
266 }
267
268 static int change_fsid_prepare(struct btrfs_fs_info *fs_info)
269 {
270         u64 flags = btrfs_super_flags(fs_info->super_copy);
271
272         if (!fs_info->new_fsid && !fs_info->new_chunk_tree_uuid)
273                 return 0;
274
275         if (fs_info->new_fsid)
276                 flags |= BTRFS_SUPER_FLAG_CHANGING_FSID;
277         btrfs_set_super_flags(fs_info->super_copy, flags);
278
279         return write_all_supers(fs_info->tree_root);
280 }
281
282 static int change_fsid_done(struct btrfs_fs_info *fs_info)
283 {
284         u64 flags = btrfs_super_flags(fs_info->super_copy);
285
286         if (!fs_info->new_fsid && !fs_info->new_chunk_tree_uuid)
287                 return 0;
288
289         if (fs_info->new_fsid)
290                 flags &= ~BTRFS_SUPER_FLAG_CHANGING_FSID;
291         btrfs_set_super_flags(fs_info->super_copy, flags);
292
293         return write_all_supers(fs_info->tree_root);
294 }
295
296 static int change_uuid(struct btrfs_fs_info *fs_info, const char *new_fsid,
297                        const char *new_chunk_uuid)
298 {
299         int ret = 0;
300
301         /* caller should do extra check on passed uuid */
302         if (new_fsid) {
303                 /* allocated mem will be freed at close_ctree() */
304                 fs_info->new_fsid = malloc(BTRFS_FSID_SIZE);
305                 if (!fs_info->new_fsid) {
306                         ret = -ENOMEM;
307                         goto out;
308                 }
309                 ret = uuid_parse(new_fsid, fs_info->new_fsid);
310                 if (ret < 0)
311                         goto out;
312         }
313
314         if (new_chunk_uuid) {
315                 /* allocated mem will be freed at close_ctree() */
316                 fs_info->new_chunk_tree_uuid = malloc(BTRFS_UUID_SIZE);
317                 if (!fs_info->new_chunk_tree_uuid) {
318                         ret = -ENOMEM;
319                         goto out;
320                 }
321                 ret = uuid_parse(new_chunk_uuid, fs_info->new_chunk_tree_uuid);
322                 if (ret < 0)
323                         goto out;
324         }
325
326         /* Now we can begin fsid change */
327         ret = change_fsid_prepare(fs_info);
328         if (ret < 0)
329                 goto out;
330
331         /* Change extents first */
332         ret = change_extents_uuid(fs_info);
333         if (ret < 0) {
334                 fprintf(stderr, "Failed to change UUID of metadata\n");
335                 goto out;
336         }
337
338         /* Then devices */
339         ret = change_devices_uuid(fs_info);
340         if (ret < 0) {
341                 fprintf(stderr, "Failed to change UUID of devices\n");
342                 goto out;
343         }
344
345         /* Last, change fsid in super, only fsid change needs this */
346         if (new_fsid) {
347                 memcpy(fs_info->fs_devices->fsid, fs_info->new_fsid,
348                        BTRFS_FSID_SIZE);
349                 memcpy(fs_info->super_copy->fsid, fs_info->new_fsid,
350                        BTRFS_FSID_SIZE);
351                 ret = write_all_supers(fs_info->tree_root);
352                 if (ret < 0)
353                         goto out;
354         }
355
356         /* Now fsid change is done */
357         ret = change_fsid_done(fs_info);
358 out:
359         return ret;
360 }
361
362 static void print_usage(void)
363 {
364         fprintf(stderr, "usage: btrfstune [options] device\n");
365         fprintf(stderr, "\t-S value\tpositive value will enable seeding, zero to disable, negative is not allowed\n");
366         fprintf(stderr, "\t-r \t\tenable extended inode refs\n");
367         fprintf(stderr, "\t-x \t\tenable skinny metadata extent refs\n");
368         fprintf(stderr, "\t-f \t\tforce to set or clear flags, make sure that you are aware of the dangers\n");
369 }
370
371 int main(int argc, char *argv[])
372 {
373         struct btrfs_root *root;
374         int success = 0;
375         int total = 0;
376         int extrefs_flag = 0;
377         int seeding_flag = 0;
378         u64 seeding_value = 0;
379         int skinny_flag = 0;
380         int ret;
381
382         optind = 1;
383         while(1) {
384                 int c = getopt(argc, argv, "S:rxf");
385                 if (c < 0)
386                         break;
387                 switch(c) {
388                 case 'S':
389                         seeding_flag = 1;
390                         seeding_value = arg_strtou64(optarg);
391                         break;
392                 case 'r':
393                         extrefs_flag = 1;
394                         break;
395                 case 'x':
396                         skinny_flag = 1;
397                         break;
398                 case 'f':
399                         force = 1;
400                         break;
401                 default:
402                         print_usage();
403                         return 1;
404                 }
405         }
406
407         set_argv0(argv);
408         argc = argc - optind;
409         device = argv[optind];
410         if (check_argc_exact(argc, 1)) {
411                 print_usage();
412                 return 1;
413         }
414
415         if (!(seeding_flag + extrefs_flag + skinny_flag)) {
416                 fprintf(stderr,
417                         "ERROR: At least one option should be assigned.\n");
418                 print_usage();
419                 return 1;
420         }
421
422         ret = check_mounted(device);
423         if (ret < 0) {
424                 fprintf(stderr, "Could not check mount status: %s\n",
425                         strerror(-ret));
426                 return 1;
427         } else if (ret) {
428                 fprintf(stderr, "%s is mounted\n", device);
429                 return 1;
430         }
431
432         root = open_ctree(device, 0, OPEN_CTREE_WRITES);
433
434         if (!root) {
435                 fprintf(stderr, "Open ctree failed\n");
436                 return 1;
437         }
438
439         if (seeding_flag) {
440                 if (!seeding_value && !force) {
441                         fprintf(stderr, "Warning: This is dangerous, clearing the seeding flag may cause the derived device not to be mountable!\n");
442                         ret = ask_user("We are going to clear the seeding flag, are you sure?");
443                         if (!ret) {
444                                 fprintf(stderr, "Clear seeding flag canceled\n");
445                                 return 1;
446                         }
447                 }
448
449                 ret = update_seeding_flag(root, seeding_value);
450                 if (!ret)
451                         success++;
452                 total++;
453         }
454
455         if (extrefs_flag) {
456                 enable_extrefs_flag(root);
457                 success++;
458                 total++;
459         }
460
461         if (skinny_flag) {
462                 enable_skinny_metadata(root);
463                 success++;
464                 total++;
465         }
466
467         if (success == total) {
468                 ret = 0;
469         } else {
470                 root->fs_info->readonly = 1;
471                 ret = 1;
472                 fprintf(stderr, "btrfstune failed\n");
473         }
474         close_ctree(root);
475
476         return ret;
477 }