source: MondoRescue/branches/2.2.10/mondo/src/common/libmondo-mountlist.c @ 2331

Last change on this file since 2331 was 2331, checked in by Bruno Cornec, 12 years ago

r3342@localhost: bruno | 2009-08-14 00:46:51 +0200

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