2 * collectd - src/utils_mount.c
3 * Copyright (C) 2005,2006 Niki W. Waibel
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.
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.
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
20 * Niki W. Waibel <niki.waibel@gmx.net>
30 #define XFS_SUPER_MAGIC_STR "XFSB"
31 #define XFS_SUPER_MAGIC2_STR "BSFX"
36 #include "utils_mount.h"
38 #include "common.h" /* sstrncpy() et alii */
39 #include "plugin.h" /* ERROR() macro */
44 # include <sys/types.h>
46 # if HAVE_SYS_STATVFS_H
47 # include <sys/statvfs.h>
49 /* #endif HAVE_GETVFSSTAT */
53 # include <sys/param.h>
56 # include <sys/ucred.h>
59 # include <sys/mount.h>
61 #endif /* HAVE_GETFSSTAT */
67 # include <sys/mnttab.h>
74 #ifdef COLLECTD_MNTTAB
75 # undef COLLECTD_MNTTAB
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
87 # define COLLECTD_MNTTAB KMTAB
89 # define COLLECTD_MNTTAB "/etc/mnttab"
92 /* *** *** *** ********************************************* *** *** *** */
93 /* *** *** *** *** *** *** private functions *** *** *** *** *** *** */
94 /* *** *** *** ********************************************* *** *** *** */
96 /* stolen from quota-3.13 (quota-tools) */
98 #define PROC_PARTITIONS "/proc/partitions"
99 #define DEVLABELDIR "/dev"
103 static struct uuidCache_s {
104 struct uuidCache_s *next;
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];
118 #define ext2magic(s) ((unsigned int)s.s_magic[0] \
119 + (((unsigned int)s.s_magic[1]) << 8))
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];
129 #endif /* HAVE_XFS_XQM_H */
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];
140 /* for now, only ext2 and xfs are supported */
142 get_label_uuid(const char *device, char **label, char *uuid)
144 /* start with ext2 and xfs tests, taken from mount_guess_fstype */
145 /* should merge these later */
148 struct ext2_super_block e2sb;
150 struct xfs_super_block xfsb;
152 struct reiserfs_super_block reisersb;
154 fd = open(device, O_RDONLY);
159 if(lseek(fd, 1024, SEEK_SET) == 1024
160 && read(fd, (char *)&e2sb, sizeof(e2sb)) == sizeof(e2sb)
161 && ext2magic(e2sb) == EXT2_SUPER_MAGIC) {
162 memcpy(uuid, e2sb.s_uuid, sizeof(e2sb.s_uuid));
163 namesize = sizeof(e2sb.s_volume_name);
164 *label = smalloc(namesize + 1);
165 sstrncpy(*label, e2sb.s_volume_name, namesize);
168 } else if(lseek(fd, 0, SEEK_SET) == 0
169 && read(fd, (char *)&xfsb, sizeof(xfsb)) == sizeof(xfsb)
170 && (strncmp((char *)&xfsb.s_magic, XFS_SUPER_MAGIC_STR, 4) == 0 ||
171 strncmp((char *)&xfsb.s_magic, XFS_SUPER_MAGIC2_STR, 4) == 0)) {
172 memcpy(uuid, xfsb.s_uuid, sizeof(xfsb.s_uuid));
173 namesize = sizeof(xfsb.s_fsname);
174 *label = smalloc(namesize + 1);
175 sstrncpy(*label, xfsb.s_fsname, namesize);
177 #endif /* HAVE_XFS_XQM_H */
178 } else if(lseek(fd, 65536, SEEK_SET) == 65536
179 && read(fd, (char *)&reisersb, sizeof(reisersb)) == sizeof(reisersb)
180 && !strncmp((char *)&reisersb.s_magic, REISER_SUPER_MAGIC, 9)) {
181 memcpy(uuid, reisersb.s_uuid, sizeof(reisersb.s_uuid));
182 namesize = sizeof(reisersb.s_volume_name);
183 *label = smalloc(namesize + 1);
184 sstrncpy(*label, reisersb.s_volume_name, namesize);
192 uuidcache_addentry(char *device, char *label, char *uuid)
194 struct uuidCache_s *last;
197 last = uuidCache = smalloc(sizeof(*uuidCache));
199 for(last = uuidCache; last->next; last = last->next);
200 last->next = smalloc(sizeof(*uuidCache));
204 last->device = device;
206 memcpy(last->uuid, uuid, sizeof(last->uuid));
215 static char ptname[100];
217 char uuid[16], *label = NULL;
225 procpt = fopen(PROC_PARTITIONS, "r");
230 for(int firstPass = 1; firstPass >= 0; firstPass--) {
231 fseek(procpt, 0, SEEK_SET);
232 while(fgets(line, sizeof(line), procpt)) {
233 if(sscanf(line, " %d %d %d %[^\n ]",
234 &ma, &mi, &sz, ptname) != 4)
239 /* skip extended partitions (heuristic: size 1) */
244 /* look only at md devices on first pass */
245 handleOnFirst = !strncmp(ptname, "md", 2);
246 if(firstPass != handleOnFirst) {
250 /* skip entire disk (minor 0, 64, ... on ide;
252 /* heuristic: partition name ends in a digit */
254 for(s = ptname; *s; s++);
256 if(isdigit((int)s[-1])) {
258 * Note: this is a heuristic only - there is no reason
259 * why these devices should live in /dev.
260 * Perhaps this directory should be specifiable by option.
261 * One might for example have /devlabel with links to /dev
262 * for the devices that may be accessed in this way.
263 * (This is useful, if the cdrom on /dev/hdc must not
266 ssnprintf(device, sizeof(device), "%s/%s",
267 DEVLABELDIR, ptname);
268 if(!get_label_uuid(device, &label, uuid)) {
269 uuidcache_addentry(sstrdup(device),
281 if(isdigit((int)c)) {
283 } else if(islower((int)c)) {
284 return (c - 'a' + 10);
286 return (c - 'A' + 10);
291 get_spec_by_x(int n, const char *t)
293 struct uuidCache_s *uc;
301 if(!memcmp(t, uc->uuid, sizeof(uc->uuid))) {
302 return sstrdup(uc->device);
306 if(!strcmp(t, uc->label)) {
307 return sstrdup(uc->device);
317 get_spec_by_uuid(const char *s)
322 || s[8] != '-' || s[13] != '-' || s[18] != '-' || s[23] != '-') {
326 for(int i=0; i<16; i++) {
330 if(!isxdigit((int)s[0]) || !isxdigit((int)s[1])) {
333 uuid[i] = ((fromhex(s[0]) << 4) | fromhex(s[1]));
336 return get_spec_by_x(UUID, uuid);
339 DEBUG("utils_mount: Found an invalid UUID: %s", s);
343 static char *get_spec_by_volume_label(const char *s)
345 return get_spec_by_x (VOL, s);
348 static char *get_device_name(const char *optstr)
356 else if (strncmp (optstr, "UUID=", 5) == 0)
358 DEBUG ("utils_mount: TODO: check UUID= code!");
359 rc = get_spec_by_uuid (optstr + 5);
361 else if (strncmp (optstr, "LABEL=", 6) == 0)
363 DEBUG ("utils_mount: TODO: check LABEL= code!");
364 rc = get_spec_by_volume_label (optstr + 6);
368 rc = sstrdup (optstr);
373 DEBUG ("utils_mount: Error checking device name: optstr = %s", optstr);
378 /* What weird OS is this..? I can't find any info with google :/ -octo */
379 #if HAVE_LISTMNTENT && 0
380 static cu_mount_t *cu_mount_listmntent (void)
382 cu_mount_t *last = *list;
385 struct tabmntent *mntlist;
386 if(listmntent(&mntlist, COLLECTD_MNTTAB, NULL, NULL) < 0) {
389 DEBUG("utils_mount: calling listmntent() failed: %s",
390 sstrerror (errno, errbuf, sizeof (errbuf)));
391 #endif /* COLLECT_DEBUG */
394 for(struct tabmntent *p = mntlist; p; p = p->next) {
395 char *loop = NULL, *device = NULL;
398 loop = cu_mount_getoptionvalue(mnt->mnt_opts, "loop=");
399 if(loop == NULL) { /* no loop= mount */
400 device = get_device_name(mnt->mnt_fsname);
402 DEBUG("utils_mount: can't get devicename for fs (%s) %s (%s)"
403 ": ignored", mnt->mnt_type,
404 mnt->mnt_dir, mnt->mnt_fsname);
411 *list = (cu_mount_t *)smalloc(sizeof(cu_mount_t));
414 while(last->next != NULL) { /* is last really last? */
417 last->next = (cu_mount_t *)smalloc(sizeof(cu_mount_t));
420 last->dir = sstrdup(mnt->mnt_dir);
421 last->spec_device = sstrdup(mnt->mnt_fsname);
422 last->device = device;
423 last->type = sstrdup(mnt->mnt_type);
424 last->options = sstrdup(mnt->mnt_opts);
426 } /* for(p = mntlist; p; p = p->next) */
429 } /* cu_mount_t *cu_mount_listmntent(void) */
430 /* #endif HAVE_LISTMNTENT */
432 /* 4.4BSD and Mac OS X (getfsstat) or NetBSD (getvfsstat) */
433 #elif HAVE_GETVFSSTAT || HAVE_GETFSSTAT
434 static cu_mount_t *cu_mount_getfsstat (void)
437 # define STRUCT_STATFS struct statfs
438 # define CMD_STATFS getfsstat
439 # define FLAGS_STATFS MNT_NOWAIT
440 /* #endif HAVE_GETFSSTAT */
441 #elif HAVE_GETVFSSTAT
442 # define STRUCT_STATFS struct statvfs
443 # define CMD_STATFS getvfsstat
444 # define FLAGS_STATFS ST_NOWAIT
445 #endif /* HAVE_GETVFSSTAT */
452 cu_mount_t *first = NULL;
453 cu_mount_t *last = NULL;
454 cu_mount_t *new = NULL;
456 /* Get the number of mounted file systems */
457 if ((bufsize = CMD_STATFS (NULL, 0, FLAGS_STATFS)) < 1)
461 DEBUG ("utils_mount: getv?fsstat failed: %s",
462 sstrerror (errno, errbuf, sizeof (errbuf)));
463 #endif /* COLLECT_DEBUG */
467 if ((buf = calloc (bufsize, sizeof (*buf))) == NULL)
470 /* The bufsize needs to be passed in bytes. Really. This is not in the
472 if ((num = CMD_STATFS (buf, bufsize * sizeof (STRUCT_STATFS), FLAGS_STATFS)) < 1)
476 DEBUG ("utils_mount: getv?fsstat failed: %s",
477 sstrerror (errno, errbuf, sizeof (errbuf)));
478 #endif /* COLLECT_DEBUG */
483 for (int i = 0; i < num; i++)
485 if ((new = calloc (1, sizeof (*new))) == NULL)
488 /* Copy values from `struct mnttab' */
489 new->dir = sstrdup (buf[i].f_mntonname);
490 new->spec_device = sstrdup (buf[i].f_mntfromname);
491 new->type = sstrdup (buf[i].f_fstypename);
493 new->device = get_device_name (new->options);
513 /* #endif HAVE_GETVFSSTAT || HAVE_GETFSSTAT */
515 /* Solaris (SunOS 10): int getmntent(FILE *fp, struct mnttab *mp); */
516 #elif HAVE_TWO_GETMNTENT || HAVE_GEN_GETMNTENT || HAVE_SUN_GETMNTENT
517 static cu_mount_t *cu_mount_gen_getmntent (void)
522 cu_mount_t *first = NULL;
523 cu_mount_t *last = NULL;
524 cu_mount_t *new = NULL;
526 DEBUG ("utils_mount: (void); COLLECTD_MNTTAB = %s", COLLECTD_MNTTAB);
528 if ((fp = fopen (COLLECTD_MNTTAB, "r")) == NULL)
531 ERROR ("fopen (%s): %s", COLLECTD_MNTTAB,
532 sstrerror (errno, errbuf, sizeof (errbuf)));
536 while (getmntent (fp, &mt) == 0)
538 if ((new = calloc (1, sizeof (*new))) == NULL)
541 /* Copy values from `struct mnttab' */
542 new->dir = sstrdup (mt.mnt_mountp);
543 new->spec_device = sstrdup (mt.mnt_special);
544 new->type = sstrdup (mt.mnt_fstype);
545 new->options = sstrdup (mt.mnt_mntopts);
546 new->device = get_device_name (new->options);
565 } /* static cu_mount_t *cu_mount_gen_getmntent (void) */
566 /* #endif HAVE_TWO_GETMNTENT || HAVE_GEN_GETMNTENT || HAVE_SUN_GETMNTENT */
568 #elif HAVE_SEQ_GETMNTENT
569 #warn "This version of `getmntent' hat not yet been implemented!"
570 /* #endif HAVE_SEQ_GETMNTENT */
572 #elif HAVE_GETMNTENT_R
573 static cu_mount_t *cu_mount_getmntent (void)
579 cu_mount_t *first = NULL;
580 cu_mount_t *last = NULL;
581 cu_mount_t *new = NULL;
583 DEBUG ("utils_mount: (void); COLLECTD_MNTTAB = %s", COLLECTD_MNTTAB);
585 if ((fp = setmntent (COLLECTD_MNTTAB, "r")) == NULL)
588 ERROR ("setmntent (%s): %s", COLLECTD_MNTTAB,
589 sstrerror (errno, errbuf, sizeof (errbuf)));
593 while (getmntent_r (fp, &me, mntbuf, sizeof (mntbuf) ))
595 if ((new = calloc (1, sizeof (*new))) == NULL)
598 /* Copy values from `struct mntent *' */
599 new->dir = sstrdup (me.mnt_dir);
600 new->spec_device = sstrdup (me.mnt_fsname);
601 new->type = sstrdup (me.mnt_type);
602 new->options = sstrdup (me.mnt_opts);
603 new->device = get_device_name (new->options);
606 DEBUG ("utils_mount: new = {dir = %s, spec_device = %s, type = %s, options = %s, device = %s}",
607 new->dir, new->spec_device, new->type, new->options, new->device);
624 DEBUG ("utils_mount: return (0x%p)", (void *) first);
627 } /* HAVE_GETMNTENT_R */
629 #elif HAVE_ONE_GETMNTENT
630 static cu_mount_t *cu_mount_getmntent (void)
635 cu_mount_t *first = NULL;
636 cu_mount_t *last = NULL;
637 cu_mount_t *new = NULL;
639 DEBUG ("utils_mount: (void); COLLECTD_MNTTAB = %s", COLLECTD_MNTTAB);
641 if ((fp = setmntent (COLLECTD_MNTTAB, "r")) == NULL)
644 ERROR ("setmntent (%s): %s", COLLECTD_MNTTAB,
645 sstrerror (errno, errbuf, sizeof (errbuf)));
649 while ((me = getmntent (fp)) != NULL)
651 if ((new = calloc (1, sizeof (*new))) == NULL)
654 /* Copy values from `struct mntent *' */
655 new->dir = sstrdup (me->mnt_dir);
656 new->spec_device = sstrdup (me->mnt_fsname);
657 new->type = sstrdup (me->mnt_type);
658 new->options = sstrdup (me->mnt_opts);
659 new->device = get_device_name (new->options);
662 DEBUG ("utils_mount: new = {dir = %s, spec_device = %s, type = %s, options = %s, device = %s}",
663 new->dir, new->spec_device, new->type, new->options, new->device);
680 DEBUG ("utils_mount: return (0x%p)", (void *) first);
684 #endif /* HAVE_ONE_GETMNTENT */
686 /* *** *** *** ******************************************** *** *** *** */
687 /* *** *** *** *** *** *** public functions *** *** *** *** *** *** */
688 /* *** *** *** ******************************************** *** *** *** */
690 cu_mount_t *cu_mount_getlist(cu_mount_t **list)
693 cu_mount_t *first = NULL;
694 cu_mount_t *last = NULL;
703 while (last->next != NULL)
707 #if HAVE_LISTMNTENT && 0
708 new = cu_mount_listmntent ();
709 #elif HAVE_GETVFSSTAT || HAVE_GETFSSTAT
710 new = cu_mount_getfsstat ();
711 #elif HAVE_TWO_GETMNTENT || HAVE_GEN_GETMNTENT || HAVE_SUN_GETMNTENT
712 new = cu_mount_gen_getmntent ();
713 #elif HAVE_SEQ_GETMNTENT
714 # error "This version of `getmntent' hat not yet been implemented!"
715 #elif HAVE_ONE_GETMNTENT
716 new = cu_mount_getmntent ();
718 # error "Could not determine how to find mountpoints."
732 while ((last != NULL) && (last->next != NULL))
736 } /* cu_mount_t *cu_mount_getlist(cu_mount_t **list) */
738 void cu_mount_freelist (cu_mount_t *list)
742 for (cu_mount_t *this = list; this != NULL; this = next)
747 sfree (this->spec_device);
748 sfree (this->device);
750 sfree (this->options);
753 } /* void cu_mount_freelist(cu_mount_t *list) */
756 cu_mount_checkoption(char *line, const char *keyword, int full)
758 char *line2, *l2, *p1, *p2;
761 if(line == NULL || keyword == NULL) {
769 line2 = sstrdup(line);
780 p2 = strchr(line, ',');
782 if(strncmp(line2+(p1-line)+1, keyword, l+full) == 0) {
788 p2 = strchr(p1+1, ',');
794 } /* char *cu_mount_checkoption(char *line, char *keyword, int full) */
797 cu_mount_getoptionvalue(char *line, const char *keyword)
801 r = cu_mount_checkoption(line, keyword, 0);
804 r += strlen(keyword);
814 sstrncpy(m, r, p-r+1);
819 } /* char *cu_mount_getoptionvalue(char *line, const char *keyword) */
822 cu_mount_type(const char *type)
824 if(strcmp(type, "ext3") == 0) return CUMT_EXT3;
825 if(strcmp(type, "ext2") == 0) return CUMT_EXT2;
826 if(strcmp(type, "ufs") == 0) return CUMT_UFS;
827 if(strcmp(type, "vxfs") == 0) return CUMT_VXFS;
828 if(strcmp(type, "zfs") == 0) return CUMT_ZFS;
830 } /* int cu_mount_type(const char *type) */