source: MondoRescue/branches/2.2.9/mondo/src/common/libmondo-mountlist.c @ 2236

Last change on this file since 2236 was 2236, checked in by Bruno Cornec, 12 years ago
  • Still trying to fix issue with mountlist analysis at restore time
  • Property svn:keywords set to Id
File size: 29.7 KB
Line 
1/* subroutines for handling mountlist
2   $Id: libmondo-mountlist.c 2236 2009-06-19 17:53:17Z bruno $
3*/
4
5
6/**
7 * @file
8 * Functions which manipulate the mountlist.
9 */
10
11#include "my-stuff.h"
12#include "mr_mem.h"
13#include "mondostructures.h"
14#include "libmondo-mountlist.h"
15#include "lib-common-externs.h"
16#include "libmondo-raid-EXT.h"
17#include "libmondo-devices-EXT.h"
18#include "libmondo-tools-EXT.h"
19#include "libmondo-string-EXT.h"
20#include "newt-specific-EXT.h"
21
22/*@unused@*/
23//static char cvsid[] = "$Id: libmondo-mountlist.c 2236 2009-06-19 17:53:17Z bruno $";
24
25/* Reference to global bkpinfo */
26extern struct s_bkpinfo *bkpinfo;
27
28/**
29 * @addtogroup mountlistGroup
30 * @{
31 */
32/**
33 * Evaluate a drive within the mountlist for flaws. For example, too many
34 * primary partitions, the first logical isn't 5, duplicate partitions,
35 * ovar-allocated or under-allocated, unsupported format, silly size, or
36 * silly mountpoint. Under FreeBSD, this checks the disklabel too, for the above-mentioned
37 * errors as well as too many BSD partitions (more than 'h').
38 * @param mountlist The mountlist to check.
39 * @param drive The drive to check (e.g. @c /dev/hda).
40 * @return The flaws string found (NULL for success) allocated to be freed
41 * @see evaluate_mountlist
42 */
43char *evaluate_drive_within_mountlist(struct mountlist_itself *mountlist, char *drive)
44#ifdef __FreeBSD__
45{
46// FreeBSD-specific version of evaluate_drive_within_mountlist()
47    /*@ int ************************************************************* */
48    int prev_part_no = 0;
49    int curr_part_no = 0;
50    int pos = 0, npos = 0;
51    int res = 0;
52    int mountpoint_copies = 0;
53    int device_copies = 0;
54    int i = 0;
55    int cur_sp_no = 0;
56    int prev_sp_no = 0;
57    int foundsome = FALSE;
58
59    /*@ buffers ******************************************************** */
60    char tmp[MAX_STR_LEN];
61    char device[MAX_STR_LEN];
62    char mountpoint[MAX_STR_LEN];
63
64    char *flaws_str = NULL;
65
66    /*@ long *********************************************************** */
67    long physical_drive_size = 0;
68    long amount_allocated = 0;
69
70    /*@ pointers ******************************************************* */
71    char *part_table_fmt;
72
73    /*@ initialize ***************************************************** */
74    prev_part_no = 0;
75    tmp[0] = '\0';
76    mr_asprintf(&flaws_str, "%s", "");
77
78
79    physical_drive_size = get_phys_size_of_drive(drive);
80
81    if (physical_drive_size < 0) {
82        sprintf(tmp, " %s does not exist.", drive);
83        mr_strcat(flaws_str, "%s", tmp);
84    } else {
85        sprintf(tmp, "%s is %ld MB", drive, physical_drive_size);
86    }
87    log_it(tmp);
88
89
90    /* check DD */
91    for (cur_sp_no = 'a'; cur_sp_no < 'z'; ++cur_sp_no) {
92        sprintf(device, "%s%c", drive, cur_sp_no);
93        if (find_device_in_mountlist(mountlist, device) >= 0)
94            foundsome = TRUE;
95    }
96    if (foundsome) {
97        for (cur_sp_no = 'a'; cur_sp_no < 'z'; ++cur_sp_no) {
98            sprintf(device, "%s%c", drive, cur_sp_no);
99            pos = find_device_in_mountlist(mountlist, device);
100            if (pos < 0) {
101                continue;
102            }
103            strcpy(mountpoint, mountlist->el[pos].mountpoint);
104            /* is it too big? */
105            if (curr_part_no > 'h') {
106                sprintf(tmp, " Can only have up to 'h' in disklabel.");
107                log_it(tmp);
108                mr_strcat(flaws_str, tmp);
109                res++;
110            }
111            /* does partition /dev/adXsYZ exist more than once in the mountlist? */
112            for (i = 0, mountpoint_copies = 0, device_copies = 0;
113                 i < mountlist->entries; i++) {
114                if (!strcmp(device, mountlist->el[i].device)) {
115                    device_copies++;
116                }
117            }
118            if (device_copies > 1) {
119                sprintf(tmp, " %s %s's.", number_to_text(device_copies),
120                        device);
121                if (!strstr(flaws_str, tmp)) {
122                    log_it(tmp);
123                    mr_strcat(flaws_str, tmp);
124                    res++;
125                }
126            }
127            /* silly partition size? */
128            if (mountlist->el[pos].size < 8192
129                && strcmp(mountlist->el[pos].mountpoint, "lvm")) {
130                sprintf(tmp, " %s is tiny!", device);
131                log_it(tmp);
132                mr_strcat(flaws_str, tmp);
133                res++;
134            }
135            /* mountpoint should begin with / unless it is swap, lvm or raid */
136            if (strcmp(mountlist->el[pos].mountpoint, "swap")
137                && strcmp(mountlist->el[pos].mountpoint, "lvm")
138                && strcmp(mountlist->el[pos].mountpoint, "raid")
139                && strcmp(mountlist->el[pos].mountpoint, "image")
140                && strcmp(mountlist->el[pos].mountpoint, "none")
141                && mountlist->el[pos].mountpoint[0] != '/') {
142                sprintf(tmp, " %s has a weird mountpoint.", device);
143                log_it(tmp);
144                mr_strcat(flaws_str, tmp);
145                res++;
146            }
147            /* is format sensible? */
148            if (!is_this_a_valid_disk_format(mountlist->el[pos].format)) {
149                sprintf(tmp, " %s has unsupported format %s.", device, mountlist->el[pos].format);
150                log_it(tmp);
151                mr_strcat(flaws_str, tmp);
152                res++;
153            }
154            amount_allocated += mountlist->el[pos].size / 1024L;
155            prev_sp_no = cur_sp_no;
156        }
157    }
158
159    npos = pos = 0;
160    for (curr_part_no = 1; curr_part_no < 99; curr_part_no++) {
161        build_partition_name(device, drive, curr_part_no);
162        pos = find_device_in_mountlist(mountlist, device);
163        npos = 0;
164        for (cur_sp_no = 'a'; cur_sp_no <= 'h'; cur_sp_no++) {
165            sprintf(device, "%ss%i%c", device, curr_part_no, cur_sp_no);
166            if (find_device_in_mountlist(mountlist, device) >= 0)
167                npos++;
168        }
169        if (((pos >= 0) || npos) && foundsome) {
170            mr_strcat(flaws_str, " %s has both DD and PC-style partitions.", drive);
171            return(flaws_str);      // fatal error
172        }
173
174        build_partition_name(device, drive, curr_part_no);
175        strcpy(mountpoint, mountlist->el[pos].mountpoint);
176        if (pos > 0 && !npos) {
177            /* gap in the partition list? */
178            if (curr_part_no - prev_part_no > 1) {
179                if (prev_part_no == 0) {
180                    sprintf(tmp, " Gap prior to %s.", device);
181                    log_it(tmp);
182                    mr_strcat(flaws_str, "%s", tmp);
183                    res++;
184                } else if (curr_part_no > 5
185                           || (curr_part_no <= 4 && prev_part_no > 0)) {
186                    sprintf(tmp, " Gap between %ss%d and %d.", drive,
187                            prev_part_no, curr_part_no);
188                    log_it(tmp);
189                    mr_strcat(flaws_str, "%s", tmp);
190                    res++;
191                }
192            }
193            /* GPT allows more than 4 primary partitions */
194            part_table_fmt = which_partition_format(drive);
195            /* no spare primary partitions to help accommodate the logical(s)? */
196            if ((curr_part_no >= 5 && prev_part_no == 4)
197                && (strcmp(part_table_fmt, "MBR") == 0)) {
198                sprintf(tmp, " Partition %ss4 is occupied.", drive);
199                log_it(tmp);
200                mr_strcat(flaws_str, "%s", tmp);
201                res++;
202            }
203            /* does partition /dev/adXsY exist more than once in the mountlist? */
204            for (i = 0, mountpoint_copies = 0, device_copies = 0;
205                 i < mountlist->entries; i++) {
206                if (!strcmp(device, mountlist->el[i].device)) {
207                    device_copies++;
208                }
209            }
210            if (device_copies > 1) {
211                sprintf(tmp, " %s %s's.", number_to_text(device_copies),
212                        device);
213                if (!strstr(flaws_str, "%s", tmp)) {
214                    log_it(tmp);
215                    mr_strcat(flaws_str, "%s", tmp);
216                    res++;
217                }
218            }
219            /* silly partition size? */
220            if (mountlist->el[pos].size < 8192
221                && strcmp(mountlist->el[pos].mountpoint, "lvm")) {
222                sprintf(tmp, " %s is tiny!", device);
223                log_it(tmp);
224                mr_strcat(flaws_str, "%s", tmp);
225                res++;
226            }
227            /* mountpoint should begin with / unless it is swap, lvm or raid */
228            if (strcmp(mountlist->el[pos].mountpoint, "swap")
229                && strcmp(mountlist->el[pos].mountpoint, "lvm")
230                && strcmp(mountlist->el[pos].mountpoint, "raid")
231                && strcmp(mountlist->el[pos].mountpoint, "image")
232                && strcmp(mountlist->el[pos].mountpoint, "none")
233                && mountlist->el[pos].mountpoint[0] != '/') {
234                sprintf(tmp, " %s has a weird mountpoint.", device);
235                log_it(tmp);
236                mr_strcat(flaws_str, "%s", tmp);
237                res++;
238            }
239            /* is format sensible? */
240            if (!is_this_a_valid_disk_format(mountlist->el[pos].format)) {
241                sprintf(tmp, " %s has unsupported format %s.", device, mountlist->el[pos].format);
242                log_it(tmp);
243                mr_strcat(flaws_str, "%s", tmp);
244                res++;
245            }
246        } else {
247            /* Check subpartitions */
248            for (cur_sp_no = 'a'; cur_sp_no < 'z'; ++cur_sp_no) {
249                sprintf(device, "%ss%d%c", drive, curr_part_no, cur_sp_no);
250                pos = find_device_in_mountlist(mountlist, device);
251                if (pos < 0) {
252                    continue;
253                }
254                strcpy(mountpoint, mountlist->el[pos].mountpoint);
255                /* is it too big? */
256                if (curr_part_no > 'h') {
257                    sprintf(tmp, " Can only have up to 'h' in disklabel.");
258                    log_it(tmp);
259                    mr_strcat(flaws_str, "%s", tmp);
260                    res++;
261                }
262                /* does partition /dev/adXsYZ exist more than once in the mountlist? */
263                for (i = 0, mountpoint_copies = 0, device_copies = 0;
264                     i < mountlist->entries; i++) {
265                    if (!strcmp(device, mountlist->el[i].device)) {
266                        device_copies++;
267                    }
268                }
269                if (device_copies > 1) {
270                    sprintf(tmp, " %s %s's.",
271                            number_to_text(device_copies), device);
272                    if (!strstr(flaws_str, tmp)) {
273                        log_it(tmp);
274                        mr_strcat(flaws_str, "%s", tmp);
275                        res++;
276                    }
277                }
278                /* silly partition size? */
279                if (mountlist->el[pos].size < 8192
280                    && strcmp(mountlist->el[pos].mountpoint, "lvm")) {
281                    sprintf(tmp, " %s is tiny!", device);
282                    log_it(tmp);
283                    mr_strcat(flaws_str, "%s", tmp);
284                    res++;
285                }
286                /* mountpoint should begin with / unless it is swap, lvm or raid */
287                if (strcmp(mountlist->el[pos].mountpoint, "swap")
288                    && strcmp(mountlist->el[pos].mountpoint, "lvm")
289                    && strcmp(mountlist->el[pos].mountpoint, "raid")
290                    && strcmp(mountlist->el[pos].mountpoint, "image")
291                    && strcmp(mountlist->el[pos].mountpoint, "none")
292                    && mountlist->el[pos].mountpoint[0] != '/') {
293                    sprintf(tmp, " %s has a weird mountpoint.", device);
294                    log_it(tmp);
295                    mr_strcat(flaws_str, "%s", tmp);
296                    res++;
297                }
298                /* is format sensible? */
299                if (!is_this_a_valid_disk_format
300                    (mountlist->el[pos].format)) {
301                    sprintf(tmp, " %s has unsupported format %s.", device, mountlist->el[pos].format);
302                    log_it(tmp);
303                    mr_strcat(flaws_str, "%s", tmp);
304                    res++;
305                }
306                amount_allocated += mountlist->el[pos].size / 1024L;
307                prev_sp_no = cur_sp_no;
308            }
309        }
310
311        /* OK, continue with main loop */
312        amount_allocated += mountlist->el[pos].size / 1024L;
313        prev_part_no = curr_part_no;
314    }
315
316    /* Over-allocated the disk? Unallocated space on disk? */
317    if (amount_allocated > physical_drive_size) // Used to be +1, but what if you're 1 MB too high?
318    {
319        sprintf(tmp, " %ld MB over-allocated on %s.",
320                amount_allocated - physical_drive_size, drive);
321        log_it(tmp);
322        mr_strcat(flaws_str, "%s", tmp);
323        res++;
324    } else if (amount_allocated < physical_drive_size - 1) {    /* NOT AN ERROR, JUST A WARNING :-) */
325        sprintf(tmp, " %ld MB unallocated on %s.",
326                physical_drive_size - amount_allocated, drive);
327        log_it(tmp);
328        mr_strcat(flaws_str, "%s", tmp);
329    }
330    if (res) {
331        return (NULL);
332    } else {
333        return (flaws_str);
334    }
335}
336
337#else
338// Linux-specific version of evaluate_drive_within_mountlist()
339{
340
341    /*@ int ************************************************************* */
342    int prev_part_no = 0;
343    int curr_part_no = 0;
344    int pos = 0;
345    int res = 0;
346    int mountpoint_copies = 0;
347    int device_copies = 0;
348    int i = 0;
349
350    /*@ buffers ******************************************************** */
351    char *tmp;
352    char *device;
353    char *flaws_str = NULL;
354
355    /*@ long *********************************************************** */
356    long physical_drive_size = 0L;
357    long amount_allocated = 0L;
358
359    /*@ pointers ******************************************************* */
360    char *part_table_fmt = NULL;
361
362    /*@ initialize ***************************************************** */
363    assert_string_is_neither_NULL_nor_zerolength(drive);
364    assert(mountlist != NULL);
365    mr_asprintf(&flaws_str, "%s", "");
366
367    malloc_string(tmp);
368    malloc_string(device);
369    prev_part_no = 0;
370    tmp[0] = '\0';
371
372
373    physical_drive_size = get_phys_size_of_drive(drive);
374
375    if (physical_drive_size < 0) {
376        sprintf(tmp, " %s does not exist.", drive);
377        mr_strcat(flaws_str, "%s", tmp);
378        res++;
379        log_msg(1, tmp);
380        goto endoffunc;
381    } else {
382        sprintf(tmp, "%s is %ld MB", drive, physical_drive_size);
383        log_it(tmp);
384    }
385
386    for (curr_part_no = 1; curr_part_no < 99; curr_part_no++) {
387        build_partition_name(device, drive, curr_part_no);
388        pos = find_device_in_mountlist(mountlist, device);
389        if (pos < 0) {
390            continue;
391        }
392        /* gap in the partition list? */
393        if (curr_part_no - prev_part_no > 1) {
394            if (prev_part_no == 0) {
395                sprintf(tmp, " Gap prior to %s.", device);
396                log_it(tmp);
397                mr_strcat(flaws_str, "%s", tmp);
398                res++;
399            } else if (curr_part_no > 5
400                       || (curr_part_no <= 4 && prev_part_no > 0)) {
401                sprintf(tmp, " Gap on %s between %d and %d.", drive,
402                        prev_part_no, curr_part_no);
403                log_it(tmp);
404                mr_strcat(flaws_str, "%s", tmp);
405                res++;
406            }
407        }
408        /* GPT allows more than 4 primary partitions */
409        part_table_fmt = which_partition_format(drive);
410        /* no spare primary partitions to help accommodate the logical(s)? */
411        if ((curr_part_no >= 5 && prev_part_no == 4)
412            && (strcmp(part_table_fmt, "MBR") == 0)) {
413            sprintf(tmp, " Partition 4 of %s is occupied.", drive);
414            log_it(tmp);
415            mr_strcat(flaws_str, "%s", tmp);
416            res++;
417        }
418        /* does partition /dev/hdNX exist more than once in the mountlist? */
419        for (i = 0, mountpoint_copies = 0, device_copies = 0;
420             i < mountlist->entries; i++) {
421            if (!strcmp(device, mountlist->el[i].device)) {
422                device_copies++;
423            }
424        }
425        if (device_copies > 1) {
426            sprintf(tmp, " %s %s's.", number_to_text(device_copies),
427                    device);
428            if (!strstr(flaws_str, tmp)) {
429                log_it(tmp);
430                mr_strcat(flaws_str, "%s", tmp);
431                res++;
432            }
433        }
434        /* silly partition size? */
435        if (mountlist->el[pos].size < 8192
436            && strcmp(mountlist->el[pos].mountpoint, "lvm")) {
437            sprintf(tmp, " %s is tiny!", device);
438            log_it(tmp);
439            mr_strcat(flaws_str, "%s", tmp);
440            res++;
441        }
442        /* mountpoint should begin with / unless it is swap, lvm or raid */
443        if (strcmp(mountlist->el[pos].mountpoint, "swap")
444            && strcmp(mountlist->el[pos].mountpoint, "lvm")
445            && strcmp(mountlist->el[pos].mountpoint, "raid")
446            && strcmp(mountlist->el[pos].mountpoint, "image")
447            && mountlist->el[pos].mountpoint[0] != '/') {
448            sprintf(tmp, " %s has a weird mountpoint.", device);
449            log_it(tmp);
450            mr_strcat(flaws_str, "%s", tmp);
451            res++;
452        }
453        /* is format sensible? */
454        if (!is_this_a_valid_disk_format(mountlist->el[pos].format)) {
455            sprintf(tmp, " %s has unsupported format %s.", device, mountlist->el[pos].format);
456            log_it(tmp);
457            mr_strcat(flaws_str, "%s", tmp);
458            res++;
459        }
460        /* OK, continue with main loop */
461        amount_allocated += mountlist->el[pos].size / 1024L;
462        prev_part_no = curr_part_no;
463    }
464
465    /* Over-allocated the disk? Unallocated space on disk? */
466    if (amount_allocated > physical_drive_size + 1) {
467        sprintf(tmp, " %ld MB over-allocated on %s.",
468                amount_allocated - physical_drive_size, drive);
469        log_it(tmp);
470        mr_strcat(flaws_str, "%s", tmp);
471        res++;
472    } else if (amount_allocated < physical_drive_size - 1) {    /* NOT AN ERROR, JUST A WARNING :-) */
473        sprintf(tmp, " %ld MB unallocated on %s.",
474                physical_drive_size - amount_allocated, drive);
475        log_it(tmp);
476        mr_strcat(flaws_str, "%s", tmp);
477    }
478
479  endoffunc:
480    paranoid_free(tmp);
481    paranoid_free(device);
482
483    if (res) {
484        return (NULL);
485    } else {
486        return (flaws_str);
487    }
488}
489#endif
490
491
492/**
493 * Evaluate a whole mountlist for flaws. Calls evaluate_drive_within_mountlist()
494 * for each drive, and then spreads the flaws across three lines.
495 * @param mountlist The mountlist to evaluate.
496 * @param flaws_str_A Where to put the first line listing errors found.
497 * @param flaws_str_B Where to put the second line listing errors found.
498 * @param flaws_str_C Where to put the third line listing errors found.
499 * @return The number of flaws found (0 for success).
500 * @see evaluate_drive_within_mountlist
501 */
502int
503evaluate_mountlist(struct mountlist_itself *mountlist, char *flaws_str_A,
504                   char *flaws_str_B, char *flaws_str_C)
505{
506
507    /*@ buffer *********************************************************** */
508    struct list_of_disks *drivelist;
509    char *tmp = NULL;
510    char *flaws_str = NULL;
511
512    /*@ int ************************************************************** */
513    int i = 0;
514    int res = 0;
515
516    /*@ initialize ******************************************************* */
517
518    drivelist = malloc(sizeof(struct list_of_disks));
519    assert(mountlist != NULL);
520    assert(flaws_str_A != NULL);
521    assert(flaws_str_B != NULL);
522    assert(flaws_str_C != NULL);
523
524    mr_asprintf(&flaws_str, "%s", "");
525
526    make_list_of_drives_in_mountlist(mountlist, drivelist);
527
528    log_it("Evaluating mountlist...");
529
530    for (i = 0; i < drivelist->entries; i++) {
531        if (strstr
532            (drivelist->el[i].device,
533             DONT_KNOW_HOW_TO_EVALUATE_THIS_DEVICE_TYPE)) {
534            mr_asprintf(&tmp, " Not evaluating %s (I don't know how yet)",
535                    drivelist->el[i].device);
536            log_it(tmp);
537            paranoid_free(tmp);
538        } else {
539            log_msg(8, "Evaluating drive #%d (%s) within mountlist", i, drivelist->el[i].device);
540            if ((tmp = evaluate_drive_within_mountlist(mountlist, drivelist->el[i].device)) == NULL) {
541                res++;
542            }
543        }
544        log_msg(8,"Entry: %d (%s)", i, drivelist->el[i].device);
545        /* BCO: tmp can be NULL as well as flaws_str */
546        if (tmp != NULL) {
547            log_msg(8,"Adding: %s to %s", tmp, flaws_str);
548            mr_strcat(flaws_str, "%s", tmp);
549            paranoid_free(tmp);
550        }
551    }
552    res += look_for_duplicate_mountpoints(mountlist, flaws_str);
553    res = spread_flaws_across_three_lines(flaws_str, flaws_str_A, flaws_str_B, flaws_str_C,res);
554    paranoid_free(flaws_str);
555    return(res);
556}
557
558
559/**
560 * Find the index number of @p device in the mountlist.
561 * The device given must match @p mountlist->el[N].device exactly, case-sensitive.
562 * @param mountlist The mountlist to search in.
563 * @param device The device to search for.
564 * @return The zero-based index of the device, or -1 if it could not be found.
565 */
566int
567find_device_in_mountlist(struct mountlist_itself *mountlist, char *device)
568{
569
570    /*@ int ************************************************************** */
571    int i = 0;
572
573    assert(mountlist != NULL);
574    assert_string_is_neither_NULL_nor_zerolength(device);
575    for (i = 0;
576         i < mountlist->entries
577         && strcmp(mountlist->el[i].device, device) != 0; i++);
578
579    if (i == mountlist->entries) {
580        return (-1);
581    } else {
582        return (i);
583    }
584}
585
586
587/**
588 * Look for duplicate mountpoints in @p mountlist.
589 * @param mountlist The mountlist to check.
590 * @param flaws_str The flaws string to append the results to.
591 * @return The number of mountpoints that have duplicates, or 0 for success.
592 */
593int
594look_for_duplicate_mountpoints(struct mountlist_itself *mountlist, char *flaws_str)
595{
596
597    /*@ int ************************************************************* */
598    int res = 0;
599    int currline = 0;
600    int i = 0;
601    int copies = 0;
602    int last_copy = 0;
603
604    /*@ buffetr ********************************************************* */
605    char *curr_mountpoint = NULL;
606    char *tmp = NULL;
607
608    assert(mountlist != NULL);
609    assert(flaws_str != NULL);
610
611    for (currline = 0; currline < mountlist->entries; currline++) {
612        mr_asprintf(&curr_mountpoint, "%s", mountlist->el[currline].mountpoint);
613        for (i = 0, copies = 0, last_copy = -1; i < mountlist->entries;
614             i++) {
615            if (!strcmp(mountlist->el[i].mountpoint, curr_mountpoint)
616                && strcmp(mountlist->el[i].mountpoint, "lvm")
617                && strcmp(mountlist->el[i].mountpoint, "swap")) {
618                last_copy = i;
619                copies++;
620            }
621        }
622        if (copies > 1 && last_copy == currline
623            && strcmp(curr_mountpoint, "raid")) {
624            mr_asprintf(&tmp, " %s %s's.", number_to_text(copies),
625                    curr_mountpoint);
626            mr_strcat(flaws_str, "%s", tmp);
627            log_it(tmp);
628            paranoid_free(tmp);
629            res++;
630        }
631        paranoid_free(curr_mountpoint);
632    }
633    return (res);
634}
635
636
637/**
638 * Make a list of the drives mentioned in the mountlist.
639 * @param mountlist The mountlist to examine.
640 * @param drivelist Where to put the list of drives found.
641 * @return The number of physical (non-RAID non-LVM) drives found, or \<= 0 for error.
642 */
643int
644make_list_of_drives_in_mountlist(struct mountlist_itself *mountlist,
645                                 struct list_of_disks *drivelist)
646{
647
648    /*@ int ************************************************************* */
649    int lino;
650    int noof_drives;
651    int j;
652
653    /*@ buffers ********************************************************* */
654    char *drive = NULL;
655    char *truncdrive = NULL;
656
657    long long size;
658
659    assert(mountlist != NULL);
660    assert(drivelist != NULL);
661    log_it("Making list of drives");
662    for (lino = 0, noof_drives = 0; lino < mountlist->entries; lino++) {
663
664        mr_asprintf(&drive, "%s", mountlist->el[lino].device);
665        if (!strncmp(drive, RAID_DEVICE_STUB, strlen(RAID_DEVICE_STUB))) {
666            log_msg(8, "Not putting %s in list of drives: it's a virtual drive", drive);
667            paranoid_free(drive);
668            continue;
669        }
670
671        size = mountlist->el[lino].size;
672        if (size == 0) {
673            log_msg(8, "Not putting %s in list of drives: it has zero size (maybe an LVM volume)", drive);
674            paranoid_free(drive);
675            continue;
676        }
677
678        log_msg(8, "Putting %s with size %lli in list of drives", drive, size);
679
680        truncdrive = truncate_to_drive_name(drive);
681        log_msg(8, "drive truncated to %s", truncdrive);
682
683        for (j = 0;
684             j < noof_drives
685             && strcmp(drivelist->el[j].device, truncdrive) != 0; j++) {
686            continue;
687        }
688        if (j == noof_drives) {
689            strncpy(drivelist->el[noof_drives].device, drive, 63);
690            drivelist->el[noof_drives].device[63] = '\0';
691            log_msg(8,"Adding drive %s to list", drivelist->el[noof_drives].device);
692            noof_drives++;
693        }
694        paranoid_free(drive);
695        paranoid_free(truncdrive);
696    }
697    drivelist->entries = noof_drives;
698    log_msg(8, "Made list of %d drives",noof_drives);
699
700    return (noof_drives);
701}
702
703
704/**
705 * Make a list of RAID partitions not currently associated with any RAID device.
706 * The user may add any of these partitions to the RAID device.
707 * @param output_list Where to put the list of unallocated RAID partitions.
708 * @param mountlist The mountlist to examine.
709 * @param raidlist The raidlist to examine.
710 */
711void make_list_of_unallocated_raid_partitions(struct mountlist_itself
712                                              *output_list,
713                                              struct mountlist_itself
714                                              *mountlist,
715                                              struct raidlist_itself
716                                              *raidlist)
717{
718
719    /*@ int ************************************************************* */
720    int items = 0;
721    int i = 0;
722    int used_by = 0;
723
724    /*@ buffers ********************************************************* */
725    char *tmp = NULL;
726
727    assert(output_list != NULL);
728    assert(mountlist != NULL);
729    assert(raidlist != NULL);
730    log_it("MLOURP -- starting");
731    items = 0;
732
733
734    for (i = 0; i < mountlist->entries; i++) {
735        if (strstr(mountlist->el[i].mountpoint, "raid")) {
736            used_by =
737                which_raid_device_is_using_this_partition(raidlist,
738                                                          mountlist->el[i].
739                                                          device);
740            if (used_by < 0) {
741                memcpy((void *) &output_list->el[items++],
742                       (void *) &mountlist->el[i],
743                       sizeof(struct mountlist_line));
744                mr_asprintf(&tmp,
745                         "%s is available; user may choose to add it to raid device",
746                         output_list->el[items - 1].device);
747                log_it(tmp);
748                paranoid_free(tmp);
749            }
750        }
751    }
752    output_list->entries = items;
753    log_it("MLUORP -- ending");
754}
755
756
757/**
758 * Get the size of a mountlist entry by the @c device field.
759 * @param mountlist The mountlist to search in.
760 * @param device The device to search for
761 * @return The size of the device (in KB), or -1 if it could not be found.
762 */
763long long
764size_of_specific_device_in_mountlist(struct mountlist_itself *mountlist,
765                                     char *device)
766{
767    /*@ int ************************************************************** */
768    int i = 0;
769
770
771    assert(mountlist != NULL);
772    assert_string_is_neither_NULL_nor_zerolength(device);
773
774    for (i = 0;
775         i < mountlist->entries && strcmp(mountlist->el[i].device, device);
776         i++);
777    if (i == mountlist->entries) {
778        return (-1);
779    } else {
780        return (mountlist->el[i].size);
781    }
782}
783
784
785/**
786 * Load a file on disk into @p mountlist.
787 * The file on disk should consist of multiple lines, each containing 4 or 5
788 * columns: the device, the mountpoint, the filesystem type, the size in kilobytes, and optionally the filesystem label.
789 * Comments begin with a '#' without any leading whitespace. Any duplicate
790 * entries are renamed.
791 * @param mountlist The mountlist to load into.
792 * @param fname The name of the file to load the mountlist from.
793 * @return 0 for success, 1 for failure.
794 */
795int load_mountlist(struct mountlist_itself *mountlist, char *fname)
796{
797    FILE *fin = NULL;
798    /* malloc ** */
799    char *incoming = NULL;
800    char *siz = NULL;
801    char *tmp = NULL;
802    char *p = NULL;
803
804    int items = 0;
805    int j = 0;
806    int res = 0;
807
808    assert(mountlist != NULL);
809    assert_string_is_neither_NULL_nor_zerolength(fname);
810
811    if (!(fin = fopen(fname, "r"))) {
812        log_it("Unable to open mountlist - '%s'", fname);
813        log_to_screen("Cannot open mountlist");
814        return (1);
815    }
816    malloc_string(incoming);
817    malloc_string(siz);
818    (void) fgets(incoming, MAX_STR_LEN - 1, fin);
819    log_it("Loading mountlist...");
820    while (!feof(fin)) {
821#if linux
822        res = sscanf(incoming,
823               "%s %s %s %s %s",
824               mountlist->el[items].device,
825               mountlist->el[items].mountpoint,
826               mountlist->el[items].format,
827               siz, mountlist->el[items].label);
828        if (res < 5) {
829            /* no label found */
830            log_msg(4, "no label found for %s",mountlist->el[items].device);
831            strcpy(mountlist->el[items].label,"");
832        }
833#elif __FreeBSD__
834        res = sscanf(incoming,
835               "%s %s %s %s",
836               mountlist->el[items].device,
837               mountlist->el[items].mountpoint,
838               mountlist->el[items].format, siz);
839        strcpy(mountlist->el[items].label,"");
840#endif
841
842        if (!strcmp(mountlist->el[items].device, "/proc") ||
843            !strcmp(mountlist->el[items].device, "proc") ||
844            !strcmp(mountlist->el[items].device, "/sys") ||
845            !strcmp(mountlist->el[items].device, "sys") ||
846            !strcmp(mountlist->el[items].device, "/devpts") ||
847            !strcmp(mountlist->el[items].device, "devpts")
848            ) {
849            log_msg(1,
850                    "Ignoring %s in mountlist - not loading that line :) ",
851                    mountlist->el[items].device);
852            (void) fgets(incoming, MAX_STR_LEN - 1, fin);
853            continue;
854        }
855        mountlist->el[items].size = atoll(siz);
856        if (mountlist->el[items].device[0] != '\0'
857            && mountlist->el[items].device[0] != '#') {
858            for (j = 0;
859                 j < items
860                 && strcmp(mountlist->el[j].device,
861                           mountlist->el[items].device); j++);
862            if (j < items) {
863                strcat(mountlist->el[items].device, "_dup");
864                mr_asprintf(&tmp,
865                         "Duplicate entry in mountlist - renaming to %s",
866                         mountlist->el[items].device);
867                log_it(tmp);
868                paranoid_free(tmp);
869            }
870            mr_asprintf(&tmp, "%s", mountlist->el[items].device);
871            if (strstr(tmp, "/dev/md/")) {
872                log_it("format_device() --- Contracting %s", tmp);
873                p = strrchr(tmp, '/');
874                if (p) {
875                    *p = *(p + 1);
876                    *(p + 1) = *(p + 2);
877                    *(p + 2) = *(p + 3);
878                }
879                log_it("It was %s; it is now %s",
880                       mountlist->el[items].device, tmp);
881                strcpy(mountlist->el[items].device, tmp);
882            }
883            paranoid_free(tmp);
884
885            log_it("%s %s %s %lld %s",
886                     mountlist->el[items].device,
887                     mountlist->el[items].mountpoint,
888                     mountlist->el[items].format,
889                     mountlist->el[items].size,
890                     mountlist->el[items].label);
891            items++;
892            if (items >= MAX_MOUNTLIST_ENTRIES) {
893                log_to_screen("Too many lines in mountlist.. ABORTING");
894                finish(1);
895            }
896        }
897        (void) fgets(incoming, MAX_STR_LEN - 1, fin);
898    }
899    paranoid_fclose(fin);
900    mountlist->entries = items;
901
902    log_it("Mountlist loaded successfully.");
903    log_it("%d entries in mountlist", items);
904
905    paranoid_free(incoming);
906    paranoid_free(siz);
907    return (0);
908}
909
910
911
912/**
913 * Save @p mountlist to a file on disk.
914 * @param mountlist The mountlist to save.
915 * @param fname The file to save it to.
916 * @return 0 for success, 1 for failure.
917 * @see load_mountlist
918 */
919int save_mountlist_to_disk(struct mountlist_itself *mountlist, char *fname)
920{
921    FILE *fout;
922    int i;
923
924    assert(mountlist != NULL);
925    assert_string_is_neither_NULL_nor_zerolength(fname);
926
927    log_it("save_mountlist_to_disk() --- saving to %s", fname);
928    if (!(fout = fopen(fname, "w"))) {
929        log_OS_error("WMTD - Cannot openout mountlist");
930        return (1);
931    }
932    for (i = 0; i < mountlist->entries; i++) {
933        fprintf(fout,
934                "%-15s %-15s %-15s %-15lld %-15s\n",
935                mountlist->el[i].device, mountlist->el[i].mountpoint,
936                mountlist->el[i].format, mountlist->el[i].size,
937                mountlist->el[i].label);
938    }
939    paranoid_fclose(fout);
940    return (0);
941}
942
943
944/**
945 * Sort the mountlist alphabetically by device.
946 * The sorting is done in-place.
947 * @param mountlist The mountlist to sort.
948 */
949void sort_mountlist_by_device(struct mountlist_itself *mountlist)
950{
951    int diff;
952    int lino = -999;
953
954    assert(mountlist != NULL);
955
956    while (lino < mountlist->entries) {
957        for (lino = 1; lino < mountlist->entries; lino++) {
958            diff =
959                strcmp_inc_numbers(mountlist->el[lino - 1].device,
960                                   mountlist->el[lino].device);
961            if (diff > 0) {
962                swap_mountlist_entries(mountlist, lino - 1, lino);
963                break;
964            }
965        }
966    }
967}
968
969
970/**
971 * Sort the mountlist alphabetically by mountpoint.
972 * The sorting is done in-place.
973 * @param mountlist The mountlist to sort.
974 * @param reverse If TRUE, then do a reverse sort.
975 */
976void
977sort_mountlist_by_mountpoint(struct mountlist_itself *mountlist,
978                             bool reverse)
979{
980    int diff;
981    int lino = -999;
982
983    assert(mountlist != NULL);
984
985    while (lino < mountlist->entries) {
986        for (lino = 1; lino < mountlist->entries; lino++) {
987            diff =
988                strcmp(mountlist->el[lino - 1].mountpoint,
989                       mountlist->el[lino].mountpoint);
990            if ((diff > 0 && !reverse) || ((diff < 0 && reverse))) {
991                swap_mountlist_entries(mountlist, lino - 1, lino);
992                break;
993            }
994        }
995    }
996}
997
998
999/**
1000 * Swap two entries in the mountlist in-place.
1001 * @param mountlist The mountlist to swap the entries in.
1002 * @param a The index number of the first entry.
1003 * @param b The index number of the second entry.
1004 */
1005void
1006swap_mountlist_entries(struct mountlist_itself *mountlist, int a, int b)
1007{
1008    /*@ mallocs *** */
1009    char *device = NULL;
1010    char *mountpoint = NULL;
1011    char *format = NULL;
1012
1013    long long size;
1014
1015    assert(mountlist != NULL);
1016    assert(a >= 0);
1017    assert(b >= 0);
1018
1019    mr_asprintf(&device, "%s", mountlist->el[a].device);
1020    mr_asprintf(&mountpoint, "%s", mountlist->el[a].mountpoint);
1021    mr_asprintf(&format, "%s", mountlist->el[a].format);
1022
1023    size = mountlist->el[a].size;
1024
1025    strcpy(mountlist->el[a].device, mountlist->el[b].device);
1026    strcpy(mountlist->el[a].mountpoint, mountlist->el[b].mountpoint);
1027    strcpy(mountlist->el[a].format, mountlist->el[b].format);
1028
1029    mountlist->el[a].size = mountlist->el[b].size;
1030
1031    strcpy(mountlist->el[b].device, device);
1032    strcpy(mountlist->el[b].mountpoint, mountpoint);
1033    strcpy(mountlist->el[b].format, format);
1034
1035    mountlist->el[b].size = size;
1036    paranoid_free(device);
1037    paranoid_free(mountpoint);
1038    paranoid_free(format);
1039}
1040
1041/* @} - end of mountlistGroup */
Note: See TracBrowser for help on using the repository browser.