Merge branch 'collectd-5.7'
[collectd.git] / src / utils_mount.c
1 /**
2  * collectd - src/utils_mount.c
3  * Copyright (C) 2005,2006  Niki W. Waibel
4  *
5  * This program is free software; you can redistribute it and/
6  * or modify it under the terms of the GNU General Public Li-
7  * cence as published by the Free Software Foundation; either
8  * version 2 of the Licence, or any later version.
9  *
10  * This program is distributed in the hope that it will be use-
11  * ful, but WITHOUT ANY WARRANTY; without even the implied war-
12  * ranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13  * See the GNU General Public Licence for more details.
14  *
15  * You should have received a copy of the GNU General Public License along
16  * with this program; if not, write to the Free Software Foundation, Inc.,
17  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
18  *
19  * Author:
20  *   Niki W. Waibel <niki.waibel@gmx.net>
21 **/
22
23 #if HAVE_CONFIG_H
24 #include "config.h"
25 #endif
26
27 #define _GNU_SOURCE
28
29 #include "collectd.h"
30
31 #include "utils_mount.h"
32
33 #if HAVE_XFS_XQM_H
34 #include <xfs/xqm.h>
35 #define XFS_SUPER_MAGIC_STR "XFSB"
36 #define XFS_SUPER_MAGIC2_STR "BSFX"
37 #endif
38
39 #include "common.h" /* sstrncpy() et alii */
40 #include "plugin.h" /* ERROR() macro */
41
42 #if HAVE_GETVFSSTAT
43 #if HAVE_SYS_TYPES_H
44 #include <sys/types.h>
45 #endif
46 #if HAVE_SYS_STATVFS_H
47 #include <sys/statvfs.h>
48 #endif
49 /* #endif HAVE_GETVFSSTAT */
50
51 #elif HAVE_GETFSSTAT
52 #if HAVE_SYS_PARAM_H
53 #include <sys/param.h>
54 #endif
55 #if HAVE_SYS_UCRED_H
56 #include <sys/ucred.h>
57 #endif
58 #if HAVE_SYS_MOUNT_H
59 #include <sys/mount.h>
60 #endif
61 #endif /* HAVE_GETFSSTAT */
62
63 #if HAVE_MNTENT_H
64 #include <mntent.h>
65 #endif
66 #if HAVE_SYS_MNTTAB_H
67 #include <sys/mnttab.h>
68 #endif
69
70 #if HAVE_PATHS_H
71 #include <paths.h>
72 #endif
73
74 #ifdef COLLECTD_MNTTAB
75 #undef COLLECTD_MNTTAB
76 #endif
77
78 #if defined(_PATH_MOUNTED) /* glibc */
79 #define COLLECTD_MNTTAB _PATH_MOUNTED
80 #elif defined(MNTTAB) /* Solaris */
81 #define COLLECTD_MNTTAB MNTTAB
82 #elif defined(MNT_MNTTAB)
83 #define COLLECTD_MNTTAB MNT_MNTTAB
84 #elif defined(MNTTABNAME)
85 #define COLLECTD_MNTTAB MNTTABNAME
86 #elif defined(KMTAB)
87 #define COLLECTD_MNTTAB KMTAB
88 #else
89 #define COLLECTD_MNTTAB "/etc/mnttab"
90 #endif
91
92 /* *** *** *** ********************************************* *** *** *** */
93 /* *** *** *** *** *** ***   private functions   *** *** *** *** *** *** */
94 /* *** *** *** ********************************************* *** *** *** */
95
96 /* stolen from quota-3.13 (quota-tools) */
97
98 #define PROC_PARTITIONS "/proc/partitions"
99 #define DEVLABELDIR "/dev"
100 #define UUID 1
101 #define VOL 2
102
103 static struct uuidCache_s {
104   struct uuidCache_s *next;
105   char uuid[16];
106   char *label;
107   char *device;
108 } *uuidCache = NULL;
109
110 #define EXT2_SUPER_MAGIC 0xEF53
111 struct ext2_super_block {
112   unsigned char s_dummy1[56];
113   unsigned char s_magic[2];
114   unsigned char s_dummy2[46];
115   unsigned char s_uuid[16];
116   char s_volume_name[16];
117 };
118 #define ext2magic(s)                                                           \
119   ((unsigned int)s.s_magic[0] + (((unsigned int)s.s_magic[1]) << 8))
120
121 #if HAVE_XFS_XQM_H
122 struct xfs_super_block {
123   unsigned char s_magic[4];
124   unsigned char s_dummy[28];
125   unsigned char s_uuid[16];
126   unsigned char s_dummy2[60];
127   char s_fsname[12];
128 };
129 #endif /* HAVE_XFS_XQM_H */
130
131 #define REISER_SUPER_MAGIC "ReIsEr2Fs"
132 struct reiserfs_super_block {
133   unsigned char s_dummy1[52];
134   unsigned char s_magic[10];
135   unsigned char s_dummy2[22];
136   unsigned char s_uuid[16];
137   char s_volume_name[16];
138 };
139
140 /* for now, only ext2 and xfs are supported */
141 static int get_label_uuid(const char *device, char **label, char *uuid) {
142   /* start with ext2 and xfs tests, taken from mount_guess_fstype */
143   /* should merge these later */
144   int fd, rv = 1;
145   size_t namesize;
146   struct ext2_super_block e2sb;
147 #if HAVE_XFS_XQM_H
148   struct xfs_super_block xfsb;
149 #endif
150   struct reiserfs_super_block reisersb;
151
152   fd = open(device, O_RDONLY);
153   if (fd == -1) {
154     return rv;
155   }
156
157   if (lseek(fd, 1024, SEEK_SET) == 1024 &&
158       read(fd, (char *)&e2sb, sizeof(e2sb)) == sizeof(e2sb) &&
159       ext2magic(e2sb) == EXT2_SUPER_MAGIC) {
160     memcpy(uuid, e2sb.s_uuid, sizeof(e2sb.s_uuid));
161     namesize = sizeof(e2sb.s_volume_name);
162     *label = smalloc(namesize + 1);
163     sstrncpy(*label, e2sb.s_volume_name, namesize);
164     rv = 0;
165 #if HAVE_XFS_XQM_H
166   } else if (lseek(fd, 0, SEEK_SET) == 0 &&
167              read(fd, (char *)&xfsb, sizeof(xfsb)) == sizeof(xfsb) &&
168              (strncmp((char *)&xfsb.s_magic, XFS_SUPER_MAGIC_STR, 4) == 0 ||
169               strncmp((char *)&xfsb.s_magic, XFS_SUPER_MAGIC2_STR, 4) == 0)) {
170     memcpy(uuid, xfsb.s_uuid, sizeof(xfsb.s_uuid));
171     namesize = sizeof(xfsb.s_fsname);
172     *label = smalloc(namesize + 1);
173     sstrncpy(*label, xfsb.s_fsname, namesize);
174     rv = 0;
175 #endif /* HAVE_XFS_XQM_H */
176   } else if (lseek(fd, 65536, SEEK_SET) == 65536 &&
177              read(fd, (char *)&reisersb, sizeof(reisersb)) ==
178                  sizeof(reisersb) &&
179              !strncmp((char *)&reisersb.s_magic, REISER_SUPER_MAGIC, 9)) {
180     memcpy(uuid, reisersb.s_uuid, sizeof(reisersb.s_uuid));
181     namesize = sizeof(reisersb.s_volume_name);
182     *label = smalloc(namesize + 1);
183     sstrncpy(*label, reisersb.s_volume_name, namesize);
184     rv = 0;
185   }
186   close(fd);
187   return rv;
188 }
189
190 static void uuidcache_addentry(char *device, char *label, char *uuid) {
191   struct uuidCache_s *last;
192
193   if (!uuidCache) {
194     last = uuidCache = smalloc(sizeof(*uuidCache));
195   } else {
196     for (last = uuidCache; last->next; last = last->next)
197       ;
198     last->next = smalloc(sizeof(*uuidCache));
199     last = last->next;
200   }
201   last->next = NULL;
202   last->device = device;
203   last->label = label;
204   memcpy(last->uuid, uuid, sizeof(last->uuid));
205 }
206
207 static void uuidcache_init(void) {
208   char line[100];
209   char *s;
210   int ma, mi, sz;
211   static char ptname[100];
212   FILE *procpt;
213   char uuid[16], *label = NULL;
214   char device[110];
215   int handleOnFirst;
216
217   if (uuidCache) {
218     return;
219   }
220
221   procpt = fopen(PROC_PARTITIONS, "r");
222   if (procpt == NULL) {
223     return;
224   }
225
226   for (int firstPass = 1; firstPass >= 0; firstPass--) {
227     fseek(procpt, 0, SEEK_SET);
228     while (fgets(line, sizeof(line), procpt)) {
229       if (sscanf(line, " %d %d %d %[^\n ]", &ma, &mi, &sz, ptname) != 4) {
230         continue;
231       }
232
233       /* skip extended partitions (heuristic: size 1) */
234       if (sz == 1) {
235         continue;
236       }
237
238       /* look only at md devices on first pass */
239       handleOnFirst = !strncmp(ptname, "md", 2);
240       if (firstPass != handleOnFirst) {
241         continue;
242       }
243
244       /* skip entire disk (minor 0, 64, ... on ide;
245       0, 16, ... on sd) */
246       /* heuristic: partition name ends in a digit */
247
248       for (s = ptname; *s; s++)
249         ;
250
251       if (isdigit((int)s[-1])) {
252         /*
253         * Note: this is a heuristic only - there is no reason
254         * why these devices should live in /dev.
255         * Perhaps this directory should be specifiable by option.
256         * One might for example have /devlabel with links to /dev
257         * for the devices that may be accessed in this way.
258         * (This is useful, if the cdrom on /dev/hdc must not
259         * be accessed.)
260         */
261         snprintf(device, sizeof(device), "%s/%s", DEVLABELDIR, ptname);
262         if (!get_label_uuid(device, &label, uuid)) {
263           uuidcache_addentry(sstrdup(device), label, uuid);
264         }
265       }
266     }
267   }
268   fclose(procpt);
269 }
270
271 static unsigned char fromhex(char c) {
272   if (isdigit((int)c)) {
273     return c - '0';
274   } else if (islower((int)c)) {
275     return c - 'a' + 10;
276   } else {
277     return c - 'A' + 10;
278   }
279 }
280
281 static char *get_spec_by_x(int n, const char *t) {
282   struct uuidCache_s *uc;
283
284   uuidcache_init();
285   uc = uuidCache;
286
287   while (uc) {
288     switch (n) {
289     case UUID:
290       if (!memcmp(t, uc->uuid, sizeof(uc->uuid))) {
291         return sstrdup(uc->device);
292       }
293       break;
294     case VOL:
295       if (!strcmp(t, uc->label)) {
296         return sstrdup(uc->device);
297       }
298       break;
299     }
300     uc = uc->next;
301   }
302   return NULL;
303 }
304
305 static char *get_spec_by_uuid(const char *s) {
306   char uuid[16];
307
308   if (strlen(s) != 36 || s[8] != '-' || s[13] != '-' || s[18] != '-' ||
309       s[23] != '-') {
310     goto bad_uuid;
311   }
312
313   for (int i = 0; i < 16; i++) {
314     if (*s == '-') {
315       s++;
316     }
317     if (!isxdigit((int)s[0]) || !isxdigit((int)s[1])) {
318       goto bad_uuid;
319     }
320     uuid[i] = ((fromhex(s[0]) << 4) | fromhex(s[1]));
321     s += 2;
322   }
323   return get_spec_by_x(UUID, uuid);
324
325 bad_uuid:
326   DEBUG("utils_mount: Found an invalid UUID: %s", s);
327   return NULL;
328 }
329
330 static char *get_spec_by_volume_label(const char *s) {
331   return get_spec_by_x(VOL, s);
332 }
333
334 static char *get_device_name(const char *optstr) {
335   char *rc;
336
337   if (optstr == NULL) {
338     return NULL;
339   } else if (strncmp(optstr, "UUID=", 5) == 0) {
340     DEBUG("utils_mount: TODO: check UUID= code!");
341     rc = get_spec_by_uuid(optstr + 5);
342   } else if (strncmp(optstr, "LABEL=", 6) == 0) {
343     DEBUG("utils_mount: TODO: check LABEL= code!");
344     rc = get_spec_by_volume_label(optstr + 6);
345   } else {
346     rc = sstrdup(optstr);
347   }
348
349   if (!rc) {
350     DEBUG("utils_mount: Error checking device name: optstr = %s", optstr);
351   }
352   return rc;
353 }
354
355 /* What weird OS is this..? I can't find any info with google :/ -octo */
356 #if HAVE_LISTMNTENT && 0
357 static cu_mount_t *cu_mount_listmntent(void) {
358   cu_mount_t *last = *list;
359   struct mntent *mnt;
360
361   struct tabmntent *mntlist;
362   if (listmntent(&mntlist, COLLECTD_MNTTAB, NULL, NULL) < 0) {
363 #if COLLECT_DEBUG
364     char errbuf[1024];
365     DEBUG("utils_mount: calling listmntent() failed: %s",
366           sstrerror(errno, errbuf, sizeof(errbuf)));
367 #endif /* COLLECT_DEBUG */
368   }
369
370   for (struct tabmntent *p = mntlist; p; p = p->next) {
371     char *loop = NULL, *device = NULL;
372
373     mnt = p->ment;
374     loop = cu_mount_getoptionvalue(mnt->mnt_opts, "loop=");
375     if (loop == NULL) { /* no loop= mount */
376       device = get_device_name(mnt->mnt_fsname);
377       if (device == NULL) {
378         DEBUG("utils_mount: can't get devicename for fs (%s) %s (%s)"
379               ": ignored",
380               mnt->mnt_type, mnt->mnt_dir, mnt->mnt_fsname);
381         continue;
382       }
383     } else {
384       device = loop;
385     }
386     if (*list == NULL) {
387       *list = (cu_mount_t *)smalloc(sizeof(cu_mount_t));
388       last = *list;
389     } else {
390       while (last->next != NULL) { /* is last really last? */
391         last = last->next;
392       }
393       last->next = (cu_mount_t *)smalloc(sizeof(cu_mount_t));
394       last = last->next;
395     }
396     last->dir = sstrdup(mnt->mnt_dir);
397     last->spec_device = sstrdup(mnt->mnt_fsname);
398     last->device = device;
399     last->type = sstrdup(mnt->mnt_type);
400     last->options = sstrdup(mnt->mnt_opts);
401     last->next = NULL;
402   } /* for(p = mntlist; p; p = p->next) */
403
404   return last;
405 } /* cu_mount_t *cu_mount_listmntent(void) */
406 /* #endif HAVE_LISTMNTENT */
407
408 /* 4.4BSD and Mac OS X (getfsstat) or NetBSD (getvfsstat) */
409 #elif HAVE_GETVFSSTAT || HAVE_GETFSSTAT
410 static cu_mount_t *cu_mount_getfsstat(void) {
411 #if HAVE_GETFSSTAT
412 #define STRUCT_STATFS struct statfs
413 #define CMD_STATFS getfsstat
414 #define FLAGS_STATFS MNT_NOWAIT
415 /* #endif HAVE_GETFSSTAT */
416 #elif HAVE_GETVFSSTAT
417 #define STRUCT_STATFS struct statvfs
418 #define CMD_STATFS getvfsstat
419 #define FLAGS_STATFS ST_NOWAIT
420 #endif /* HAVE_GETVFSSTAT */
421
422   int bufsize;
423   STRUCT_STATFS *buf;
424
425   int num;
426
427   cu_mount_t *first = NULL;
428   cu_mount_t *last = NULL;
429   cu_mount_t *new = NULL;
430
431   /* Get the number of mounted file systems */
432   if ((bufsize = CMD_STATFS(NULL, 0, FLAGS_STATFS)) < 1) {
433 #if COLLECT_DEBUG
434     char errbuf[1024];
435     DEBUG("utils_mount: getv?fsstat failed: %s",
436           sstrerror(errno, errbuf, sizeof(errbuf)));
437 #endif /* COLLECT_DEBUG */
438     return NULL;
439   }
440
441   if ((buf = calloc(bufsize, sizeof(*buf))) == NULL)
442     return NULL;
443
444   /* The bufsize needs to be passed in bytes. Really. This is not in the
445    * manpage.. -octo */
446   if ((num = CMD_STATFS(buf, bufsize * sizeof(STRUCT_STATFS), FLAGS_STATFS)) <
447       1) {
448 #if COLLECT_DEBUG
449     char errbuf[1024];
450     DEBUG("utils_mount: getv?fsstat failed: %s",
451           sstrerror(errno, errbuf, sizeof(errbuf)));
452 #endif /* COLLECT_DEBUG */
453     free(buf);
454     return NULL;
455   }
456
457   for (int i = 0; i < num; i++) {
458     if ((new = calloc(1, sizeof(*new))) == NULL)
459       break;
460
461     /* Copy values from `struct mnttab' */
462     new->dir = sstrdup(buf[i].f_mntonname);
463     new->spec_device = sstrdup(buf[i].f_mntfromname);
464     new->type = sstrdup(buf[i].f_fstypename);
465     new->options = NULL;
466     new->device = get_device_name(new->options);
467     new->next = NULL;
468
469     /* Append to list */
470     if (first == NULL) {
471       first = new;
472       last = new;
473     } else {
474       last->next = new;
475       last = new;
476     }
477   }
478
479   free(buf);
480
481   return first;
482 }
483 /* #endif HAVE_GETVFSSTAT || HAVE_GETFSSTAT */
484
485 /* Solaris (SunOS 10): int getmntent(FILE *fp, struct mnttab *mp); */
486 #elif HAVE_TWO_GETMNTENT || HAVE_GEN_GETMNTENT || HAVE_SUN_GETMNTENT
487 static cu_mount_t *cu_mount_gen_getmntent(void) {
488   struct mnttab mt;
489   FILE *fp;
490
491   cu_mount_t *first = NULL;
492   cu_mount_t *last = NULL;
493   cu_mount_t *new = NULL;
494
495   DEBUG("utils_mount: (void); COLLECTD_MNTTAB = %s", COLLECTD_MNTTAB);
496
497   if ((fp = fopen(COLLECTD_MNTTAB, "r")) == NULL) {
498     char errbuf[1024];
499     ERROR("fopen (%s): %s", COLLECTD_MNTTAB,
500           sstrerror(errno, errbuf, sizeof(errbuf)));
501     return NULL;
502   }
503
504   while (getmntent(fp, &mt) == 0) {
505     if ((new = calloc(1, sizeof(*new))) == NULL)
506       break;
507
508     /* Copy values from `struct mnttab' */
509     new->dir = sstrdup(mt.mnt_mountp);
510     new->spec_device = sstrdup(mt.mnt_special);
511     new->type = sstrdup(mt.mnt_fstype);
512     new->options = sstrdup(mt.mnt_mntopts);
513     new->device = get_device_name(new->options);
514     new->next = NULL;
515
516     /* Append to list */
517     if (first == NULL) {
518       first = new;
519       last = new;
520     } else {
521       last->next = new;
522       last = new;
523     }
524   }
525
526   fclose(fp);
527
528   return first;
529 } /* static cu_mount_t *cu_mount_gen_getmntent (void) */
530   /* #endif HAVE_TWO_GETMNTENT || HAVE_GEN_GETMNTENT || HAVE_SUN_GETMNTENT */
531
532 #elif HAVE_SEQ_GETMNTENT
533 #warn "This version of `getmntent' hat not yet been implemented!"
534 /* #endif HAVE_SEQ_GETMNTENT */
535
536 #elif HAVE_GETMNTENT_R
537 static cu_mount_t *cu_mount_getmntent(void) {
538   FILE *fp;
539   struct mntent me;
540   char mntbuf[1024];
541
542   cu_mount_t *first = NULL;
543   cu_mount_t *last = NULL;
544   cu_mount_t *new = NULL;
545
546   DEBUG("utils_mount: (void); COLLECTD_MNTTAB = %s", COLLECTD_MNTTAB);
547
548   if ((fp = setmntent(COLLECTD_MNTTAB, "r")) == NULL) {
549     char errbuf[1024];
550     ERROR("setmntent (%s): %s", COLLECTD_MNTTAB,
551           sstrerror(errno, errbuf, sizeof(errbuf)));
552     return NULL;
553   }
554
555   while (getmntent_r(fp, &me, mntbuf, sizeof(mntbuf))) {
556     if ((new = calloc(1, sizeof(*new))) == NULL)
557       break;
558
559     /* Copy values from `struct mntent *' */
560     new->dir = sstrdup(me.mnt_dir);
561     new->spec_device = sstrdup(me.mnt_fsname);
562     new->type = sstrdup(me.mnt_type);
563     new->options = sstrdup(me.mnt_opts);
564     new->device = get_device_name(new->options);
565     new->next = NULL;
566
567     DEBUG("utils_mount: new = {dir = %s, spec_device = %s, type = %s, options "
568           "= %s, device = %s}",
569           new->dir, new->spec_device, new->type, new->options, new->device);
570
571     /* Append to list */
572     if (first == NULL) {
573       first = new;
574       last = new;
575     } else {
576       last->next = new;
577       last = new;
578     }
579   }
580
581   endmntent(fp);
582
583   DEBUG("utils_mount: return 0x%p", (void *)first);
584
585   return first;
586 } /* HAVE_GETMNTENT_R */
587
588 #elif HAVE_ONE_GETMNTENT
589 static cu_mount_t *cu_mount_getmntent(void) {
590   FILE *fp;
591   struct mntent *me;
592
593   cu_mount_t *first = NULL;
594   cu_mount_t *last = NULL;
595   cu_mount_t *new = NULL;
596
597   DEBUG("utils_mount: (void); COLLECTD_MNTTAB = %s", COLLECTD_MNTTAB);
598
599   if ((fp = setmntent(COLLECTD_MNTTAB, "r")) == NULL) {
600     char errbuf[1024];
601     ERROR("setmntent (%s): %s", COLLECTD_MNTTAB,
602           sstrerror(errno, errbuf, sizeof(errbuf)));
603     return NULL;
604   }
605
606   while ((me = getmntent(fp)) != NULL) {
607     if ((new = calloc(1, sizeof(*new))) == NULL)
608       break;
609
610     /* Copy values from `struct mntent *' */
611     new->dir = sstrdup(me->mnt_dir);
612     new->spec_device = sstrdup(me->mnt_fsname);
613     new->type = sstrdup(me->mnt_type);
614     new->options = sstrdup(me->mnt_opts);
615     new->device = get_device_name(new->options);
616     new->next = NULL;
617
618     DEBUG("utils_mount: new = {dir = %s, spec_device = %s, type = %s, options "
619           "= %s, device = %s}",
620           new->dir, new->spec_device, new->type, new->options, new->device);
621
622     /* Append to list */
623     if (first == NULL) {
624       first = new;
625       last = new;
626     } else {
627       last->next = new;
628       last = new;
629     }
630   }
631
632   endmntent(fp);
633
634   DEBUG("utils_mount: return 0x%p", (void *)first);
635
636   return first;
637 }
638 #endif /* HAVE_ONE_GETMNTENT */
639
640 /* *** *** *** ******************************************** *** *** *** */
641 /* *** *** *** *** *** ***   public functions   *** *** *** *** *** *** */
642 /* *** *** *** ******************************************** *** *** *** */
643
644 cu_mount_t *cu_mount_getlist(cu_mount_t **list) {
645   cu_mount_t *new;
646   cu_mount_t *first = NULL;
647   cu_mount_t *last = NULL;
648
649   if (list == NULL)
650     return NULL;
651
652   if (*list != NULL) {
653     first = *list;
654     last = first;
655     while (last->next != NULL)
656       last = last->next;
657   }
658
659 #if HAVE_LISTMNTENT && 0
660   new = cu_mount_listmntent();
661 #elif HAVE_GETVFSSTAT || HAVE_GETFSSTAT
662   new = cu_mount_getfsstat();
663 #elif HAVE_TWO_GETMNTENT || HAVE_GEN_GETMNTENT || HAVE_SUN_GETMNTENT
664   new = cu_mount_gen_getmntent();
665 #elif HAVE_SEQ_GETMNTENT
666 #error "This version of `getmntent' hat not yet been implemented!"
667 #elif HAVE_ONE_GETMNTENT
668   new = cu_mount_getmntent();
669 #else
670 #error "Could not determine how to find mountpoints."
671 #endif
672
673   if (first != NULL) {
674     last->next = new;
675   } else {
676     first = new;
677     last = new;
678     *list = first;
679   }
680
681   while ((last != NULL) && (last->next != NULL))
682     last = last->next;
683
684   return last;
685 } /* cu_mount_t *cu_mount_getlist(cu_mount_t **list) */
686
687 void cu_mount_freelist(cu_mount_t *list) {
688   cu_mount_t *next;
689
690   for (cu_mount_t *this = list; this != NULL; this = next) {
691     next = this->next;
692
693     sfree(this->dir);
694     sfree(this->spec_device);
695     sfree(this->device);
696     sfree(this->type);
697     sfree(this->options);
698     sfree(this);
699   }
700 } /* void cu_mount_freelist(cu_mount_t *list) */
701
702 char *cu_mount_checkoption(char *line, const char *keyword, int full) {
703   char *line2, *l2, *p1, *p2;
704   int l;
705
706   if (line == NULL || keyword == NULL) {
707     return NULL;
708   }
709
710   if (full != 0) {
711     full = 1;
712   }
713
714   line2 = sstrdup(line);
715   l2 = line2;
716   while (*l2 != '\0') {
717     if (*l2 == ',') {
718       *l2 = '\0';
719     }
720     l2++;
721   }
722
723   l = strlen(keyword);
724   p1 = line - 1;
725   p2 = strchr(line, ',');
726   do {
727     if (strncmp(line2 + (p1 - line) + 1, keyword, l + full) == 0) {
728       free(line2);
729       return p1 + 1;
730     }
731     p1 = p2;
732     if (p1 != NULL) {
733       p2 = strchr(p1 + 1, ',');
734     }
735   } while (p1 != NULL);
736
737   free(line2);
738   return NULL;
739 } /* char *cu_mount_checkoption(char *line, char *keyword, int full) */
740
741 char *cu_mount_getoptionvalue(char *line, const char *keyword) {
742   char *r;
743
744   r = cu_mount_checkoption(line, keyword, 0);
745   if (r != NULL) {
746     char *p;
747     r += strlen(keyword);
748     p = strchr(r, ',');
749     if (p == NULL) {
750       return sstrdup(r);
751     } else {
752       char *m;
753       if ((p - r) == 1) {
754         return NULL;
755       }
756       m = smalloc(p - r + 1);
757       sstrncpy(m, r, p - r + 1);
758       return m;
759     }
760   }
761   return r;
762 } /* char *cu_mount_getoptionvalue(char *line, const char *keyword) */
763
764 int cu_mount_type(const char *type) {
765   if (strcmp(type, "ext3") == 0)
766     return CUMT_EXT3;
767   if (strcmp(type, "ext2") == 0)
768     return CUMT_EXT2;
769   if (strcmp(type, "ufs") == 0)
770     return CUMT_UFS;
771   if (strcmp(type, "vxfs") == 0)
772     return CUMT_VXFS;
773   if (strcmp(type, "zfs") == 0)
774     return CUMT_ZFS;
775   return CUMT_UNKNOWN;
776 } /* int cu_mount_type(const char *type) */