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

Last change on this file since 2235 was 2235, checked in by bruno, 10 years ago

r3132@localhost: bruno | 2009-06-19 16:10:49 +0200
Ads a test infrastruture for mountlist nd truncname

  • Property svn:keywords set to Id
File size: 29.7 KB
Line 
1/* subroutines for handling mountlist
2   $Id: libmondo-mountlist.c 2235 2009-06-19 16:05:10Z 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 2235 2009-06-19 16:05:10Z 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            log_msg(8,"Adding drive %s to list", drivelist->el[noof_drives].device[63]);
690            strncpy(drivelist->el[noof_drives].device, drive, 63);
691            drivelist->el[noof_drives].device[63] = '\0';
692            noof_drives++;
693            drivelist->el[noof_drives++].device[63] = '\0';
694        }
695        paranoid_free(drive);
696        paranoid_free(truncdrive);
697    }
698    drivelist->entries = noof_drives;
699    log_msg(8, "Made list of %d drives",noof_drives);
700
701    return (noof_drives);
702}
703
704
705/**
706 * Make a list of RAID partitions not currently associated with any RAID device.
707 * The user may add any of these partitions to the RAID device.
708 * @param output_list Where to put the list of unallocated RAID partitions.
709 * @param mountlist The mountlist to examine.
710 * @param raidlist The raidlist to examine.
711 */
712void make_list_of_unallocated_raid_partitions(struct mountlist_itself
713                                              *output_list,
714                                              struct mountlist_itself
715                                              *mountlist,
716                                              struct raidlist_itself
717                                              *raidlist)
718{
719
720    /*@ int ************************************************************* */
721    int items = 0;
722    int i = 0;
723    int used_by = 0;
724
725    /*@ buffers ********************************************************* */
726    char *tmp = NULL;
727
728    assert(output_list != NULL);
729    assert(mountlist != NULL);
730    assert(raidlist != NULL);
731    log_it("MLOURP -- starting");
732    items = 0;
733
734
735    for (i = 0; i < mountlist->entries; i++) {
736        if (strstr(mountlist->el[i].mountpoint, "raid")) {
737            used_by =
738                which_raid_device_is_using_this_partition(raidlist,
739                                                          mountlist->el[i].
740                                                          device);
741            if (used_by < 0) {
742                memcpy((void *) &output_list->el[items++],
743                       (void *) &mountlist->el[i],
744                       sizeof(struct mountlist_line));
745                mr_asprintf(&tmp,
746                         "%s is available; user may choose to add it to raid device",
747                         output_list->el[items - 1].device);
748                log_it(tmp);
749                paranoid_free(tmp);
750            }
751        }
752    }
753    output_list->entries = items;
754    log_it("MLUORP -- ending");
755}
756
757
758/**
759 * Get the size of a mountlist entry by the @c device field.
760 * @param mountlist The mountlist to search in.
761 * @param device The device to search for
762 * @return The size of the device (in KB), or -1 if it could not be found.
763 */
764long long
765size_of_specific_device_in_mountlist(struct mountlist_itself *mountlist,
766                                     char *device)
767{
768    /*@ int ************************************************************** */
769    int i = 0;
770
771
772    assert(mountlist != NULL);
773    assert_string_is_neither_NULL_nor_zerolength(device);
774
775    for (i = 0;
776         i < mountlist->entries && strcmp(mountlist->el[i].device, device);
777         i++);
778    if (i == mountlist->entries) {
779        return (-1);
780    } else {
781        return (mountlist->el[i].size);
782    }
783}
784
785
786/**
787 * Load a file on disk into @p mountlist.
788 * The file on disk should consist of multiple lines, each containing 4 or 5
789 * columns: the device, the mountpoint, the filesystem type, the size in kilobytes, and optionally the filesystem label.
790 * Comments begin with a '#' without any leading whitespace. Any duplicate
791 * entries are renamed.
792 * @param mountlist The mountlist to load into.
793 * @param fname The name of the file to load the mountlist from.
794 * @return 0 for success, 1 for failure.
795 */
796int load_mountlist(struct mountlist_itself *mountlist, char *fname)
797{
798    FILE *fin = NULL;
799    /* malloc ** */
800    char *incoming = NULL;
801    char *siz = NULL;
802    char *tmp = NULL;
803    char *p = NULL;
804
805    int items = 0;
806    int j = 0;
807    int res = 0;
808
809    assert(mountlist != NULL);
810    assert_string_is_neither_NULL_nor_zerolength(fname);
811
812    if (!(fin = fopen(fname, "r"))) {
813        log_it("Unable to open mountlist - '%s'", fname);
814        log_to_screen("Cannot open mountlist");
815        return (1);
816    }
817    malloc_string(incoming);
818    malloc_string(siz);
819    (void) fgets(incoming, MAX_STR_LEN - 1, fin);
820    log_it("Loading mountlist...");
821    while (!feof(fin)) {
822#if linux
823        res = sscanf(incoming,
824               "%s %s %s %s %s",
825               mountlist->el[items].device,
826               mountlist->el[items].mountpoint,
827               mountlist->el[items].format,
828               siz, mountlist->el[items].label);
829        if (res < 5) {
830            /* no label found */
831            log_msg(4, "no label found for %s",mountlist->el[items].device);
832            strcpy(mountlist->el[items].label,"");
833        }
834#elif __FreeBSD__
835        res = sscanf(incoming,
836               "%s %s %s %s",
837               mountlist->el[items].device,
838               mountlist->el[items].mountpoint,
839               mountlist->el[items].format, siz);
840        strcpy(mountlist->el[items].label,"");
841#endif
842
843        if (!strcmp(mountlist->el[items].device, "/proc") ||
844            !strcmp(mountlist->el[items].device, "proc") ||
845            !strcmp(mountlist->el[items].device, "/sys") ||
846            !strcmp(mountlist->el[items].device, "sys") ||
847            !strcmp(mountlist->el[items].device, "/devpts") ||
848            !strcmp(mountlist->el[items].device, "devpts")
849            ) {
850            log_msg(1,
851                    "Ignoring %s in mountlist - not loading that line :) ",
852                    mountlist->el[items].device);
853            (void) fgets(incoming, MAX_STR_LEN - 1, fin);
854            continue;
855        }
856        mountlist->el[items].size = atoll(siz);
857        if (mountlist->el[items].device[0] != '\0'
858            && mountlist->el[items].device[0] != '#') {
859            for (j = 0;
860                 j < items
861                 && strcmp(mountlist->el[j].device,
862                           mountlist->el[items].device); j++);
863            if (j < items) {
864                strcat(mountlist->el[items].device, "_dup");
865                mr_asprintf(&tmp,
866                         "Duplicate entry in mountlist - renaming to %s",
867                         mountlist->el[items].device);
868                log_it(tmp);
869                paranoid_free(tmp);
870            }
871            mr_asprintf(&tmp, "%s", mountlist->el[items].device);
872            if (strstr(tmp, "/dev/md/")) {
873                log_it("format_device() --- Contracting %s", tmp);
874                p = strrchr(tmp, '/');
875                if (p) {
876                    *p = *(p + 1);
877                    *(p + 1) = *(p + 2);
878                    *(p + 2) = *(p + 3);
879                }
880                log_it("It was %s; it is now %s",
881                       mountlist->el[items].device, tmp);
882                strcpy(mountlist->el[items].device, tmp);
883            }
884            paranoid_free(tmp);
885
886            log_it("%s %s %s %lld %s",
887                     mountlist->el[items].device,
888                     mountlist->el[items].mountpoint,
889                     mountlist->el[items].format,
890                     mountlist->el[items].size,
891                     mountlist->el[items].label);
892            items++;
893            if (items >= MAX_MOUNTLIST_ENTRIES) {
894                log_to_screen("Too many lines in mountlist.. ABORTING");
895                finish(1);
896            }
897        }
898        (void) fgets(incoming, MAX_STR_LEN - 1, fin);
899    }
900    paranoid_fclose(fin);
901    mountlist->entries = items;
902
903    log_it("Mountlist loaded successfully.");
904    log_it("%d entries in mountlist", items);
905
906    paranoid_free(incoming);
907    paranoid_free(siz);
908    return (0);
909}
910
911
912
913/**
914 * Save @p mountlist to a file on disk.
915 * @param mountlist The mountlist to save.
916 * @param fname The file to save it to.
917 * @return 0 for success, 1 for failure.
918 * @see load_mountlist
919 */
920int save_mountlist_to_disk(struct mountlist_itself *mountlist, char *fname)
921{
922    FILE *fout;
923    int i;
924
925    assert(mountlist != NULL);
926    assert_string_is_neither_NULL_nor_zerolength(fname);
927
928    log_it("save_mountlist_to_disk() --- saving to %s", fname);
929    if (!(fout = fopen(fname, "w"))) {
930        log_OS_error("WMTD - Cannot openout mountlist");
931        return (1);
932    }
933    for (i = 0; i < mountlist->entries; i++) {
934        fprintf(fout,
935                "%-15s %-15s %-15s %-15lld %-15s\n",
936                mountlist->el[i].device, mountlist->el[i].mountpoint,
937                mountlist->el[i].format, mountlist->el[i].size,
938                mountlist->el[i].label);
939    }
940    paranoid_fclose(fout);
941    return (0);
942}
943
944
945/**
946 * Sort the mountlist alphabetically by device.
947 * The sorting is done in-place.
948 * @param mountlist The mountlist to sort.
949 */
950void sort_mountlist_by_device(struct mountlist_itself *mountlist)
951{
952    int diff;
953    int lino = -999;
954
955    assert(mountlist != NULL);
956
957    while (lino < mountlist->entries) {
958        for (lino = 1; lino < mountlist->entries; lino++) {
959            diff =
960                strcmp_inc_numbers(mountlist->el[lino - 1].device,
961                                   mountlist->el[lino].device);
962            if (diff > 0) {
963                swap_mountlist_entries(mountlist, lino - 1, lino);
964                break;
965            }
966        }
967    }
968}
969
970
971/**
972 * Sort the mountlist alphabetically by mountpoint.
973 * The sorting is done in-place.
974 * @param mountlist The mountlist to sort.
975 * @param reverse If TRUE, then do a reverse sort.
976 */
977void
978sort_mountlist_by_mountpoint(struct mountlist_itself *mountlist,
979                             bool reverse)
980{
981    int diff;
982    int lino = -999;
983
984    assert(mountlist != NULL);
985
986    while (lino < mountlist->entries) {
987        for (lino = 1; lino < mountlist->entries; lino++) {
988            diff =
989                strcmp(mountlist->el[lino - 1].mountpoint,
990                       mountlist->el[lino].mountpoint);
991            if ((diff > 0 && !reverse) || ((diff < 0 && reverse))) {
992                swap_mountlist_entries(mountlist, lino - 1, lino);
993                break;
994            }
995        }
996    }
997}
998
999
1000/**
1001 * Swap two entries in the mountlist in-place.
1002 * @param mountlist The mountlist to swap the entries in.
1003 * @param a The index number of the first entry.
1004 * @param b The index number of the second entry.
1005 */
1006void
1007swap_mountlist_entries(struct mountlist_itself *mountlist, int a, int b)
1008{
1009    /*@ mallocs *** */
1010    char *device = NULL;
1011    char *mountpoint = NULL;
1012    char *format = NULL;
1013
1014    long long size;
1015
1016    assert(mountlist != NULL);
1017    assert(a >= 0);
1018    assert(b >= 0);
1019
1020    mr_asprintf(&device, "%s", mountlist->el[a].device);
1021    mr_asprintf(&mountpoint, "%s", mountlist->el[a].mountpoint);
1022    mr_asprintf(&format, "%s", mountlist->el[a].format);
1023
1024    size = mountlist->el[a].size;
1025
1026    strcpy(mountlist->el[a].device, mountlist->el[b].device);
1027    strcpy(mountlist->el[a].mountpoint, mountlist->el[b].mountpoint);
1028    strcpy(mountlist->el[a].format, mountlist->el[b].format);
1029
1030    mountlist->el[a].size = mountlist->el[b].size;
1031
1032    strcpy(mountlist->el[b].device, device);
1033    strcpy(mountlist->el[b].mountpoint, mountpoint);
1034    strcpy(mountlist->el[b].format, format);
1035
1036    mountlist->el[b].size = size;
1037    paranoid_free(device);
1038    paranoid_free(mountpoint);
1039    paranoid_free(format);
1040}
1041
1042/* @} - end of mountlistGroup */
Note: See TracBrowser for help on using the repository browser.