(__getmntent_r): Explicitly lock stream. Use fgets_unlocked.
[kopensolaris-gnu/glibc.git] / misc / mntent_r.c
1 /* Utilities for reading/writing fstab, mtab, etc.
2    Copyright (C) 1995, 1996, 1997, 1998 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Library General Public License as
7    published by the Free Software Foundation; either version 2 of the
8    License, or (at your option) any later version.
9
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Library General Public License for more details.
14
15    You should have received a copy of the GNU Library General Public
16    License along with the GNU C Library; see the file COPYING.LIB.  If not,
17    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18    Boston, MA 02111-1307, USA.  */
19
20 #include <mntent.h>
21 #include <stdio.h>
22 #include <string.h>
23 #include <sys/types.h>
24
25 /* Prepare to begin reading and/or writing mount table entries from the
26    beginning of FILE.  MODE is as for `fopen'.  */
27 FILE *
28 __setmntent (const char *file, const char *mode)
29 {
30   return fopen (file, mode);
31 }
32 weak_alias (__setmntent, setmntent)
33
34
35 /* Close a stream opened with `setmntent'.  */
36 int
37 __endmntent (FILE *stream)
38 {
39   if (stream)           /* SunOS 4.x allows for NULL stream */
40     fclose (stream);
41   return 1;             /* SunOS 4.x says to always return 1 */
42 }
43 weak_alias (__endmntent, endmntent)
44
45
46 /* Read one mount table entry from STREAM.  Returns a pointer to storage
47    reused on the next call, or null for EOF or error (use feof/ferror to
48    check).  */
49 struct mntent *
50 __getmntent_r (FILE *stream, struct mntent *mp, char *buffer, int bufsiz)
51 {
52   char *head;
53
54   flockfile (stream);
55   do
56     {
57       char *end_ptr;
58
59       if (fgets_unlocked (buffer, bufsiz, stream) == NULL)
60         return NULL;
61
62       end_ptr = strchr (buffer, '\n');
63       if (end_ptr != NULL)      /* chop newline */
64         *end_ptr = '\0';
65       else
66         {
67           /* Not the whole line was read.  Do it now but forget it.  */
68           char tmp[1024];
69           while (fgets_unlocked (tmp, sizeof tmp, stream) != NULL)
70             if (strchr (tmp, '\n') != NULL)
71               break;
72         }
73
74       head = buffer + strspn (buffer, " \t");
75       /* skip empty lines and comment lines:  */
76     } while (head[0] == '\0' || head[0] == '#');
77
78   mp->mnt_fsname = __strsep (&head, " \t") ?: (char *) "";
79   if (head)
80     head += strspn (head, " \t");
81   mp->mnt_dir = __strsep (&head, " \t") ?: (char *) "";
82   if (head)
83     head += strspn (head, " \t");
84   mp->mnt_type = __strsep (&head, " \t") ?: (char *) "";
85   if (head)
86     head += strspn (head, " \t");
87   mp->mnt_opts = __strsep (&head, " \t") ?: (char *) "";
88   switch (head ? sscanf (head, " %d %d ", &mp->mnt_freq, &mp->mnt_passno) : 0)
89     {
90     case 0:
91       mp->mnt_freq = 0;
92     case 1:
93       mp->mnt_passno = 0;
94     case 2:
95     }
96   funlockfile (stream);
97
98   return mp;
99 }
100 weak_alias (__getmntent_r, getmntent_r)
101
102 /* Write the mount table entry described by MNT to STREAM.
103    Return zero on success, nonzero on failure.  */
104 int
105 __addmntent (FILE *stream, const struct mntent *mnt)
106 {
107   if (fseek (stream, 0, SEEK_END))
108     return 1;
109
110   return (fprintf (stream, "%s %s %s %s %d %d\n",
111                    mnt->mnt_fsname,
112                    mnt->mnt_dir,
113                    mnt->mnt_type,
114                    mnt->mnt_opts,
115                    mnt->mnt_freq,
116                    mnt->mnt_passno)
117           < 0 ? 1 : 0);
118 }
119 weak_alias (__addmntent, addmntent)
120
121
122 /* Search MNT->mnt_opts for an option matching OPT.
123    Returns the address of the substring, or null if none found.  */
124 char *
125 __hasmntopt (const struct mntent *mnt, const char *opt)
126 {
127   const size_t optlen = strlen (opt);
128   char *rest = mnt->mnt_opts, *p;
129
130   while ((p = strstr (rest, opt)) != NULL)
131     {
132       if (p == rest || p[-1] == ',' &&
133           (p[optlen] == '\0' ||
134            p[optlen] == '=' ||
135            p[optlen] == ','))
136         return p;
137
138       rest = strchr (rest, ',');
139       if (rest == NULL)
140         break;
141       ++rest;
142     }
143
144   return NULL;
145 }
146 weak_alias (__hasmntopt, hasmntopt)