btrfs-progs: fix double free during scanning
[platform/upstream/btrfs-progs.git] / cmds-filesystem.c
1 /*
2  * This program is free software; you can redistribute it and/or
3  * modify it under the terms of the GNU General Public
4  * License v2 as published by the Free Software Foundation.
5  *
6  * This program is distributed in the hope that it will be useful,
7  * but WITHOUT ANY WARRANTY; without even the implied warranty of
8  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
9  * General Public License for more details.
10  *
11  * You should have received a copy of the GNU General Public
12  * License along with this program; if not, write to the
13  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
14  * Boston, MA 021110-1307, USA.
15  */
16
17 #include <stdio.h>
18 #include <stdlib.h>
19 #include <string.h>
20 #include <unistd.h>
21 #include <sys/ioctl.h>
22 #include <errno.h>
23 #include <uuid/uuid.h>
24 #include <ctype.h>
25 #include <fcntl.h>
26 #include <ftw.h>
27 #include <mntent.h>
28 #include <linux/limits.h>
29 #include <getopt.h>
30
31 #include "kerncompat.h"
32 #include "ctree.h"
33 #include "ioctl.h"
34 #include "utils.h"
35 #include "volumes.h"
36 #include "commands.h"
37 #include "cmds-fi-usage.h"
38 #include "list_sort.h"
39 #include "disk-io.h"
40
41
42 /*
43  * for btrfs fi show, we maintain a hash of fsids we've already printed.
44  * This way we don't print dups if a given FS is mounted more than once.
45  */
46 #define SEEN_FSID_HASH_SIZE 256
47
48 struct seen_fsid {
49         u8 fsid[BTRFS_FSID_SIZE];
50         struct seen_fsid *next;
51 };
52
53 static struct seen_fsid *seen_fsid_hash[SEEN_FSID_HASH_SIZE] = {NULL,};
54
55 static int is_seen_fsid(u8 *fsid)
56 {
57         u8 hash = fsid[0];
58         int slot = hash % SEEN_FSID_HASH_SIZE;
59         struct seen_fsid *seen = seen_fsid_hash[slot];
60
61         return seen ? 1 : 0;
62 }
63
64 static int add_seen_fsid(u8 *fsid)
65 {
66         u8 hash = fsid[0];
67         int slot = hash % SEEN_FSID_HASH_SIZE;
68         struct seen_fsid *seen = seen_fsid_hash[slot];
69         struct seen_fsid *alloc;
70
71         if (!seen)
72                 goto insert;
73
74         while (1) {
75                 if (memcmp(seen->fsid, fsid, BTRFS_FSID_SIZE) == 0)
76                         return -EEXIST;
77
78                 if (!seen->next)
79                         break;
80
81                 seen = seen->next;
82         }
83
84 insert:
85
86         alloc = malloc(sizeof(*alloc));
87         if (!alloc)
88                 return -ENOMEM;
89
90         alloc->next = NULL;
91         memcpy(alloc->fsid, fsid, BTRFS_FSID_SIZE);
92
93         if (seen)
94                 seen->next = alloc;
95         else
96                 seen_fsid_hash[slot] = alloc;
97
98         return 0;
99 }
100
101 static void free_seen_fsid(void)
102 {
103         int slot;
104         struct seen_fsid *seen;
105         struct seen_fsid *next;
106
107         for (slot = 0; slot < SEEN_FSID_HASH_SIZE; slot++) {
108                 seen = seen_fsid_hash[slot];
109                 while (seen) {
110                         next = seen->next;
111                         free(seen);
112                         seen = next;
113                 }
114                 seen_fsid_hash[slot] = NULL;
115         }
116 }
117
118 static const char * const filesystem_cmd_group_usage[] = {
119         "btrfs filesystem [<group>] <command> [<args>]",
120         NULL
121 };
122
123 static const char * const cmd_filesystem_df_usage[] = {
124         "btrfs filesystem df [options] <path>",
125         "Show space usage information for a mount point",
126         HELPINFO_OUTPUT_UNIT_DF,
127         NULL
128 };
129
130 static int get_df(int fd, struct btrfs_ioctl_space_args **sargs_ret)
131 {
132         u64 count = 0;
133         int ret, e;
134         struct btrfs_ioctl_space_args *sargs;
135
136         sargs = malloc(sizeof(struct btrfs_ioctl_space_args));
137         if (!sargs)
138                 return -ENOMEM;
139
140         sargs->space_slots = 0;
141         sargs->total_spaces = 0;
142
143         ret = ioctl(fd, BTRFS_IOC_SPACE_INFO, sargs);
144         e = errno;
145         if (ret) {
146                 fprintf(stderr, "ERROR: couldn't get space info - %s\n",
147                         strerror(e));
148                 free(sargs);
149                 return -e;
150         }
151         /* This really should never happen */
152         if (!sargs->total_spaces) {
153                 free(sargs);
154                 return -ENOENT;
155         }
156         count = sargs->total_spaces;
157         free(sargs);
158
159         sargs = malloc(sizeof(struct btrfs_ioctl_space_args) +
160                         (count * sizeof(struct btrfs_ioctl_space_info)));
161         if (!sargs)
162                 return -ENOMEM;
163
164         sargs->space_slots = count;
165         sargs->total_spaces = 0;
166         ret = ioctl(fd, BTRFS_IOC_SPACE_INFO, sargs);
167         e = errno;
168         if (ret) {
169                 fprintf(stderr, "ERROR: get space info count %llu - %s\n",
170                                 count, strerror(e));
171                 free(sargs);
172                 return -e;
173         }
174         *sargs_ret = sargs;
175         return 0;
176 }
177
178 static void print_df(struct btrfs_ioctl_space_args *sargs, unsigned unit_mode)
179 {
180         u64 i;
181         struct btrfs_ioctl_space_info *sp = sargs->spaces;
182
183         for (i = 0; i < sargs->total_spaces; i++, sp++) {
184                 printf("%s, %s: total=%s, used=%s\n",
185                         btrfs_group_type_str(sp->flags),
186                         btrfs_group_profile_str(sp->flags),
187                         pretty_size_mode(sp->total_bytes, unit_mode),
188                         pretty_size_mode(sp->used_bytes, unit_mode));
189         }
190 }
191
192 static int cmd_filesystem_df(int argc, char **argv)
193 {
194         struct btrfs_ioctl_space_args *sargs = NULL;
195         int ret;
196         int fd;
197         char *path;
198         DIR *dirstream = NULL;
199         unsigned unit_mode;
200
201         unit_mode = get_unit_mode_from_arg(&argc, argv, 1);
202
203         if (argc != 2 || argv[1][0] == '-')
204                 usage(cmd_filesystem_df_usage);
205
206         path = argv[1];
207
208         fd = open_file_or_dir(path, &dirstream);
209         if (fd < 0) {
210                 fprintf(stderr, "ERROR: can't access '%s'\n", path);
211                 return 1;
212         }
213         ret = get_df(fd, &sargs);
214
215         if (ret == 0) {
216                 print_df(sargs, unit_mode);
217                 free(sargs);
218         } else {
219                 fprintf(stderr, "ERROR: get_df failed %s\n", strerror(-ret));
220         }
221
222         close_file_or_dir(fd, dirstream);
223         return !!ret;
224 }
225
226 static int match_search_item_kernel(__u8 *fsid, char *mnt, char *label,
227                                         char *search)
228 {
229         char uuidbuf[BTRFS_UUID_UNPARSED_SIZE];
230         int search_len = strlen(search);
231
232         search_len = min(search_len, BTRFS_UUID_UNPARSED_SIZE);
233         uuid_unparse(fsid, uuidbuf);
234         if (!strncmp(uuidbuf, search, search_len))
235                 return 1;
236
237         if (strlen(label) && strcmp(label, search) == 0)
238                 return 1;
239
240         if (strcmp(mnt, search) == 0)
241                 return 1;
242
243         return 0;
244 }
245
246 static int uuid_search(struct btrfs_fs_devices *fs_devices, char *search)
247 {
248         char uuidbuf[BTRFS_UUID_UNPARSED_SIZE];
249         struct list_head *cur;
250         struct btrfs_device *device;
251         int search_len = strlen(search);
252
253         search_len = min(search_len, BTRFS_UUID_UNPARSED_SIZE);
254         uuid_unparse(fs_devices->fsid, uuidbuf);
255         if (!strncmp(uuidbuf, search, search_len))
256                 return 1;
257
258         list_for_each(cur, &fs_devices->devices) {
259                 device = list_entry(cur, struct btrfs_device, dev_list);
260                 if ((device->label && strcmp(device->label, search) == 0) ||
261                     strcmp(device->name, search) == 0)
262                         return 1;
263         }
264         return 0;
265 }
266
267 /*
268  * Sort devices by devid, ascending
269  */
270 static int cmp_device_id(void *priv, struct list_head *a,
271                 struct list_head *b)
272 {
273         const struct btrfs_device *da = list_entry(a, struct btrfs_device,
274                         dev_list);
275         const struct btrfs_device *db = list_entry(b, struct btrfs_device,
276                         dev_list);
277
278         return da->devid < db->devid ? -1 :
279                 da->devid > db->devid ? 1 : 0;
280 }
281
282 static void splice_device_list(struct list_head *seed_devices,
283                                struct list_head *all_devices)
284 {
285         struct btrfs_device *in_all, *next_all;
286         struct btrfs_device *in_seed, *next_seed;
287
288         list_for_each_entry_safe(in_all, next_all, all_devices, dev_list) {
289                 list_for_each_entry_safe(in_seed, next_seed, seed_devices,
290                                                                 dev_list) {
291                         if (in_all->devid == in_seed->devid) {
292                                 /*
293                                  * When do dev replace in a sprout fs
294                                  * to a dev in its seed fs, the replacing
295                                  * dev will reside in the sprout fs and
296                                  * the replaced dev will still exist
297                                  * in the seed fs.
298                                  * So pick the latest one when showing
299                                  * the sprout fs.
300                                  */
301                                 if (in_all->generation
302                                                 < in_seed->generation) {
303                                         list_del(&in_all->dev_list);
304                                         free(in_all);
305                                 } else if (in_all->generation
306                                                 > in_seed->generation) {
307                                         list_del(&in_seed->dev_list);
308                                         free(in_seed);
309                                 }
310                                 break;
311                         }
312                 }
313         }
314
315         list_splice(seed_devices, all_devices);
316 }
317
318 static void print_devices(struct btrfs_fs_devices *fs_devices,
319                           u64 *devs_found, unsigned unit_mode)
320 {
321         struct btrfs_device *device;
322         struct btrfs_fs_devices *cur_fs;
323         struct list_head *all_devices;
324
325         all_devices = &fs_devices->devices;
326         cur_fs = fs_devices->seed;
327         /* add all devices of seed fs to the fs to be printed */
328         while (cur_fs) {
329                 splice_device_list(&cur_fs->devices, all_devices);
330                 cur_fs = cur_fs->seed;
331         }
332
333         list_sort(NULL, all_devices, cmp_device_id);
334         list_for_each_entry(device, all_devices, dev_list) {
335                 printf("\tdevid %4llu size %s used %s path %s\n",
336                        (unsigned long long)device->devid,
337                        pretty_size_mode(device->total_bytes, unit_mode),
338                        pretty_size_mode(device->bytes_used, unit_mode),
339                        device->name);
340
341                 (*devs_found)++;
342         }
343 }
344
345 static void print_one_uuid(struct btrfs_fs_devices *fs_devices,
346                            unsigned unit_mode)
347 {
348         char uuidbuf[BTRFS_UUID_UNPARSED_SIZE];
349         struct btrfs_device *device;
350         u64 devs_found = 0;
351         u64 total;
352
353         if (add_seen_fsid(fs_devices->fsid))
354                 return;
355
356         uuid_unparse(fs_devices->fsid, uuidbuf);
357         device = list_entry(fs_devices->devices.next, struct btrfs_device,
358                             dev_list);
359         if (device->label && device->label[0])
360                 printf("Label: '%s' ", device->label);
361         else
362                 printf("Label: none ");
363
364         total = device->total_devs;
365         printf(" uuid: %s\n\tTotal devices %llu FS bytes used %s\n", uuidbuf,
366                (unsigned long long)total,
367                pretty_size_mode(device->super_bytes_used, unit_mode));
368
369         print_devices(fs_devices, &devs_found, unit_mode);
370
371         if (devs_found < total) {
372                 printf("\t*** Some devices missing\n");
373         }
374         printf("\n");
375 }
376
377 /* adds up all the used spaces as reported by the space info ioctl
378  */
379 static u64 calc_used_bytes(struct btrfs_ioctl_space_args *si)
380 {
381         u64 ret = 0;
382         int i;
383         for (i = 0; i < si->total_spaces; i++)
384                 ret += si->spaces[i].used_bytes;
385         return ret;
386 }
387
388 static int print_one_fs(struct btrfs_ioctl_fs_info_args *fs_info,
389                 struct btrfs_ioctl_dev_info_args *dev_info,
390                 struct btrfs_ioctl_space_args *space_info,
391                 char *label, char *path, unsigned unit_mode)
392 {
393         int i;
394         int fd;
395         int missing = 0;
396         char uuidbuf[BTRFS_UUID_UNPARSED_SIZE];
397         struct btrfs_ioctl_dev_info_args *tmp_dev_info;
398         int ret;
399
400         ret = add_seen_fsid(fs_info->fsid);
401         if (ret == -EEXIST)
402                 return 0;
403         else if (ret)
404                 return ret;
405
406         uuid_unparse(fs_info->fsid, uuidbuf);
407         if (label && strlen(label))
408                 printf("Label: '%s' ", label);
409         else
410                 printf("Label: none ");
411
412         printf(" uuid: %s\n\tTotal devices %llu FS bytes used %s\n", uuidbuf,
413                         fs_info->num_devices,
414                         pretty_size_mode(calc_used_bytes(space_info),
415                                          unit_mode));
416
417         for (i = 0; i < fs_info->num_devices; i++) {
418                 char *canonical_path;
419
420                 tmp_dev_info = (struct btrfs_ioctl_dev_info_args *)&dev_info[i];
421
422                 /* Add check for missing devices even mounted */
423                 fd = open((char *)tmp_dev_info->path, O_RDONLY);
424                 if (fd < 0) {
425                         missing = 1;
426                         continue;
427                 }
428                 close(fd);
429                 canonical_path = canonicalize_path((char *)tmp_dev_info->path);
430                 printf("\tdevid %4llu size %s used %s path %s\n",
431                         tmp_dev_info->devid,
432                         pretty_size_mode(tmp_dev_info->total_bytes, unit_mode),
433                         pretty_size_mode(tmp_dev_info->bytes_used, unit_mode),
434                         canonical_path);
435
436                 free(canonical_path);
437         }
438
439         if (missing)
440                 printf("\t*** Some devices missing\n");
441         printf("\n");
442         return 0;
443 }
444
445 static int btrfs_scan_kernel(void *search, unsigned unit_mode)
446 {
447         int ret = 0, fd;
448         int found = 0;
449         FILE *f;
450         struct mntent *mnt;
451         struct btrfs_ioctl_fs_info_args fs_info_arg;
452         struct btrfs_ioctl_dev_info_args *dev_info_arg = NULL;
453         struct btrfs_ioctl_space_args *space_info_arg = NULL;
454         char label[BTRFS_LABEL_SIZE];
455
456         f = setmntent("/proc/self/mounts", "r");
457         if (f == NULL)
458                 return 1;
459
460         memset(label, 0, sizeof(label));
461         while ((mnt = getmntent(f)) != NULL) {
462                 if (strcmp(mnt->mnt_type, "btrfs"))
463                         continue;
464                 ret = get_fs_info(mnt->mnt_dir, &fs_info_arg,
465                                 &dev_info_arg);
466                 if (ret) {
467                         kfree(dev_info_arg);
468                         goto out;
469                 }
470
471                 ret = get_label_mounted(mnt->mnt_dir, label);
472                 /* provide backward kernel compatibility */
473                 if (ret == -ENOTTY)
474                         ret = get_label_unmounted(
475                                 (const char *)dev_info_arg->path, label);
476
477                 if (ret) {
478                         kfree(dev_info_arg);
479                         goto out;
480                 }
481                 if (search && !match_search_item_kernel(fs_info_arg.fsid,
482                                         mnt->mnt_dir, label, search)) {
483                         kfree(dev_info_arg);
484                         dev_info_arg = NULL;
485                         continue;
486                 }
487
488                 fd = open(mnt->mnt_dir, O_RDONLY);
489                 if ((fd != -1) && !get_df(fd, &space_info_arg)) {
490                         print_one_fs(&fs_info_arg, dev_info_arg,
491                                      space_info_arg, label, mnt->mnt_dir,
492                                      unit_mode);
493                         kfree(space_info_arg);
494                         memset(label, 0, sizeof(label));
495                         found = 1;
496                 }
497                 if (fd != -1)
498                         close(fd);
499                 kfree(dev_info_arg);
500                 dev_info_arg = NULL;
501         }
502
503 out:
504         endmntent(f);
505         return !found;
506 }
507
508 static int dev_to_fsid(char *dev, __u8 *fsid)
509 {
510         struct btrfs_super_block *disk_super;
511         char *buf;
512         int ret;
513         int fd;
514
515         buf = malloc(4096);
516         if (!buf)
517                 return -ENOMEM;
518
519         fd = open(dev, O_RDONLY);
520         if (fd < 0) {
521                 ret = -errno;
522                 free(buf);
523                 return ret;
524         }
525
526         disk_super = (struct btrfs_super_block *)buf;
527         ret = btrfs_read_dev_super(fd, disk_super,
528                                    BTRFS_SUPER_INFO_OFFSET, 0);
529         if (ret)
530                 goto out;
531
532         memcpy(fsid, disk_super->fsid, BTRFS_FSID_SIZE);
533         ret = 0;
534
535 out:
536         close(fd);
537         free(buf);
538         return ret;
539 }
540
541 static void free_fs_devices(struct btrfs_fs_devices *fs_devices)
542 {
543         struct btrfs_fs_devices *cur_seed, *next_seed;
544         struct btrfs_device *device;
545
546         while (!list_empty(&fs_devices->devices)) {
547                 device = list_entry(fs_devices->devices.next,
548                                         struct btrfs_device, dev_list);
549                 list_del(&device->dev_list);
550
551                 free(device->name);
552                 free(device->label);
553                 free(device);
554         }
555
556         /* free seed fs chain */
557         cur_seed = fs_devices->seed;
558         fs_devices->seed = NULL;
559         while (cur_seed) {
560                 next_seed = cur_seed->seed;
561                 free(cur_seed);
562
563                 cur_seed = next_seed;
564         }
565
566         list_del(&fs_devices->list);
567         free(fs_devices);
568 }
569
570 static int copy_device(struct btrfs_device *dst,
571                        struct btrfs_device *src)
572 {
573         dst->devid = src->devid;
574         memcpy(dst->uuid, src->uuid, BTRFS_UUID_SIZE);
575         if (src->name == NULL)
576                 dst->name = NULL;
577         else {
578                 dst->name = strdup(src->name);
579                 if (!dst->name)
580                         return -ENOMEM;
581         }
582         if (src->label == NULL)
583                 dst->label = NULL;
584         else {
585                 dst->label = strdup(src->label);
586                 if (!dst->label) {
587                         free(dst->name);
588                         return -ENOMEM;
589                 }
590         }
591         dst->total_devs = src->total_devs;
592         dst->super_bytes_used = src->super_bytes_used;
593         dst->total_bytes = src->total_bytes;
594         dst->bytes_used = src->bytes_used;
595         dst->generation = src->generation;
596
597         return 0;
598 }
599
600 static int copy_fs_devices(struct btrfs_fs_devices *dst,
601                            struct btrfs_fs_devices *src)
602 {
603         struct btrfs_device *cur_dev, *dev_copy;
604         int ret = 0;
605
606         memcpy(dst->fsid, src->fsid, BTRFS_FSID_SIZE);
607         INIT_LIST_HEAD(&dst->devices);
608         dst->seed = NULL;
609
610         list_for_each_entry(cur_dev, &src->devices, dev_list) {
611                 dev_copy = malloc(sizeof(*dev_copy));
612                 if (!dev_copy) {
613                         ret = -ENOMEM;
614                         break;
615                 }
616
617                 ret = copy_device(dev_copy, cur_dev);
618                 if (ret) {
619                         free(dev_copy);
620                         break;
621                 }
622
623                 list_add(&dev_copy->dev_list, &dst->devices);
624                 dev_copy->fs_devices = dst;
625         }
626
627         return ret;
628 }
629
630 static int find_and_copy_seed(struct btrfs_fs_devices *seed,
631                               struct btrfs_fs_devices *copy,
632                               struct list_head *fs_uuids) {
633         struct btrfs_fs_devices *cur_fs;
634
635         list_for_each_entry(cur_fs, fs_uuids, list)
636                 if (!memcmp(seed->fsid, cur_fs->fsid, BTRFS_FSID_SIZE))
637                         return copy_fs_devices(copy, cur_fs);
638
639         return 1;
640 }
641
642 static int has_seed_devices(struct btrfs_fs_devices *fs_devices)
643 {
644         struct btrfs_device *device;
645         int dev_cnt_total, dev_cnt = 0;
646
647         device = list_first_entry(&fs_devices->devices, struct btrfs_device,
648                                   dev_list);
649
650         dev_cnt_total = device->total_devs;
651
652         list_for_each_entry(device, &fs_devices->devices, dev_list)
653                 dev_cnt++;
654
655         return dev_cnt_total != dev_cnt;
656 }
657
658 static int search_umounted_fs_uuids(struct list_head *all_uuids,
659                                     char *search, int *found)
660 {
661         struct btrfs_fs_devices *cur_fs, *fs_copy;
662         struct list_head *fs_uuids;
663         int ret = 0;
664
665         fs_uuids = btrfs_scanned_uuids();
666
667         /*
668          * The fs_uuids list is global, and open_ctree_* will
669          * modify it, make a private copy here
670          */
671         list_for_each_entry(cur_fs, fs_uuids, list) {
672                 /* don't bother handle all fs, if search target specified */
673                 if (search) {
674                         if (uuid_search(cur_fs, search) == 0)
675                                 continue;
676                         if (found)
677                                 *found = 1;
678                 }
679
680                 /* skip all fs already shown as mounted fs */
681                 if (is_seen_fsid(cur_fs->fsid))
682                         continue;
683
684                 fs_copy = malloc(sizeof(*fs_copy));
685                 if (!fs_copy) {
686                         ret = -ENOMEM;
687                         goto out;
688                 }
689
690                 ret = copy_fs_devices(fs_copy, cur_fs);
691                 if (ret) {
692                         free(fs_copy);
693                         goto out;
694                 }
695
696                 list_add(&fs_copy->list, all_uuids);
697         }
698
699 out:
700         return ret;
701 }
702
703 static int map_seed_devices(struct list_head *all_uuids)
704 {
705         struct btrfs_fs_devices *cur_fs, *cur_seed;
706         struct btrfs_fs_devices *seed_copy;
707         struct btrfs_fs_devices *opened_fs;
708         struct btrfs_device *device;
709         struct btrfs_fs_info *fs_info;
710         struct list_head *fs_uuids;
711         int ret = 0;
712
713         fs_uuids = btrfs_scanned_uuids();
714
715         list_for_each_entry(cur_fs, all_uuids, list) {
716                 device = list_first_entry(&cur_fs->devices,
717                                                 struct btrfs_device, dev_list);
718                 if (!device)
719                         continue;
720
721                 /* skip fs without seeds */
722                 if (!has_seed_devices(cur_fs))
723                         continue;
724
725                 /*
726                  * open_ctree_* detects seed/sprout mapping
727                  */
728                 fs_info = open_ctree_fs_info(device->name, 0, 0,
729                                                 OPEN_CTREE_PARTIAL);
730                 if (!fs_info)
731                         continue;
732
733                 /*
734                  * copy the seed chain under the opened fs
735                  */
736                 opened_fs = fs_info->fs_devices;
737                 cur_seed = cur_fs;
738                 while (opened_fs->seed) {
739                         seed_copy = malloc(sizeof(*seed_copy));
740                         if (!seed_copy) {
741                                 ret = -ENOMEM;
742                                 goto fail_out;
743                         }
744                         ret = find_and_copy_seed(opened_fs->seed, seed_copy,
745                                                  fs_uuids);
746                         if (ret) {
747                                 free(seed_copy);
748                                 goto fail_out;
749                         }
750
751                         cur_seed->seed = seed_copy;
752
753                         opened_fs = opened_fs->seed;
754                         cur_seed = cur_seed->seed;
755                 }
756
757                 close_ctree(fs_info->chunk_root);
758         }
759
760 out:
761         return ret;
762 fail_out:
763         close_ctree(fs_info->chunk_root);
764         goto out;
765 }
766
767 static const char * const cmd_filesystem_show_usage[] = {
768         "btrfs filesystem show [options] [<path>|<uuid>|<device>|label]",
769         "Show the structure of a filesystem",
770         "-d|--all-devices   show only disks under /dev containing btrfs filesystem",
771         "-m|--mounted       show only mounted btrfs",
772         HELPINFO_OUTPUT_UNIT,
773         "If no argument is given, structure of all present filesystems is shown.",
774         NULL
775 };
776
777 static int cmd_filesystem_show(int argc, char **argv)
778 {
779         LIST_HEAD(all_uuids);
780         struct btrfs_fs_devices *fs_devices;
781         char *search = NULL;
782         int ret;
783         /* default, search both kernel and udev */
784         int where = -1;
785         int type = 0;
786         char mp[PATH_MAX];
787         char path[PATH_MAX];
788         __u8 fsid[BTRFS_FSID_SIZE];
789         char uuid_buf[BTRFS_UUID_UNPARSED_SIZE];
790         unsigned unit_mode;
791         int found = 0;
792
793         unit_mode = get_unit_mode_from_arg(&argc, argv, 0);
794
795         while (1) {
796                 int c;
797                 static const struct option long_options[] = {
798                         { "all-devices", no_argument, NULL, 'd'},
799                         { "mounted", no_argument, NULL, 'm'},
800                         { NULL, 0, NULL, 0 }
801                 };
802
803                 c = getopt_long(argc, argv, "dm", long_options, NULL);
804                 if (c < 0)
805                         break;
806                 switch (c) {
807                 case 'd':
808                         where = BTRFS_SCAN_LBLKID;
809                         break;
810                 case 'm':
811                         where = BTRFS_SCAN_MOUNTED;
812                         break;
813                 default:
814                         usage(cmd_filesystem_show_usage);
815                 }
816         }
817
818         if (check_argc_max(argc, optind + 1))
819                 usage(cmd_filesystem_show_usage);
820
821         if (argc > optind) {
822                 search = argv[optind];
823                 if (strlen(search) == 0)
824                         usage(cmd_filesystem_show_usage);
825                 type = check_arg_type(search);
826
827                 /*
828                  * For search is a device:
829                  *     realpath do /dev/mapper/XX => /dev/dm-X
830                  *     which is required by BTRFS_SCAN_DEV
831                  * For search is a mountpoint:
832                  *     realpath do  /mnt/btrfs/  => /mnt/btrfs
833                  *     which shall be recognized by btrfs_scan_kernel()
834                  */
835                 if (realpath(search, path))
836                         search = path;
837
838                 /*
839                  * Needs special handling if input arg is block dev And if
840                  * input arg is mount-point just print it right away
841                  */
842                 if (type == BTRFS_ARG_BLKDEV && where != BTRFS_SCAN_LBLKID) {
843                         ret = get_btrfs_mount(search, mp, sizeof(mp));
844                         if (!ret) {
845                                 /* given block dev is mounted */
846                                 search = mp;
847                                 type = BTRFS_ARG_MNTPOINT;
848                         } else {
849                                 ret = dev_to_fsid(search, fsid);
850                                 if (ret) {
851                                         fprintf(stderr,
852                                                 "ERROR: No btrfs on %s\n",
853                                                 search);
854                                         return 1;
855                                 }
856                                 uuid_unparse(fsid, uuid_buf);
857                                 search = uuid_buf;
858                                 type = BTRFS_ARG_UUID;
859                                 goto devs_only;
860                         }
861                 }
862         }
863
864         if (where == BTRFS_SCAN_LBLKID)
865                 goto devs_only;
866
867         /* show mounted btrfs */
868         ret = btrfs_scan_kernel(search, unit_mode);
869         if (search && !ret) {
870                 /* since search is found we are done */
871                 goto out;
872         }
873
874         /* shows mounted only */
875         if (where == BTRFS_SCAN_MOUNTED)
876                 goto out;
877
878 devs_only:
879         ret = btrfs_scan_lblkid();
880
881         if (ret) {
882                 fprintf(stderr, "ERROR: %d while scanning\n", ret);
883                 return 1;
884         }
885
886         ret = search_umounted_fs_uuids(&all_uuids, search, &found);
887         if (ret < 0) {
888                 fprintf(stderr,
889                         "ERROR: %d while searching target device\n", ret);
890                 return 1;
891         }
892
893         /*
894          * The seed/sprout mapping are not detected yet,
895          * do mapping build for all umounted fs
896          */
897         ret = map_seed_devices(&all_uuids);
898         if (ret) {
899                 fprintf(stderr,
900                         "ERROR: %d while mapping seed devices\n", ret);
901                 return 1;
902         }
903
904         list_for_each_entry(fs_devices, &all_uuids, list)
905                 print_one_uuid(fs_devices, unit_mode);
906
907         if (search && !found)
908                 ret = 1;
909
910         while (!list_empty(&all_uuids)) {
911                 fs_devices = list_entry(all_uuids.next,
912                                         struct btrfs_fs_devices, list);
913                 free_fs_devices(fs_devices);
914         }
915 out:
916         printf("%s\n", PACKAGE_STRING);
917         free_seen_fsid();
918         return ret;
919 }
920
921 static const char * const cmd_filesystem_sync_usage[] = {
922         "btrfs filesystem sync <path>",
923         "Force a sync on a filesystem",
924         NULL
925 };
926
927 static int cmd_filesystem_sync(int argc, char **argv)
928 {
929         int     fd, res, e;
930         char    *path;
931         DIR     *dirstream = NULL;
932
933         if (check_argc_exact(argc, 2))
934                 usage(cmd_filesystem_sync_usage);
935
936         path = argv[1];
937
938         fd = open_file_or_dir(path, &dirstream);
939         if (fd < 0) {
940                 fprintf(stderr, "ERROR: can't access '%s'\n", path);
941                 return 1;
942         }
943
944         printf("FSSync '%s'\n", path);
945         res = ioctl(fd, BTRFS_IOC_SYNC);
946         e = errno;
947         close_file_or_dir(fd, dirstream);
948         if( res < 0 ){
949                 fprintf(stderr, "ERROR: unable to fs-syncing '%s' - %s\n", 
950                         path, strerror(e));
951                 return 1;
952         }
953
954         return 0;
955 }
956
957 static int parse_compress_type(char *s)
958 {
959         if (strcmp(optarg, "zlib") == 0)
960                 return BTRFS_COMPRESS_ZLIB;
961         else if (strcmp(optarg, "lzo") == 0)
962                 return BTRFS_COMPRESS_LZO;
963         else {
964                 fprintf(stderr, "Unknown compress type %s\n", s);
965                 exit(1);
966         };
967 }
968
969 static const char * const cmd_filesystem_defrag_usage[] = {
970         "btrfs filesystem defragment [options] <file>|<dir> [<file>|<dir>...]",
971         "Defragment a file or a directory",
972         "",
973         "-v             be verbose",
974         "-r             defragment files recursively",
975         "-c[zlib,lzo]   compress the file while defragmenting",
976         "-f             flush data to disk immediately after defragmenting",
977         "-s start       defragment only from byte onward",
978         "-l len         defragment only up to len bytes",
979         "-t size        target extent size hint",
980         NULL
981 };
982
983 static int do_defrag(int fd, int fancy_ioctl,
984                 struct btrfs_ioctl_defrag_range_args *range)
985 {
986         int ret;
987
988         if (!fancy_ioctl)
989                 ret = ioctl(fd, BTRFS_IOC_DEFRAG, NULL);
990         else
991                 ret = ioctl(fd, BTRFS_IOC_DEFRAG_RANGE, range);
992
993         return ret;
994 }
995
996 static int defrag_global_fancy_ioctl;
997 static struct btrfs_ioctl_defrag_range_args defrag_global_range;
998 static int defrag_global_verbose;
999 static int defrag_global_errors;
1000 static int defrag_callback(const char *fpath, const struct stat *sb,
1001                 int typeflag, struct FTW *ftwbuf)
1002 {
1003         int ret = 0;
1004         int e = 0;
1005         int fd = 0;
1006
1007         if ((typeflag == FTW_F) && S_ISREG(sb->st_mode)) {
1008                 if (defrag_global_verbose)
1009                         printf("%s\n", fpath);
1010                 fd = open(fpath, O_RDWR);
1011                 e = errno;
1012                 if (fd < 0)
1013                         goto error;
1014                 ret = do_defrag(fd, defrag_global_fancy_ioctl, &defrag_global_range);
1015                 e = errno;
1016                 close(fd);
1017                 if (ret && e == ENOTTY && defrag_global_fancy_ioctl) {
1018                         fprintf(stderr, "ERROR: defrag range ioctl not "
1019                                 "supported in this kernel, please try "
1020                                 "without any options.\n");
1021                         defrag_global_errors++;
1022                         return ENOTTY;
1023                 }
1024                 if (ret)
1025                         goto error;
1026         }
1027         return 0;
1028
1029 error:
1030         fprintf(stderr, "ERROR: defrag failed on %s - %s\n", fpath, strerror(e));
1031         defrag_global_errors++;
1032         return 0;
1033 }
1034
1035 static int cmd_filesystem_defrag(int argc, char **argv)
1036 {
1037         int fd;
1038         int flush = 0;
1039         u64 start = 0;
1040         u64 len = (u64)-1;
1041         u64 thresh = 0;
1042         int i;
1043         int recursive = 0;
1044         int ret = 0;
1045         int e = 0;
1046         int compress_type = BTRFS_COMPRESS_NONE;
1047         DIR *dirstream;
1048
1049         defrag_global_errors = 0;
1050         defrag_global_verbose = 0;
1051         defrag_global_errors = 0;
1052         defrag_global_fancy_ioctl = 0;
1053         optind = 1;
1054         while(1) {
1055                 int c = getopt(argc, argv, "vrc::fs:l:t:");
1056                 if (c < 0)
1057                         break;
1058
1059                 switch(c) {
1060                 case 'c':
1061                         compress_type = BTRFS_COMPRESS_ZLIB;
1062                         if (optarg)
1063                                 compress_type = parse_compress_type(optarg);
1064                         defrag_global_fancy_ioctl = 1;
1065                         break;
1066                 case 'f':
1067                         flush = 1;
1068                         defrag_global_fancy_ioctl = 1;
1069                         break;
1070                 case 'v':
1071                         defrag_global_verbose = 1;
1072                         break;
1073                 case 's':
1074                         start = parse_size(optarg);
1075                         defrag_global_fancy_ioctl = 1;
1076                         break;
1077                 case 'l':
1078                         len = parse_size(optarg);
1079                         defrag_global_fancy_ioctl = 1;
1080                         break;
1081                 case 't':
1082                         thresh = parse_size(optarg);
1083                         if (thresh > (u32)-1) {
1084                                 fprintf(stderr,
1085                         "WARNING: target extent size %llu too big, trimmed to %u\n",
1086                                         thresh, (u32)-1);
1087                                 thresh = (u32)-1;
1088                         }
1089                         defrag_global_fancy_ioctl = 1;
1090                         break;
1091                 case 'r':
1092                         recursive = 1;
1093                         break;
1094                 default:
1095                         usage(cmd_filesystem_defrag_usage);
1096                 }
1097         }
1098
1099         if (check_argc_min(argc - optind, 1))
1100                 usage(cmd_filesystem_defrag_usage);
1101
1102         memset(&defrag_global_range, 0, sizeof(defrag_global_range));
1103         defrag_global_range.start = start;
1104         defrag_global_range.len = len;
1105         defrag_global_range.extent_thresh = (u32)thresh;
1106         if (compress_type) {
1107                 defrag_global_range.flags |= BTRFS_DEFRAG_RANGE_COMPRESS;
1108                 defrag_global_range.compress_type = compress_type;
1109         }
1110         if (flush)
1111                 defrag_global_range.flags |= BTRFS_DEFRAG_RANGE_START_IO;
1112
1113         for (i = optind; i < argc; i++) {
1114                 struct stat st;
1115
1116                 dirstream = NULL;
1117                 fd = open_file_or_dir(argv[i], &dirstream);
1118                 if (fd < 0) {
1119                         fprintf(stderr, "ERROR: failed to open %s - %s\n", argv[i],
1120                                         strerror(errno));
1121                         defrag_global_errors++;
1122                         close_file_or_dir(fd, dirstream);
1123                         continue;
1124                 }
1125                 if (fstat(fd, &st)) {
1126                         fprintf(stderr, "ERROR: failed to stat %s - %s\n",
1127                                         argv[i], strerror(errno));
1128                         defrag_global_errors++;
1129                         close_file_or_dir(fd, dirstream);
1130                         continue;
1131                 }
1132                 if (!(S_ISDIR(st.st_mode) || S_ISREG(st.st_mode))) {
1133                         fprintf(stderr,
1134                             "ERROR: %s is not a directory or a regular file\n",
1135                             argv[i]);
1136                         defrag_global_errors++;
1137                         close_file_or_dir(fd, dirstream);
1138                         continue;
1139                 }
1140                 if (recursive) {
1141                         if (S_ISDIR(st.st_mode)) {
1142                                 ret = nftw(argv[i], defrag_callback, 10,
1143                                                 FTW_MOUNT | FTW_PHYS);
1144                                 if (ret == ENOTTY)
1145                                         exit(1);
1146                                 /* errors are handled in the callback */
1147                                 ret = 0;
1148                         } else {
1149                                 if (defrag_global_verbose)
1150                                         printf("%s\n", argv[i]);
1151                                 ret = do_defrag(fd, defrag_global_fancy_ioctl,
1152                                                 &defrag_global_range);
1153                                 e = errno;
1154                         }
1155                 } else {
1156                         if (defrag_global_verbose)
1157                                 printf("%s\n", argv[i]);
1158                         ret = do_defrag(fd, defrag_global_fancy_ioctl,
1159                                         &defrag_global_range);
1160                         e = errno;
1161                 }
1162                 close_file_or_dir(fd, dirstream);
1163                 if (ret && e == ENOTTY && defrag_global_fancy_ioctl) {
1164                         fprintf(stderr, "ERROR: defrag range ioctl not "
1165                                 "supported in this kernel, please try "
1166                                 "without any options.\n");
1167                         defrag_global_errors++;
1168                         break;
1169                 }
1170                 if (ret) {
1171                         fprintf(stderr, "ERROR: defrag failed on %s - %s\n",
1172                                 argv[i], strerror(e));
1173                         defrag_global_errors++;
1174                 }
1175         }
1176         if (defrag_global_verbose)
1177                 printf("%s\n", PACKAGE_STRING);
1178         if (defrag_global_errors)
1179                 fprintf(stderr, "total %d failures\n", defrag_global_errors);
1180
1181         return !!defrag_global_errors;
1182 }
1183
1184 static const char * const cmd_filesystem_resize_usage[] = {
1185         "btrfs filesystem resize [devid:][+/-]<newsize>[kKmMgGtTpPeE]|[devid:]max <path>",
1186         "Resize a filesystem",
1187         "If 'max' is passed, the filesystem will occupy all available space",
1188         "on the device 'devid'.",
1189         "[kK] means KiB, which denotes 1KiB = 1024B, 1MiB = 1024KiB, etc.",
1190         NULL
1191 };
1192
1193 static int cmd_filesystem_resize(int argc, char **argv)
1194 {
1195         struct btrfs_ioctl_vol_args     args;
1196         int     fd, res, len, e;
1197         char    *amount, *path;
1198         DIR     *dirstream = NULL;
1199         struct stat st;
1200
1201         if (check_argc_exact(argc, 3))
1202                 usage(cmd_filesystem_resize_usage);
1203
1204         amount = argv[1];
1205         path = argv[2];
1206
1207         len = strlen(amount);
1208         if (len == 0 || len >= BTRFS_VOL_NAME_MAX) {
1209                 fprintf(stderr, "ERROR: size value too long ('%s)\n",
1210                         amount);
1211                 return 1;
1212         }
1213
1214         res = stat(path, &st);
1215         if (res < 0) {
1216                 fprintf(stderr, "ERROR: resize: cannot stat %s: %s\n",
1217                                 path, strerror(errno));
1218                 return 1;
1219         }
1220         if (!S_ISDIR(st.st_mode)) {
1221                 fprintf(stderr,
1222                         "ERROR: resize works on mounted filesystems and accepts only\n"
1223                         "directories as argument. Passing file containing a btrfs image\n"
1224                         "would resize the underlying filesystem instead of the image.\n");
1225                 return 1;
1226         }
1227
1228         fd = open_file_or_dir(path, &dirstream);
1229         if (fd < 0) {
1230                 fprintf(stderr, "ERROR: can't access '%s'\n", path);
1231                 return 1;
1232         }
1233
1234         printf("Resize '%s' of '%s'\n", path, amount);
1235         memset(&args, 0, sizeof(args));
1236         strncpy_null(args.name, amount);
1237         res = ioctl(fd, BTRFS_IOC_RESIZE, &args);
1238         e = errno;
1239         close_file_or_dir(fd, dirstream);
1240         if( res < 0 ){
1241                 switch (e) {
1242                 case EFBIG:
1243                         fprintf(stderr, "ERROR: unable to resize '%s' - no enouth free space\n",
1244                                 path);
1245                         break;
1246                 default:
1247                         fprintf(stderr, "ERROR: unable to resize '%s' - %s\n",
1248                                 path, strerror(e));
1249                         break;
1250                 }
1251                 return 1;
1252         } else if (res > 0) {
1253                 const char *err_str = btrfs_err_str(res);
1254
1255                 if (err_str) {
1256                         fprintf(stderr, "ERROR: btrfs error resizing '%s' - %s\n",
1257                                 path, err_str);
1258                 } else {
1259                         fprintf(stderr,
1260                         "ERROR: btrfs error resizing '%s' - unknown btrfs_err_code %d\n",
1261                                 path, res);
1262                 }
1263                 return 1;
1264         }
1265         return 0;
1266 }
1267
1268 static const char * const cmd_filesystem_label_usage[] = {
1269         "btrfs filesystem label [<device>|<mount_point>] [<newlabel>]",
1270         "Get or change the label of a filesystem",
1271         "With one argument, get the label of filesystem on <device>.",
1272         "If <newlabel> is passed, set the filesystem label to <newlabel>.",
1273         NULL
1274 };
1275
1276 static int cmd_filesystem_label(int argc, char **argv)
1277 {
1278         if (check_argc_min(argc, 2) || check_argc_max(argc, 3))
1279                 usage(cmd_filesystem_label_usage);
1280
1281         if (argc > 2) {
1282                 return set_label(argv[1], argv[2]);
1283         } else {
1284                 char label[BTRFS_LABEL_SIZE];
1285                 int ret;
1286
1287                 ret = get_label(argv[1], label);
1288                 if (!ret)
1289                         fprintf(stdout, "%s\n", label);
1290
1291                 return ret;
1292         }
1293 }
1294
1295 static const char filesystem_cmd_group_info[] =
1296 "overall filesystem tasks and information";
1297
1298 const struct cmd_group filesystem_cmd_group = {
1299         filesystem_cmd_group_usage, filesystem_cmd_group_info, {
1300                 { "df", cmd_filesystem_df, cmd_filesystem_df_usage, NULL, 0 },
1301                 { "show", cmd_filesystem_show, cmd_filesystem_show_usage, NULL,
1302                         0 },
1303                 { "sync", cmd_filesystem_sync, cmd_filesystem_sync_usage, NULL,
1304                         0 },
1305                 { "defragment", cmd_filesystem_defrag,
1306                         cmd_filesystem_defrag_usage, NULL, 0 },
1307                 { "balance", cmd_balance, NULL, &balance_cmd_group,
1308                         CMD_HIDDEN },
1309                 { "resize", cmd_filesystem_resize, cmd_filesystem_resize_usage,
1310                         NULL, 0 },
1311                 { "label", cmd_filesystem_label, cmd_filesystem_label_usage,
1312                         NULL, 0 },
1313                 { "usage", cmd_filesystem_usage,
1314                         cmd_filesystem_usage_usage, NULL, 0 },
1315
1316                 NULL_CMD_STRUCT
1317         }
1318 };
1319
1320 int cmd_filesystem(int argc, char **argv)
1321 {
1322         return handle_command_group(&filesystem_cmd_group, argc, argv);
1323 }