source: branches/3.2/mondo/src/common/libmondo-string.c @ 3205

Last change on this file since 3205 was 3205, checked in by Bruno Cornec, 7 years ago
  • Fix mondoarchive which now works in text mode. GUI mode still not working and crashing on first update for backup. Needs more

investigation in newt-specific.c

  • Property svn:keywords set to Id
File size: 28.9 KB
Line 
1/* $Id: libmondo-string.c 3205 2013-12-06 14:40:47Z bruno $ */
2
3
4/**
5 * @file
6 * Functions for handling strings.
7 */
8
9#include "my-stuff.h"
10#include "mr_mem.h"
11#include "mondostructures.h"
12#include "libmondo-string.h"
13#include "lib-common-externs.h"
14#include "libmondo-files-EXT.h"
15#include "libmondo-gui-EXT.h"
16#include "libmondo-tools-EXT.h"
17
18/*@unused@*/
19//static char cvsid[] = "$Id: libmondo-string.c 3205 2013-12-06 14:40:47Z bruno $";
20
21extern int g_current_media_number;
22extern long long g_tape_posK;
23
24/* Reference to global bkpinfo */
25extern struct s_bkpinfo *bkpinfo;
26
27
28/**
29 * @addtogroup stringGroup
30 * @{
31 */
32/**
33 * Build a partition name from a drive and a partition number.
34 * @param drive The drive basename of the partition name (e.g. /dev/hda)
35 * @param partno The partition number (e.g. 1)
36 * @param partition Where to put the partition name (e.g. /dev/hda1)
37 * @return @p partition.
38 * @note If @p drive ends in a digit, then 'p' (on Linux) or 's' (on *BSD) is added before @p partno.
39 */
40char *build_partition_name(char *partition, const char *drive, int partno)
41{
42    char *p, *c;
43
44    assert(partition != NULL);
45    assert_string_is_neither_NULL_nor_zerolength(drive);
46    assert(partno >= 0);
47
48    p = strcpy(partition, drive);
49    /* is this a devfs device path? */
50    c = strrchr(partition, '/');
51    if (c && strncmp(c, "/disc", 5) == 0) {
52        /* yup it's devfs, return the "part" path */
53        /* This strcpy is safe */
54        strcpy(c + 1, "part");
55        p = c + 5;
56    } else {
57        p += strlen(p);
58        if (isdigit(p[-1])) {
59            *p++ =
60#ifdef BSD
61                's';
62#else
63                'p';
64#endif
65        }
66    }
67    sprintf(p, "%d", partno);
68    return(partition);
69}
70
71
72/**
73 * Pad a string on both sides so it appears centered.
74 * @param in_out The string to be center-padded (modified).
75 * @param width The width of the final result.
76 */
77void center_string(char *in_out, int width)
78{
79    char scratch[MAX_STR_LEN];
80    char *p;
81    int i;                      /* purpose */
82    int len;                    /* purpose */
83    int mid;                    /* purpose */
84    int x;                      /* purpose */
85
86    assert(in_out != NULL);
87    assert(width > 2);
88
89    if (strlen(in_out) == 0) {
90        return;
91    }
92    for (p = in_out; *p == ' '; p++);
93    strcpy(scratch, p);
94    strip_spaces(scratch);
95    len = (int) strlen(scratch);
96    mid = width / 2;
97    x = mid - len / 2;
98    for (i = 0; i < x; i++) {
99        in_out[i] = ' ';
100    }
101    in_out[i] = '\0';
102    strcat(in_out, scratch);
103    for (i = x + len ; i < width - 1; i++) {
104            in_out[i] = ' ';
105        }
106    in_out[i] = '\0';
107}
108
109
110/**
111 * Add commas every third place in @p input.
112 * @param input The string to commarize.
113 * @return The string with commas.
114 * @note The returned string points to static storage that will be overwritten with each call.
115 */
116char *commarize(char *input)
117{
118    char pos_w_commas[MAX_STR_LEN];
119    static char output[MAX_STR_LEN];
120    char tmp[MAX_STR_LEN];
121    int j;
122
123    assert(input != NULL);
124
125    strcpy(tmp, input);
126    if (strlen(tmp) > 6) {
127        strcpy(pos_w_commas, tmp);
128        j = (int) strlen(pos_w_commas);
129        tmp[j - 6] = ',';
130        strcpy(tmp + j - 5, pos_w_commas + j - 6);
131        strcpy(pos_w_commas, tmp);
132    }
133    if (strlen(tmp) > 3) {
134        j = (int) strlen(tmp);
135        strcpy(pos_w_commas, tmp);
136        pos_w_commas[j - 3] = ',';
137        strcpy(pos_w_commas + j - 2, tmp + j - 3);
138    } else {
139        strcpy(pos_w_commas, tmp);
140    }
141    strcpy(output, pos_w_commas);
142    return (output);
143}
144
145
146/**
147 * Turn an entry from the RAID editor's disklist into a GUI-friendly string.
148 * The format is: the device left-aligned and padded to 24 places, followed by a space and the
149 * index, right-aligned and padded to eight places. The total string length
150 * is exactly 33.
151 * @param disklist The disklist to operate on.
152 * @param lino The line number from @p disklist to convert to a string.
153 * @return The string form of the disklist entry.
154 * @note The returned string points to static storage and will be overwritten with each call.
155 */
156char *disklist_entry_to_string(struct list_of_disks *disklist, int lino)
157{
158
159    /*@ buffers ********************************************************** */
160    static char output[MAX_STR_LEN];
161
162    assert(disklist != NULL);
163
164    sprintf(output, "%-24s %8d", disklist->el[lino].device,
165            disklist->el[lino].index);
166    return (output);
167}
168
169
170
171
172
173/**
174 * Turn a "friendly" sizestring into a number of megabytes.
175 * Supports the suffixes 'k'/'K', 'm'/'M', and 'g'/'G'. Calls
176 * fatal_error() if an unknown suffix is encountered.
177 * @param incoming The sizestring to convert (e.g. "40m", "2g").
178 * @return The size in megabytes.
179 */
180long friendly_sizestr_to_sizelong(char *incoming)
181{
182    long outval;
183    int i;
184    char *tmp = NULL;
185    char ch;
186
187    assert_string_is_neither_NULL_nor_zerolength(incoming);
188
189    if (!incoming[0]) {
190        return (0);
191    }
192    if (strchr(incoming, '.')) {
193        fatal_error("Please use integers only. No decimal points.");
194    }
195
196    mr_asprintf(tmp, "%s", incoming);
197    i = (int) strlen(tmp);
198    if (tmp[i - 1] == 'B' || tmp[i - 1] == 'b') {
199        tmp[i - 1] = '\0';
200    }
201    for (i = 0; i < (int) strlen(tmp) && isdigit(tmp[i]); i++);
202    ch = tmp[i];
203    tmp[i] = '\0';
204    outval = atol(tmp);
205    mr_free(tmp);
206
207    if (ch == 'g' || ch == 'G') {
208        outval = outval * 1024;
209    } else if (ch == 'k' || ch == 'K') {
210        outval = outval / 1024;
211    } else if (ch == 't' || ch == 'T')  // terabyte
212    {
213        outval *= 1048576;
214    } else if (ch == 'Y' || ch == 'y')  // yottabyte - the biggest measure in the info file
215    {
216        log_it
217            ("Oh my gosh. You actually think a YOTTABYTE will get you anywhere? What're you going to do with 1,208,925,819,614,629,174,706,176 bytes of data?!?!");
218        popup_and_OK
219            ("That sizespec is more than 1,208,925,819,614,629,174,706,176 bytes. You have a shocking amount of data. Please send a screenshot to the list :-)");
220        fatal_error("Integer overflow.");
221    } else if (ch != 'm' && ch != 'M') {
222        mr_asprintf(tmp, "Re: parameter '%s' - bad multiplier ('%c')", incoming, ch);
223        fatal_error(tmp);
224    }
225    return (outval);
226}
227
228
229
230/**
231 * Add spaces to the right of @p incoming to make it @p width characters wide.
232 * @param incoming The string to left-pad.
233 * @param width The width to pad it to.
234 * @return The left-padded string.
235 * @note The returned string points to static storage that will be overwritten with each call.
236 * @bug Why does center_string() modify its argument but leftpad_string() returns a modified copy?
237 */
238char *leftpad_string(char *incoming, int width)
239{
240    /*@ buffers ***************************************************** */
241    static char output[MAX_STR_LEN];
242
243    /*@ ints ******************************************************** */
244    int i;
245
246    /*@ end vars **************************************************** */
247    assert(incoming != NULL);
248    assert(width > 2);
249
250    strcpy(output, incoming);
251    for (i = (int) strlen(output); i < width; i++) {
252        output[i] = ' ';
253    }
254    output[i] = '\0';
255    return (output);
256}
257
258
259
260/**
261 * Turn a marker byte (e.g. BLK_START_OF_BACKUP) into a string (e.g. "BLK_START_OF_BACKUP").
262 * Unknown markers are identified as "BLK_UNKNOWN (%d)" where %d is the decimal value.
263 * @param marker The marker byte to stringify.
264 * @return @p marker as a string.
265 * @note The returned string points to static storage that will be overwritten with each call.
266 */
267char *marker_to_string(int marker)
268{
269    /*@ buffer ****************************************************** */
270    static char outstr[MAX_STR_LEN];
271
272
273    /*@ end vars *************************************************** */
274
275    switch (marker) {
276    case BLK_START_OF_BACKUP:
277        strcpy(outstr, "BLK_START_OF_BACKUP");
278        break;
279    case BLK_START_OF_TAPE:
280        strcpy(outstr, "BLK_START_OF_TAPE");
281        break;
282    case BLK_START_AN_AFIO_OR_SLICE:
283        strcpy(outstr, "BLK_START_AN_AFIO_OR_SLICE");
284        break;
285    case BLK_STOP_AN_AFIO_OR_SLICE:
286        strcpy(outstr, "BLK_STOP_AN_AFIO_OR_SLICE");
287        break;
288    case BLK_START_AFIOBALLS:
289        strcpy(outstr, "BLK_START_AFIOBALLS");
290        break;
291    case BLK_STOP_AFIOBALLS:
292        strcpy(outstr, "BLK_STOP_AFIOBALLS");
293        break;
294    case BLK_STOP_BIGGIEFILES:
295        strcpy(outstr, "BLK_STOP_BIGGIEFILES");
296        break;
297    case BLK_START_A_NORMBIGGIE:
298        strcpy(outstr, "BLK_START_A_NORMBIGGIE");
299        break;
300    case BLK_START_A_PIHBIGGIE:
301        strcpy(outstr, "BLK_START_A_PIHBIGGIE");
302        break;
303    case BLK_START_EXTENDED_ATTRIBUTES:
304        strcpy(outstr, "BLK_START_EXTENDED_ATTRIBUTES");
305        break;
306    case BLK_STOP_EXTENDED_ATTRIBUTES:
307        strcpy(outstr, "BLK_STOP_EXTENDED_ATTRIBUTES");
308        break;
309    case BLK_START_EXAT_FILE:
310        strcpy(outstr, "BLK_START_EXAT_FILE");
311        break;
312    case BLK_STOP_EXAT_FILE:
313        strcpy(outstr, "BLK_STOP_EXAT_FILE");
314        break;
315    case BLK_START_BIGGIEFILES:
316        strcpy(outstr, "BLK_START_BIGGIEFILES");
317        break;
318    case BLK_STOP_A_BIGGIE:
319        strcpy(outstr, "BLK_STOP_A_BIGGIE");
320        break;
321    case BLK_END_OF_TAPE:
322        strcpy(outstr, "BLK_END_OF_TAPE");
323        break;
324    case BLK_END_OF_BACKUP:
325        strcpy(outstr, "BLK_END_OF_BACKUP");
326        break;
327    case BLK_ABORTED_BACKUP:
328        strcpy(outstr, "BLK_ABORTED_BACKUP");
329        break;
330    case BLK_START_FILE:
331        strcpy(outstr, "BLK_START_FILE");
332        break;
333    case BLK_STOP_FILE:
334        strcpy(outstr, "BLK_STOP_FILE");
335        break;
336    default:
337        sprintf(outstr, "BLK_UNKNOWN (%d)", marker);
338        break;
339    }
340    return (outstr);
341}
342
343
344
345
346/**
347 * Turn a line from the mountlist into a GUI-friendly string.
348 * The format is as follows: the left-aligned @p device field padded to 24 places,
349 * a space, the left-aligned @p mountpoint field again padded to 24 places, a space,
350 * the left-aligned @p format field padded to 10 places, a space, and the right-aligned
351 * @p size field (in MB) padded to 8 places. The total string length is exactly 69.
352 * @param mountlist The mountlist to operate on.
353 * @param lino The line number in @p mountlist to stringify.
354 * @return The string form of <tt>mountlist</tt>-\>el[<tt>lino</tt>].
355 * @note The returned string points to static storage and will be overwritten with each call.
356 */
357char *mountlist_entry_to_string(struct mountlist_itself *mountlist,
358                                int lino)
359{
360
361    /*@ buffer *********************************************************** */
362    static char output[MAX_STR_LEN];
363
364    assert(mountlist != NULL);
365
366    sprintf(output, "%-24s %-24s %-10s %8lld", mountlist->el[lino].device,
367            mountlist->el[lino].mountpoint, mountlist->el[lino].format,
368            mountlist->el[lino].size / 1024L);
369    return (output);
370}
371
372
373
374
375
376
377/**
378 * Generate a friendly string containing "X blah blah disk(s)"
379 * @param noof_disks The number of disks (the X).
380 * @param label The "blah blah" part in the middle. If you leave this blank
381 * there will be a weird double space in the middle, so pass *something*.
382 * @return The string containing "X blah blah disk(s)".
383 * @note The returned string points to static storage and will be overwritten with each call.
384 */
385char *number_of_disks_as_string(int noof_disks, char *label)
386{
387
388    /*@ buffers ********************************************************* */
389    static char output[MAX_STR_LEN];
390
391    /*@ char     ******************************************************** */
392    char p;
393
394    assert(label != NULL);
395
396    if (noof_disks > 1) {
397        p = 's';
398    } else {
399        p = ' ';
400    }
401    sprintf(output, "%d %s disk%c", noof_disks, label, p);
402    while (strlen(output) < 14) {
403        strcat(output, " ");
404    }
405    return (output);
406}
407
408
409
410/**
411 * Change @p i into a friendly string. If @p i is \<= 10 then write out the
412 * number (e.g. "one", "two", ..., "nine", "ten", "11", ...).
413 * @param i The number to stringify.
414 * @return The string form of @p i.
415 * @note The returned value points to static strorage that will be overwritten with each call.
416 */
417char *number_to_text(int i)
418{
419
420    /*@ buffers ***************************************************** */
421    static char output[MAX_STR_LEN];
422
423
424    /*@ end vars *************************************************** */
425
426    switch (i) {
427    case 0:
428        strcpy(output, "zero");
429        break;
430    case 1:
431        strcpy(output, "one");
432        break;
433    case 2:
434        strcpy(output, "two");
435        break;
436    case 3:
437        strcpy(output, "three");
438        break;
439    case 4:
440        strcpy(output, "four");
441        break;
442    case 5:
443        strcpy(output, "five");
444        break;
445    case 6:
446        strcpy(output, "six");
447        break;
448    case 7:
449        strcpy(output, "seven");
450        break;
451    case 8:
452        strcpy(output, "eight");
453        break;
454    case 9:
455        strcpy(output, "nine");
456    case 10:
457        strcpy(output, "ten");
458    default:
459        sprintf(output, "%d", i);
460    }
461    return (output);
462}
463
464
465
466
467/**
468 * Replace all occurences of @p token with @p value while copying @p ip to @p output.
469 * @param ip The input string containing zero or more <tt>token</tt>s.
470 * @param output The output string written with the <tt>token</tt>s replaced by @p value.
471 * @param token The token to be relaced with @p value.
472 * @param value The value to replace @p token.
473 */
474void resolve_naff_tokens(char *output, char *ip, char *value, char *token)
475{
476    /*@ buffers *** */
477    char *input;
478
479    /*@ pointers * */
480    char *p;
481
482    input = malloc(2000);
483    assert(value != NULL);
484
485    strcpy(output, ip);         /* just in case the token doesn't appear in string at all */
486    for (strcpy(input, ip); strstr(input, token); strcpy(input, output)) {
487        strcpy(output, input);
488        p = strstr(output, token);
489        *p = '\0';
490        strcat(output, value);
491        p = strstr(input, token) + strlen(token);
492        strcat(output, p);
493    }
494    paranoid_free(input);
495}
496
497
498
499
500
501/**
502 * Generate the filename of slice @p sliceno of biggiefile @p bigfileno
503 * in @p path with suffix @p s. The format is as follows: @p path, followed
504 * by "/slice-" and @p bigfileno zero-padded to 7 places, followed by
505 * a dot and @p sliceno zero-padded to 5 places, followed by ".dat" and the
506 * suffix. The string is a minimum of 24 characters long.
507 * @param bigfileno The biggiefile number. Starts from 0.
508 * @param sliceno The slice number of biggiefile @p bigfileno. 0 is a "header"
509 * slice (no suffix) containing the biggiestruct, then are the compressed
510 * slices, then an empty uncompressed "trailer" slice.
511 * @param path The path to append (with a / in the middle) to the slice filename.
512 * @param s If not "" then add a "." and this to the end.
513 * @return The slice filename.
514 * @note The returned value points to static storage and will be overwritten with each call.
515 */
516char *slice_fname(long bigfileno, long sliceno, char *path, char *s)
517{
518
519    /*@ buffers **************************************************** */
520    static char output[MAX_STR_LEN];
521    char *suffix = NULL;
522
523    /*@ end vars *************************************************** */
524
525    assert_string_is_neither_NULL_nor_zerolength(path);
526    if (s[0] != '\0') {
527        mr_asprintf(suffix, ".%s", s);
528    } else {
529        mr_asprintf(suffix, "");
530    }
531    sprintf(output, "%s/slice-%07ld.%05ld.dat%s", path, bigfileno, sliceno, suffix);
532    mr_free(suffix);
533    return (output);
534}
535
536
537/**
538 * Generate a spinning symbol based on integer @p i.
539 * The symbol rotates through the characters / - \ | to form an ASCII "spinner"
540 * if successively written to the same location on screen.
541 * @param i The amount of progress or whatever else to use to determine the character
542 * for this iteration of the spinner.
543 * @return The character for this iteration.
544 */
545int special_dot_char(int i)
546{
547    switch (i % 4) {
548    case 0:
549        return ('/');
550    case 1:
551        return ('-');
552    case 2:
553        return ('\\');
554    case 3:
555        return ('|');
556    default:
557        return ('.');
558    }
559    return ('.');
560}
561
562
563/**
564 * Compare @p stringA and @p stringB. This uses an ASCII sort for everything
565 * up to the digits on the end but a numerical sort for the digits on the end.
566 * @param stringA The first string to compare.
567 * @param stringB The second string to compare.
568 * @return The same as strcmp() - <0 if A<B, 0 if A=B, >0 if A>B.
569 * @note This function only does a numerical sort on the @e last set of numbers. If
570 * there are any in the middle those will be sorted ASCIIbetically.
571 */
572int strcmp_inc_numbers(char *stringA, char *stringB)
573{
574    /*@ int ********************************************************* */
575    int i;
576    int start_of_numbers_in_A;
577    int start_of_numbers_in_B;
578    int res;
579
580    /*@ long ******************************************************* */
581    long numA;
582    long numB;
583
584    /*@ end vars *************************************************** */
585    assert(stringA != NULL);
586    assert(stringB != NULL);
587
588    if (strlen(stringA) == strlen(stringB)) {
589        return (strcmp(stringA, stringB));
590    }
591    for (i = (int) strlen(stringA); i > 0 && isdigit(stringA[i - 1]); i--);
592    if (i == (int) strlen(stringA)) {
593        return (strcmp(stringA, stringB));
594    }
595    start_of_numbers_in_A = i;
596    for (i = (int) strlen(stringB); i > 0 && isdigit(stringB[i - 1]); i--);
597    if (i == (int) strlen(stringB)) {
598        return (strcmp(stringA, stringB));
599    }
600    start_of_numbers_in_B = i;
601    if (start_of_numbers_in_A != start_of_numbers_in_B) {
602        return (strcmp(stringA, stringB));
603    }
604    res = strncmp(stringA, stringB, (size_t) i);
605    if (res) {
606        return (res);
607    }
608    numA = atol(stringA + start_of_numbers_in_A);
609    numB = atol(stringB + start_of_numbers_in_B);
610    return ((int) (numA - numB));
611}
612
613
614
615/**
616 * Strip excess baggage from @p input, which should be a line from afio.
617 * For now this copies the whole line unless it finds a set of quotes, in which case
618 * it copies their contents only.
619 * @param input The input line (presumably from afio).
620 * @return The stripped line.
621 * @note The returned string points to static storage that will be overwritten with each call.
622 */
623char *strip_afio_output_line(char *input)
624{
625    /*@ buffer ****************************************************** */
626    static char output[MAX_STR_LEN];
627
628    /*@ pointers **************************************************** */
629    char *p;
630    char *q;
631    /*@ end vars *************************************************** */
632
633    assert(input != NULL);
634    strcpy(output, input);
635    p = strchr(input, '\"');
636    if (p) {
637        q = strchr(++p, '\"');
638        if (q) {
639            strcpy(output, p);
640            *(strchr(output, '\"')) = '\0';
641        }
642    }
643    return (output);
644}
645
646
647
648/**
649 * Remove all characters whose ASCII value is less than or equal to 32
650 * (spaces and control characters) from both sides of @p in_out.
651 * @param in_out The string to strip spaces/control characters from (modified).
652 */
653void strip_spaces(char *in_out)
654{
655    /*@ buffers ***************************************************** */
656    char *tmp = NULL;
657
658    /*@ int ******************************************************** */
659    int i;
660
661    /*@ end vars *************************************************** */
662
663    assert(in_out != NULL);
664    malloc_string(tmp);
665    for (i = 0; in_out[i] <= ' ' && i < (int) strlen(in_out) -1; i++);
666    strcpy(tmp, in_out + i);
667    for (i = (int) strlen(tmp) -1; i >= 0 && tmp[i] <= ' '; i--);
668    i++;
669    tmp[i] = '\0';
670
671    // Now tmp contains the stripped string
672    strcpy(in_out,tmp);
673    paranoid_free(tmp);
674}
675
676/**
677 * Remove all characters whose ASCII value is less than or equal to 32
678 * (spaces and control characters) from both sides of @p in_out.
679 * @param in_out The string to strip spaces/control characters from (modified).
680 */
681void strip_spaces2(char *in_out)
682{
683    /*@ buffers ***************************************************** */
684    char *tmp;
685
686    /*@ pointers **************************************************** */
687    char *p;
688
689    /*@ int ******************************************************** */
690    int i;
691    int original_incoming_length;
692
693    /*@ end vars *************************************************** */
694
695    assert(in_out != NULL);
696    malloc_string(tmp);
697    original_incoming_length = (int) strlen(in_out);
698    for (i = 0; in_out[i] <= ' ' && i < (int) strlen(in_out); i++);
699    strcpy(tmp, in_out + i);
700    for (i = (int) strlen(tmp); i > 0 && tmp[i - 1] <= 32; i--);
701    tmp[i] = '\0';
702    for (i = 0; i < original_incoming_length && MAX_STR_LEN; i++) {
703        in_out[i] = ' ';
704    }
705    in_out[i] = '\0';
706    i = 0;
707    p = tmp;
708    while (*p != '\0') {
709        in_out[i] = *(p++);
710        in_out[i + 1] = '\0';
711        if (in_out[i] < 32 && i > 0) {
712            if (in_out[i] == 8) {
713                i--;
714            } else if (in_out[i] == 9) {
715                in_out[i++] = ' ';
716            } else if (in_out[i] == '\r')   // added 1st October 2003 -- FIXME
717            {
718                strcpy(tmp, in_out + i);
719                strcpy(in_out, tmp);
720                i = -1;
721                continue;
722            } else if (in_out[i] == '\t') {
723                for (i++; i % 5; i++);
724            } else if (in_out[i] >= 10 && in_out[i] <= 13) {
725                break;
726            } else {
727                i--;
728            }
729        } else {
730            i++;
731        }
732    }
733    in_out[i] = '\0';
734    paranoid_free(tmp);
735}
736
737
738/**
739 * If there are double quotes "" around @p incoming then remove them.
740 * This does not affect other quotes that may be embedded within the string.
741 * @param incoming The string to trim quotes from (modified).
742 * @return @p incoming.
743 */
744char *trim_empty_quotes(char *incoming)
745{
746    /*@ buffer ****************************************************** */
747    static char outgoing[MAX_STR_LEN];
748
749    /*@ end vars *************************************************** */
750    assert(incoming != NULL);
751
752    if (incoming[0] == '\"' && incoming[strlen(incoming) - 1] == '\"') {
753        strcpy(outgoing, incoming + 1);
754        outgoing[strlen(outgoing) - 1] = '\0';
755    } else {
756        strcpy(outgoing, incoming);
757    }
758    return (outgoing);
759}
760
761
762
763
764/**
765 * Remove any partition info from @p partition, leaving just the drive name.
766 * @param partition The partition name soon-to-become drive name. (modified)
767 * @return @p partition.
768 */
769char *truncate_to_drive_name(const char *partition)
770{
771    int i = strlen(partition) - 1;
772    char *c;
773    char *trunc = NULL;
774
775    assert_string_is_neither_NULL_nor_zerolength(partition);
776    mr_asprintf(trunc, "%s", partition);
777
778#ifdef __FreeBSD__
779
780    if (islower(trunc[i]))  // BSD subpartition
781        i--;
782    if (trunc[i-1] == 's') {
783        while (isdigit(trunc[i]))
784            i--;
785        i--;
786    }
787    trunc[i+1] = '\0';
788
789#else
790
791    /* first see if it's a devfs style device */
792    c = strrchr(trunc, '/');
793    if (c && strncmp(c, "/part", 5) == 0) {
794        /* yup it's devfs, return the "disc" path */
795        strcpy(c + 1, "disc");
796        return trunc;
797    }
798    /* then see if it's a dm style device */
799    if (c && strncmp(c, "/dm-", 4) == 0) {
800        /* yup it's dm, return the full path */
801        return trunc;
802    }
803
804
805    for (i = strlen(trunc); isdigit(trunc[i-1]); i--)
806        continue;
807    if (trunc[i-1] == 'p' && isdigit(trunc[i-2])) {
808        i--;
809    } else {
810        /* Some full devices like this /dev/mapper/mpath0
811           /dev/cciss/c0d0 may be used as partition names */
812        if ((strstr(trunc,"/dev/mapper/mpath") != NULL) ||
813            (strstr(trunc,"/dev/cciss/c") != NULL) ||
814            (strstr(trunc,"/dev/rd/") != NULL)) {
815                return trunc;
816            }
817    }
818    trunc[i] = '\0';
819
820#endif
821
822    return trunc;
823}
824
825
826
827
828
829/**
830 * Turn a RAID level number (-1 to 5) into a friendly string. The string
831 * is either "Linear RAID" for -1, or " RAID %-2d " (%d = @p raid_level)
832 * for anything else.
833 * @param raid_level The RAID level to stringify.
834 * @return The string form of @p raid_level.
835 * @note The returned value points to static storage that will be overwritten with each call.
836 */
837char *turn_raid_level_number_to_string(int raid_level)
838{
839
840    /*@ buffer ********************************************************** */
841    static char output[MAX_STR_LEN];
842
843
844
845    if (raid_level >= 0) {
846        sprintf(output, " RAID %-2d ", raid_level);
847    } else {
848        sprintf(output, "Linear RAID");
849    }
850    return (output);
851}
852
853
854
855
856
857
858
859
860
861/**
862 * Determine the severity (1-3, 1 being low) of the fact that
863 * @p fn changed in the live filesystem (verify/compare).
864 * @param fn The filename that changed.
865 * @param out_reason If non-NULL, a descriptive reason for the difference will be copied here.
866 * @return The severity (1-3).
867 */
868int severity_of_difference(char *fn, char **out_reason) {
869
870    int sev = 3;
871    char *reason = NULL;
872    char *filename = NULL;
873
874    // out_reason might be null on purpose, so don't bomb if it is :) OK?
875    assert_string_is_neither_NULL_nor_zerolength(fn);
876    if (!strncmp(fn, MNT_RESTORING, strlen(MNT_RESTORING))) {
877        mr_asprintf(filename, "%s", fn + strlen(MNT_RESTORING));
878    } else if (fn[0] != '/') {
879        mr_asprintf(filename, "/%s", fn);
880    } else {
881        mr_asprintf(filename, "%s", fn);
882    }
883
884    mr_asprintf(reason, "Changed since backup. Consider running a differential backup in a day or two.");
885
886    if (!strncmp(filename, "/var/", 5)) {
887        sev = 2;
888        mr_free(reason);
889        mr_asprintf(reason, "/var's contents will change regularly, inevitably.");
890    }
891    if (!strncmp(filename, "/home", 5)) {
892        sev = 2;
893        mr_free(reason);
894        mr_asprintf(reason, "It's in your /home directory. Therefore, it is important.");
895    }
896    if (!strncmp(filename, "/usr/", 5)) {
897        sev = 3;
898        mr_free(reason);
899        mr_asprintf(reason, "You may have installed/removed software during the backup.");
900    }
901    if (!strncmp(filename, "/etc/", 5)) {
902        sev = 3;
903        mr_free(reason);
904        mr_asprintf(reason, "Do not edit config files while backing up your PC.");
905    }
906    if (!strcmp(filename, "/etc/adjtime")
907        || !strcmp(filename, "/etc/mtab")) {
908        sev = 1;
909        mr_free(reason);
910        mr_asprintf(reason, "This file changes all the time. It's OK.");
911    }
912    if (!strncmp(filename, "/root/", 6)) {
913        sev = 3;
914        mr_free(reason);
915        mr_asprintf(reason, "Were you compiling/editing something in /root?");
916    }
917    if (!strncmp(filename, "/root/.", 7)) {
918        sev = 2;
919        mr_free(reason);
920        mr_asprintf(reason, "Temp or 'dot' files changed in /root.");
921    }
922    if (!strncmp(filename, "/var/lib/", 9)) {
923        sev = 2;
924        mr_free(reason);
925        mr_asprintf(reason, "Did you add/remove software during backing?");
926    }
927    if (!strncmp(filename, "/var/lib/rpm", 12)) {
928        sev = 3;
929        mr_free(reason);
930        mr_asprintf(reason, "Did you add/remove software during backing?");
931    }
932    if (!strncmp(filename, "/var/lib/slocate", 16)) {
933        sev = 1;
934        mr_free(reason);
935        mr_asprintf(reason, "The 'update' daemon ran during backup. This does not affect the integrity of your backup.");
936    }
937    if (!strncmp(filename, "/var/log/", 9)
938        || strstr(filename, "/.xsession")
939        || !strcmp(filename + strlen(filename) - 4, ".log")) {
940        sev = 1;
941        mr_free(reason);
942        mr_asprintf(reason, "Log files change frequently as the computer runs. Fret not.");
943    }
944    if (!strncmp(filename, "/var/spool", 10)) {
945        sev = 1;
946        mr_free(reason);
947        mr_asprintf(reason, "Background processes or printers were active. This does not affect the integrity of your backup.");
948    }
949    if (!strncmp(filename, "/var/spool/mail", 10)) {
950        sev = 2;
951        mr_free(reason);
952        mr_asprintf(reason, "Mail was sent/received during backup.");
953    }
954    if (filename[strlen(filename) - 1] == '~') {
955        sev = 1;
956        mr_free(reason);
957        mr_asprintf(reason, "Backup copy of another file which was modified recently.");
958    }
959    if (strstr(filename, "cache")) {
960        sev = 1;
961        mr_free(reason);
962        mr_asprintf(reason, "Part of a cache of data. Caches change from time to time. Don't worry.");
963    }
964    if (!strncmp(filename, "/var/run/", 9)
965        || !strncmp(filename, "/var/lock", 8)
966        || strstr(filename, "/.DCOPserver") || strstr(filename, "/.MCOP")
967        || strstr(filename, "/.Xauthority")) {
968        sev = 1;
969        mr_free(reason);
970        mr_asprintf(reason, "Temporary file (a lockfile, perhaps) used by software such as X or KDE to register its presence.");
971    }
972    if (out_reason) {
973        strcpy(*out_reason, reason);
974    }
975    mr_free(filename);
976    mr_free(reason);
977    return (sev);
978}
979
980
981
982/**
983 * Compare the filenames in two filelist entries (s_filelist_entry*) casted
984 * to void*.
985 * @param va The first filelist entry, cast as a @c void pointer.
986 * @param vb The second filelist entry, cast as a @c void pointer.
987 * @return The return value of strcmp().
988 */
989int compare_two_filelist_entries(void *va, void *vb)
990{
991    static int res;
992    struct s_filelist_entry *fa, *fb;
993
994    assert(va != NULL);
995    assert(vb != NULL);
996    fa = (struct s_filelist_entry *) va;
997    fb = (struct s_filelist_entry *) vb;
998    res = strcmp(fa->filename, fb->filename);
999    return (res);
1000}
1001
1002
1003
1004
1005
1006
1007
1008/**
1009 * Generate a line intended to be passed to update_evalcall_form(), indicating
1010 * the current media fill percentage (or number of kilobytes if size is not known).
1011 * @param bkpinfo The backup media structure. Fields used:
1012 * - @c bkpinfo->backup_media_type
1013 * - @c bkpinfo->media_size
1014 * - @c bkpinfo->scratchdir
1015 * @return The string indicating media fill.
1016 * @note The returned string points to static storage that will be overwritten with each call.
1017 */
1018char *percent_media_full_comment()
1019{
1020    /*@ int *********************************************** */
1021    int percentage;
1022    int j;
1023
1024    /*@ buffers ******************************************* */
1025    static char outstr[MAX_STR_LEN];
1026    char *pos_w_commas = NULL;
1027    char *mds = NULL;
1028    char *tmp = NULL;
1029
1030    assert(bkpinfo != NULL);
1031
1032    if (bkpinfo->media_size <= 0) {
1033        mr_asprintf(tmp, "%lld", g_tape_posK);
1034        mr_asprintf(pos_w_commas, "%s", commarize(tmp));
1035        mr_free(tmp);
1036        sprintf(outstr, "Volume %d: %s kilobytes archived so far", g_current_media_number, pos_w_commas);
1037        mr_free(pos_w_commas);
1038        return (outstr);
1039    }
1040
1041    /* update screen */
1042    if (IS_THIS_A_STREAMING_BACKUP(bkpinfo->backup_media_type)) {
1043        percentage = (int) (g_tape_posK / 10 / bkpinfo->media_size);
1044        if (percentage > 100) {
1045            percentage = 100;
1046        }
1047        sprintf(outstr, "Volume %d: [", g_current_media_number);
1048    } else {
1049        percentage = (int) (space_occupied_by_cd(bkpinfo->scratchdir) * 100 / 1024 / bkpinfo->media_size);
1050        mds = media_descriptor_string(bkpinfo->backup_media_type);
1051        sprintf(outstr, "%s %d: [", mds, g_current_media_number);
1052        mr_free(mds);
1053    }
1054    for (j = 0; j < percentage; j += 5) {
1055        strcat(outstr, "*");
1056    }
1057    for (; j < 100; j += 5) {
1058        strcat(outstr, ".");
1059    }
1060    j = (int) strlen(outstr);
1061    sprintf(outstr + j, "] %d%% used", percentage);
1062    return (outstr);
1063}
1064
1065/**
1066 * Get a string form of @p type_of_bkp.
1067 * @param type_of_bkp The backup type to stringify.
1068 * @return The stringification of @p type_of_bkp.
1069 * @note The returned string points to static storage that will be overwritten with each call.
1070 */
1071char *media_descriptor_string(t_bkptype type_of_bkp) {
1072
1073    char *type_of_backup = NULL;
1074
1075    switch (type_of_bkp) {
1076    case dvd:
1077        mr_asprintf(type_of_backup, "DVD");
1078        break;
1079    case cdr:
1080        mr_asprintf(type_of_backup, "CDR");
1081        break;
1082    case cdrw:
1083        mr_asprintf(type_of_backup, "CDRW");
1084        break;
1085    case tape:
1086        mr_asprintf(type_of_backup, "tape");
1087        break;
1088    case cdstream:
1089        mr_asprintf(type_of_backup, "CDR");
1090        break;
1091    case udev:
1092        mr_asprintf(type_of_backup, "udev");
1093        break;
1094    case iso:
1095        mr_asprintf(type_of_backup, "ISO");
1096        break;
1097    case netfs:
1098        mr_asprintf(type_of_backup, "%s", bkpinfo->netfs_proto);
1099        break;
1100    case usb:
1101        mr_asprintf(type_of_backup, "USB");
1102        break;
1103    default:
1104        mr_asprintf(type_of_backup, "ISO");
1105    }
1106    return (type_of_backup);
1107}
Note: See TracBrowser for help on using the repository browser.