1/* 2 * rmnt.c -- readmnt() function for lsof library 3 */ 4 5 6/* 7 * Copyright 1997 Purdue Research Foundation, West Lafayette, Indiana 8 * 47907. All rights reserved. 9 * 10 * Written by Victor A. Abell 11 * 12 * This software is not subject to any license of the American Telephone 13 * and Telegraph Company or the Regents of the University of California. 14 * 15 * Permission is granted to anyone to use this software for any purpose on 16 * any computer system, and to alter it and redistribute it freely, subject 17 * to the following restrictions: 18 * 19 * 1. Neither the authors nor Purdue University are responsible for any 20 * consequences of the use of this software. 21 * 22 * 2. The origin of this software must not be misrepresented, either by 23 * explicit claim or by omission. Credit to the authors and Purdue 24 * University must appear in documentation and sources. 25 * 26 * 3. Altered versions must be plainly marked as such, and must not be 27 * misrepresented as being the original software. 28 * 29 * 4. This notice may not be removed or altered. 30 */ 31 32 33#include "../machine.h" 34 35#if defined(USE_LIB_READMNT) 36 37# if !defined(lint) 38static char copyright[] = 39"@(#) Copyright 1997 Purdue Research Foundation.\nAll rights reserved.\n"; 40static char *rcsid = "$Id: rmnt.c,v 1.12 2008/10/21 16:13:23 abe Exp $"; 41# endif /* !defined(lint) */ 42 43#include "../lsof.h" 44 45 46 47/* 48 * The caller may define: 49 * 50 * 1. An RMNT_EXPDEV macro to expand (ala EP/IX) device numbers; 51 * 52 * EP/IX, for example, uses: 53 * 54 * #define RMNT_EXPDEV(n) expdev(n) 55 * 56 * 2. A custom macro, MNTSKIP, for making decisions to skip entries 57 * -- e.g., ones whose mnt_type is MNTTYPE_IGNORE. 58 * 59 * 3. RMNT_FSTYPE to specify the member name of the character string of the 60 * mntent structure containing the file system type, and MOUNTS_FSTYPE to 61 * specify the member name of the character string pointer of the local 62 * mounts structure where RMNT_FSTYPE is to be copied. 63 * 64 * 4. RMNT_STAT_FSTYPE to specify the member name of the stat structure 65 * containing an integer file system type, and MOUNTS_STAT_FSTYPE to 66 * specify the member name of the integer in the local mounts structure 67 * where RMNT_STAT_FSTYPE is to be copied. 68 * 69 */ 70 71#if !defined(RMNT_EXPDEV) 72#define RMNT_EXPDEV(n) n 73#endif /* !defined(RMNT_EXPDEV) */ 74 75 76/* 77 * Local static definitions 78 */ 79 80static struct mounts *Lmi = (struct mounts *)NULL; /* local mount info */ 81static int Lmist = 0; /* Lmi status */ 82 83 84/* 85 * readmnt() - read mount table 86 */ 87 88struct mounts * 89readmnt() 90{ 91 char *dn = (char *)NULL; 92 char *ln; 93 FILE *mfp; 94 struct mntent *mp; 95 struct mounts *mtp; 96 char *opt, *opte; 97 struct stat sb; 98 99 if (Lmi || Lmist) 100 return(Lmi); 101/* 102 * Open access to the mount table. 103 */ 104 if (!(mfp = setmntent(MOUNTED, "r"))) { 105 (void) fprintf(stderr, "%s: can't access %s\n", Pn, MOUNTED); 106 Exit(1); 107 } 108/* 109 * Read mount table entries. 110 */ 111 while ((mp = getmntent(mfp))) { 112 113#if defined(MNTSKIP) 114 /* 115 * Specfy in the MNTSKIP macro the decisions needed to determine 116 * that this entry should be skipped. 117 * 118 * Typically entries whose mnt_type is MNTTYPE_IGNORE are skipped. 119 * 120 * The MNTSKIP macro allows the caller to use other tests. 121 */ 122 MNTSKIP 123#endif /* MNTSKIP */ 124 125 /* 126 * Interpolate a possible symbolic directory link. 127 */ 128 if (dn) 129 (void) free((FREE_P *)dn); 130 if (!(dn = mkstrcpy(mp->mnt_dir, (MALLOC_S *)NULL))) 131 goto no_space_for_mount; 132 if (!(ln = Readlink(dn))) { 133 if (!Fwarn) 134 (void) fprintf(stderr, 135 " Output information may be incomplete.\n"); 136 continue; 137 } 138 if (ln != dn) { 139 (void) free((FREE_P *)dn); 140 dn = ln; 141 } 142 if (*dn != '/') 143 continue; 144 /* 145 * Stat() the directory. 146 */ 147 if (statsafely(dn, &sb)) { 148 if (!Fwarn) { 149 (void) fprintf(stderr, "%s: WARNING: can't stat() ", Pn); 150 safestrprt(mp->mnt_type, stderr, 0); 151 (void) fprintf(stderr, " file system "); 152 safestrprt(mp->mnt_dir, stderr, 1); 153 (void) fprintf(stderr, 154 " Output information may be incomplete.\n"); 155 } 156 if ((opt = strstr(mp->mnt_opts, "dev="))) { 157 (void) zeromem(&sb, sizeof(sb)); 158 if ((opte = x2dev(opt + 4, (dev_t *)&sb.st_dev))) { 159 sb.st_mode = S_IFDIR | 0777; 160 if (!Fwarn) 161 (void) fprintf(stderr, 162 " assuming \"%.*s\" from %s\n", 163 (int)(opte - opt), opt, MOUNTED); 164 } else 165 opt = (char *)NULL; 166 } 167 if (!opt) 168 continue; 169 } 170 /* 171 * Allocate and fill a local mounts structure with the directory 172 * (mounted) information. 173 */ 174 if (!(mtp = (struct mounts *)malloc(sizeof(struct mounts)))) { 175 176no_space_for_mount: 177 178 (void) fprintf(stderr, "%s: no space for mount at ", Pn); 179 safestrprt(mp->mnt_fsname, stderr, 0); 180 (void) fprintf(stderr, " ("); 181 safestrprt(mp->mnt_dir, stderr, 0); 182 (void) fprintf(stderr, ")\n"); 183 Exit(1); 184 } 185 mtp->dir = dn; 186 dn = (char *)NULL; 187 mtp->next = Lmi; 188 mtp->dev = RMNT_EXPDEV(sb.st_dev); 189 mtp->rdev = RMNT_EXPDEV(sb.st_rdev); 190 mtp->inode = (INODETYPE)sb.st_ino; 191 mtp->mode = sb.st_mode; 192 193# if defined(RMNT_FSTYPE) && defined(MOUNTS_FSTYPE) 194 /* 195 * Make a copy of RMNT_FSTYPE in MOUNTS_FSTYPE. 196 */ 197 if (!(mtp->MOUNTS_FSTYPE = mkstrcpy(mp->RMNT_FSTYPE, 198 (MALLOC_S *)NULL))) 199 { 200 (void) fprintf(stderr, "%s: no space for fstype (%s): %s\n", 201 Pn, mtp->dir, mp->RMNT_FSTYPE); 202 Exit(1); 203 } 204 (void) strcpy(mtp->MOUNTS_FSTYPE, mp->RMNT_FSTYPE); 205# endif /* defined(RMNT_FSTYP) && defined(MOUNTS_FSTYP) */ 206 207# if defined(RMNT_STAT_FSTYPE) && defined(MOUNTS_STAT_FSTYPE) 208 /* 209 * Make a copy of RMNT_STAT_FSTYPE in MOUNTS_STAT_FSTYPE. 210 */ 211 mtp->MOUNTS_STAT_FSTYPE = (int)sb.RMNT_STAT_FSTYPE; 212# endif /* defined(RMNT_STAT_FSTYP) && defined(MOUNTS_STAT_FSTYP) */ 213 214 /* 215 * Interpolate a possible file system (mounted-on device) name link. 216 */ 217 if (!(dn = mkstrcpy(mp->mnt_fsname, (MALLOC_S *)NULL))) 218 goto no_space_for_mount; 219 mtp->fsname = dn; 220 ln = Readlink(dn); 221 dn = (char *)NULL; 222 /* 223 * Stat() the file system (mounted-on) name and add file system 224 * information to the local mounts structure. 225 */ 226 if (!ln || statsafely(ln, &sb)) 227 sb.st_mode = 0; 228 mtp->fsnmres = ln; 229 mtp->fs_mode = sb.st_mode; 230 Lmi = mtp; 231 } 232 (void) endmntent(mfp); 233/* 234 * Clean up and return the local nount info table address. 235 */ 236 if (dn) 237 (void) free((FREE_P *)dn); 238 Lmist = 1; 239 return(Lmi); 240} 241#else /* !defined(USE_LIB_READMNT) */ 242char rmnt_d1[] = "d"; char *rmnt_d2 = rmnt_d1; 243#endif /* defined(USE_LIB_READMNT) */ 244