3 // ----------------------------------------------------------------------------
4 // taken from gnulib/mountlist.c
7 /* A file system is "remote" if its Fs_name contains a ':'
8 or if (it is of type (smbfs or cifs) and its Fs_name starts with '//')
9 or Fs_name is equal to "-hosts" (used by autofs to mount remote fs). */
10 # define ME_REMOTE(Fs_name, Fs_type) \
11 (strchr (Fs_name, ':') != NULL \
12 || ((Fs_name)[0] == '/' \
13 && (Fs_name)[1] == '/' \
14 && (strcmp (Fs_type, "smbfs") == 0 \
15 || strcmp (Fs_type, "cifs") == 0)) \
16 || (strcmp("-hosts", Fs_name) == 0))
19 #define ME_DUMMY_0(Fs_name, Fs_type) \
20 (strcmp (Fs_type, "autofs") == 0 \
21 || strcmp (Fs_type, "proc") == 0 \
22 || strcmp (Fs_type, "subfs") == 0 \
23 /* for Linux 2.6/3.x */ \
24 || strcmp (Fs_type, "debugfs") == 0 \
25 || strcmp (Fs_type, "devpts") == 0 \
26 || strcmp (Fs_type, "fusectl") == 0 \
27 || strcmp (Fs_type, "mqueue") == 0 \
28 || strcmp (Fs_type, "rpc_pipefs") == 0 \
29 || strcmp (Fs_type, "sysfs") == 0 \
30 /* FreeBSD, Linux 2.4 */ \
31 || strcmp (Fs_type, "devfs") == 0 \
32 /* for NetBSD 3.0 */ \
33 || strcmp (Fs_type, "kernfs") == 0 \
35 || strcmp (Fs_type, "ignore") == 0)
37 /* Historically, we have marked as "dummy" any file system of type "none",
38 but now that programs like du need to know about bind-mounted directories,
39 we grant an exception to any with "bind" in its list of mount options.
40 I.e., those are *not* dummy entries. */
41 # define ME_DUMMY(Fs_name, Fs_type) \
42 (ME_DUMMY_0 (Fs_name, Fs_type) || strcmp (Fs_type, "none") == 0)
44 // ----------------------------------------------------------------------------
46 // find the mount info with the given major:minor
47 // in the supplied linked list of mountinfo structures
48 struct mountinfo *mountinfo_find(struct mountinfo *root, unsigned long major, unsigned long minor) {
51 for(mi = root; mi ; mi = mi->next)
52 if(unlikely(mi->major == major && mi->minor == minor))
58 // find the mount info with the given filesystem and mount_source
59 // in the supplied linked list of mountinfo structures
60 struct mountinfo *mountinfo_find_by_filesystem_mount_source(struct mountinfo *root, const char *filesystem, const char *mount_source) {
62 uint32_t filesystem_hash = simple_hash(filesystem), mount_source_hash = simple_hash(mount_source);
64 for(mi = root; mi ; mi = mi->next)
65 if(unlikely(mi->filesystem
67 && mi->filesystem_hash == filesystem_hash
68 && mi->mount_source_hash == mount_source_hash
69 && !strcmp(mi->filesystem, filesystem)
70 && !strcmp(mi->mount_source, mount_source)))
76 struct mountinfo *mountinfo_find_by_filesystem_super_option(struct mountinfo *root, const char *filesystem, const char *super_options) {
78 uint32_t filesystem_hash = simple_hash(filesystem);
80 size_t solen = strlen(super_options);
82 for(mi = root; mi ; mi = mi->next)
83 if(unlikely(mi->filesystem
85 && mi->filesystem_hash == filesystem_hash
86 && !strcmp(mi->filesystem, filesystem))) {
88 // super_options is a comma separated list
89 char *s = mi->super_options, *e;
92 while(*e && *e != ',') e++;
95 if(unlikely(len == solen && !strncmp(s, super_options, len)))
98 if(*e == ',') s = ++e;
107 // free a linked list of mountinfo structures
108 void mountinfo_free(struct mountinfo *mi) {
113 mountinfo_free(mi->next);
116 freez(mi->mount_point);
117 freez(mi->mount_options);
118 freez(mi->persistent_id);
121 if(mi->optional_fields_count) {
123 for(i = 0; i < mi->optional_fields_count ; i++)
124 free(*mi->optional_fields[i]);
126 free(mi->optional_fields);
128 freez(mi->filesystem);
129 freez(mi->mount_source);
130 freez(mi->super_options);
134 static char *strdupz_decoding_octal(const char *string) {
135 char *buffer = strdupz(string);
138 const char *s = string;
141 if(unlikely(*s == '\\')) {
143 if(likely(isdigit(*s) && isdigit(s[1]) && isdigit(s[2]))) {
160 static inline int is_read_only(const char *s) {
163 size_t len = strlen(s);
164 if(len < 2) return 0;
166 if(!strcmp(s, "ro")) return 1;
169 if(!strncmp(s, "ro,", 3)) return 1;
170 if(!strncmp(&s[len - 3], ",ro", 3)) return 1;
171 if(strstr(s, ",ro,")) return 1;
175 // read the whole mountinfo into a linked list
176 struct mountinfo *mountinfo_read(int do_statvfs) {
177 char filename[FILENAME_MAX + 1];
178 snprintfz(filename, FILENAME_MAX, "%s/proc/self/mountinfo", global_host_prefix);
179 procfile *ff = procfile_open(filename, " \t", PROCFILE_FLAG_DEFAULT);
181 snprintfz(filename, FILENAME_MAX, "%s/proc/1/mountinfo", global_host_prefix);
182 ff = procfile_open(filename, " \t", PROCFILE_FLAG_DEFAULT);
183 if(unlikely(!ff)) return NULL;
186 ff = procfile_readall(ff);
190 struct mountinfo *root = NULL, *last = NULL, *mi = NULL;
192 unsigned long l, lines = procfile_lines(ff);
193 for(l = 0; l < lines ;l++) {
194 if(unlikely(procfile_linewords(ff, l) < 5))
197 mi = mallocz(sizeof(struct mountinfo));
200 mi->id = str2ul(procfile_lineword(ff, l, w)); w++;
201 mi->parentid = str2ul(procfile_lineword(ff, l, w)); w++;
203 char *major = procfile_lineword(ff, l, w), *minor; w++;
204 for(minor = major; *minor && *minor != ':' ;minor++) ;
206 if(unlikely(!*minor)) {
207 error("Cannot parse major:minor on '%s' at line %lu of '%s'", major, l + 1, filename);
217 mi->major = str2ul(major);
218 mi->minor = str2ul(minor);
220 mi->root = strdupz(procfile_lineword(ff, l, w)); w++;
221 mi->root_hash = simple_hash(mi->root);
223 mi->mount_point = strdupz_decoding_octal(procfile_lineword(ff, l, w)); w++;
224 mi->mount_point_hash = simple_hash(mi->mount_point);
226 mi->persistent_id = strdupz(mi->mount_point);
227 netdata_fix_chart_id(mi->persistent_id);
228 mi->persistent_id_hash = simple_hash(mi->persistent_id);
230 mi->mount_options = strdupz(procfile_lineword(ff, l, w)); w++;
232 if(unlikely(is_read_only(mi->mount_options)))
233 mi->flags |= MOUNTINFO_READONLY;
235 // count the optional fields
237 unsigned long wo = w;
239 mi->optional_fields_count = 0;
240 char *s = procfile_lineword(ff, l, w);
241 while(*s && *s != '-') {
243 s = procfile_lineword(ff, l, w);
244 mi->optional_fields_count++;
248 if(unlikely(mi->optional_fields_count)) {
249 // we have some optional fields
250 // read them into a new array of pointers;
252 mi->optional_fields = mallocz(mi->optional_fields_count * sizeof(char *));
255 for(i = 0; i < mi->optional_fields_count ; i++) {
256 *mi->optional_fields[wo] = strdupz(procfile_lineword(ff, l, w));
261 mi->optional_fields = NULL;
264 if(likely(*s == '-')) {
267 mi->filesystem = strdupz(procfile_lineword(ff, l, w)); w++;
268 mi->filesystem_hash = simple_hash(mi->filesystem);
270 mi->mount_source = strdupz_decoding_octal(procfile_lineword(ff, l, w)); w++;
271 mi->mount_source_hash = simple_hash(mi->mount_source);
273 mi->super_options = strdupz(procfile_lineword(ff, l, w)); w++;
275 if(unlikely(is_read_only(mi->super_options)))
276 mi->flags |= MOUNTINFO_READONLY;
278 if(unlikely(ME_DUMMY(mi->mount_source, mi->filesystem)))
279 mi->flags |= MOUNTINFO_IS_DUMMY;
281 if(unlikely(ME_REMOTE(mi->mount_source, mi->filesystem)))
282 mi->flags |= MOUNTINFO_IS_REMOTE;
284 // mark as BIND the duplicates (i.e. same filesystem + same source)
287 if(unlikely(stat(mi->mount_point, &buf) == -1)) {
289 mi->flags |= MOUNTINFO_NO_STAT;
292 mi->st_dev = buf.st_dev;
294 struct mountinfo *mt;
295 for(mt = root; mt; mt = mt->next) {
296 if(unlikely(mt->st_dev == mi->st_dev && !(mi->flags & MOUNTINFO_NO_STAT))) {
297 if(strlen(mi->mount_point) < strlen(mt->mount_point))
298 mt->flags |= MOUNTINFO_IS_SAME_DEV;
300 mi->flags |= MOUNTINFO_IS_SAME_DEV;
310 mi->filesystem = NULL;
311 mi->filesystem_hash = 0;
313 mi->mount_source = NULL;
314 mi->mount_source_hash = 0;
316 mi->super_options = NULL;
321 // check if it has size
323 struct statvfs buff_statvfs;
324 if(unlikely(statvfs(mi->mount_point, &buff_statvfs) < 0)) {
325 mi->flags |= MOUNTINFO_NO_STAT;
327 else if(unlikely(!buff_statvfs.f_blocks /* || !buff_statvfs.f_files */)) {
328 mi->flags |= MOUNTINFO_NO_SIZE;
342 #ifdef NETDATA_INTERNAL_CHECKS
343 fprintf(stderr, "MOUNTINFO: %ld %ld %lu:%lu root '%s', persistent id '%s', mount point '%s', mount options '%s', filesystem '%s', mount source '%s', super options '%s'%s%s%s%s%s%s\n",
350 (mi->mount_point)?mi->mount_point:"",
351 (mi->mount_options)?mi->mount_options:"",
352 (mi->filesystem)?mi->filesystem:"",
353 (mi->mount_source)?mi->mount_source:"",
354 (mi->super_options)?mi->super_options:"",
355 (mi->flags & MOUNTINFO_IS_DUMMY)?" DUMMY":"",
356 (mi->flags & MOUNTINFO_IS_BIND)?" BIND":"",
357 (mi->flags & MOUNTINFO_IS_REMOTE)?" REMOTE":"",
358 (mi->flags & MOUNTINFO_NO_STAT)?" NOSTAT":"",
359 (mi->flags & MOUNTINFO_NO_SIZE)?" NOSIZE":"",
360 (mi->flags & MOUNTINFO_IS_SAME_DEV)?" SAMEDEV":""
366 /* find if the mount options have "bind" in them
368 FILE *fp = setmntent(MOUNTED, "r");
370 struct mntent mntbuf;
374 while ((mnt = getmntent_r(fp, &mntbuf, buf, 4096))) {
375 char *bind = hasmntopt(mnt, "bind");
377 struct mountinfo *mi;
378 for(mi = root; mi ; mi = mi->next) {
379 if(unlikely(strcmp(mnt->mnt_dir, mi->mount_point) == 0)) {
380 fprintf(stderr, "Mount point '%s' is BIND\n", mi->mount_point);
381 mi->flags |= MOUNTINFO_IS_BIND;
386 #ifdef NETDATA_INTERNAL_CHECKS
388 error("Mount point '%s' not found in /proc/self/mountinfo", mnt->mnt_dir);