.

[gnulib.git] / lib / mountlist.c

diff --git a/lib/mountlist.c b/lib/mountlist.c
index b2ed440..5a6d664 100644 (file)
--- a/lib/mountlist.c
+++ b/lib/mountlist.c
@@ -12,8 +12,8 @@
    GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software
-   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
+   along with this program; if not, write to the Free Software Foundation,
+   Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 
 #ifdef HAVE_CONFIG_H
 #include <config.h>
@@ -80,6 +80,10 @@ void error ();
 #include <sys/statfs.h>
 #endif
 
+#ifdef MOUNTED_LISTMNTENT
+#include <mntent.h>
+#endif
+
 #ifdef MOUNTED_GETMNTENT2      /* SVR4.  */
 #include <sys/mnttab.h>
 #endif
@@ -195,6 +199,36 @@ read_filesystem_list (need_fs_type, all_fs)
   me->me_next = NULL;
   mount_list = mtail = me;
 
+#ifdef MOUNTED_LISTMNTENT
+  {
+    struct tabmntent *mntlist, *p;
+    struct mntent *mnt;
+    struct mount_entry *me;
+    
+    /* the third and fourth arguments could be used to filter mounts,
+       but Crays doesn't seem to have any mounts that we want to
+       remove. Specifically, automount create normal NFS mounts.
+       */
+
+    if(listmntent(&mntlist, KMTAB, NULL, NULL) < 0)
+      return NULL;
+    p = mntlist;
+    while(p){
+      mnt = p->ment;
+      me = (struct mount_entry*) xmalloc(sizeof (struct mount_entry));
+      me->me_devname = xstrdup(mnt->mnt_fsname);
+      me->me_mountdir = xstrdup(mnt->mnt_dir);
+      me->me_type = xstrdup(mnt->mnt_type);
+      me->me_dev = -1;
+      me->me_next = NULL;
+      mtail->me_next = me;
+      mtail = me;
+      p = p->next;
+    }
+    freemntlist(mntlist);
+  }
+#endif
+
 #ifdef MOUNTED_GETMNTENT1      /* 4.3BSD, SunOS, HP-UX, Dynix, Irix.  */
   {
     struct mntent *mnt;
@@ -225,7 +259,7 @@ read_filesystem_list (need_fs_type, all_fs)
              me->me_dev = xatoi (devopt + 4);
          }
        else
-         me->me_dev = -1;      /* Magic; means not known yet. */
+         me->me_dev = (dev_t) -1;      /* Magic; means not known yet. */
        me->me_next = NULL;
 
        /* Add to the linked list. */
@@ -256,7 +290,7 @@ read_filesystem_list (need_fs_type, all_fs)
 #else
        me->me_type = fstype_to_string (fsp->f_type);
 #endif
-       me->me_dev = -1;        /* Magic; means not known yet. */
+       me->me_dev = (dev_t) -1;        /* Magic; means not known yet. */
        me->me_next = NULL;
 
        /* Add to the linked list. */
@@ -317,7 +351,7 @@ read_filesystem_list (need_fs_type, all_fs)
        me->me_devname = xstrdup (stats[counter].f_mntfromname);
        me->me_mountdir = xstrdup (stats[counter].f_mntonname);
        me->me_type = mnt_names[stats[counter].f_type];
-       me->me_dev = -1;        /* Magic; means not known yet. */
+       me->me_dev = (dev_t) -1;        /* Magic; means not known yet. */
        me->me_next = NULL;
 
        /* Add to the linked list. */
@@ -350,7 +384,7 @@ read_filesystem_list (need_fs_type, all_fs)
        strcpy (me->me_devname + 5, mnt.mt_dev);
 #endif
        me->me_mountdir = xstrdup (mnt.mt_filsys);
-       me->me_dev = -1;        /* Magic; means not known yet. */
+       me->me_dev = (dev_t) -1;        /* Magic; means not known yet. */
        me->me_type = "";
 #ifdef GETFSTYP                        /* SVR3.  */
        if (need_fs_type)
@@ -384,7 +418,7 @@ read_filesystem_list (need_fs_type, all_fs)
        me->me_devname = xstrdup ( (*ent)->mt_resource);
        me->me_mountdir = xstrdup( (*ent)->mt_directory);
        me->me_type =  xstrdup ((*ent)->mt_fstype);
-       me->me_dev = -1;        /* Magic; means not known yet. */
+       me->me_dev = (dev_t) -1;        /* Magic; means not known yet. */
        me->me_next = NULL;
 
        /* Add to the linked list. */
@@ -412,7 +446,7 @@ read_filesystem_list (need_fs_type, all_fs)
        me->me_devname = xstrdup (mnt.mnt_special);
        me->me_mountdir = xstrdup (mnt.mnt_mountp);
        me->me_type = xstrdup (mnt.mnt_fstype);
-       me->me_dev = -1;        /* Magic; means not known yet. */
+       me->me_dev = (dev_t) -1;        /* Magic; means not known yet. */
        me->me_next = NULL;
 
        /* Add to the linked list. */
@@ -464,7 +498,7 @@ read_filesystem_list (need_fs_type, all_fs)
          }
        me->me_mountdir = xstrdup (thisent + vmp->vmt_data[VMT_STUB].vmt_off);
        me->me_type = xstrdup (fstype_to_string (vmp->vmt_gfstype));
-       me->me_dev = -1;        /* vmt_fsid might be the info we want.  */
+       me->me_dev = (dev_t) -1; /* vmt_fsid might be the info we want.  */
        me->me_next = NULL;
 
        /* Add to the linked list. */