freebsd-dev/contrib/amd/libamu/mtab.c
2001-09-02 17:19:13 +00:00

178 lines
5.0 KiB
C

/*
* Copyright (c) 1997-2001 Erez Zadok
* Copyright (c) 1989 Jan-Simon Pendry
* Copyright (c) 1989 Imperial College of Science, Technology & Medicine
* Copyright (c) 1989 The Regents of the University of California.
* All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* Jan-Simon Pendry at Imperial College, London.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgment:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
* %W% (Berkeley) %G%
*
* $Id: mtab.c,v 1.3.2.3 2001/04/14 21:08:25 ezk Exp $
*
*/
#ifdef HAVE_CONFIG_H
# include <config.h>
#endif /* HAVE_CONFIG_H */
#include <am_defs.h>
#include <amu.h>
/*
* Firewall /etc/mtab entries
*/
void
mnt_free(mntent_t *mp)
{
XFREE(mp->mnt_fsname);
XFREE(mp->mnt_dir);
XFREE(mp->mnt_type);
XFREE(mp->mnt_opts);
#ifdef HAVE_FIELD_MNTENT_T_MNT_TIME
# ifdef HAVE_FIELD_MNTENT_T_MNT_TIME_STRING
XFREE(mp->mnt_time);
# endif /* HAVE_FIELD_MNTENT_T_MNT_TIME_STRING */
#endif /* HAVE_FIELD_MNTENT_T_MNT_TIME */
XFREE(mp);
}
/*
* Discard memory allocated for mount list
*/
void
discard_mntlist(mntlist *mp)
{
mntlist *mp2;
while ((mp2 = mp)) {
mp = mp->mnext;
if (mp2->mnt)
mnt_free(mp2->mnt);
XFREE(mp2);
}
}
/*
* Throw away a mount list
*/
void
free_mntlist(mntlist *mp)
{
discard_mntlist(mp);
#ifdef MOUNT_TABLE_ON_FILE
unlock_mntlist();
#endif /* MOUNT_TABLE_ON_FILE */
}
/*
* Utility routine which returns a pointer to whatever follows an = in a
* string. Returns null if = is not found in the string.
*/
char *
haseq(char *instr)
{
if (instr) {
char *eq = strchr(instr, '=');
if (eq) return ++eq;
}
return NULL;
}
/*
* Utility routine which returns a pointer to whatever
* follows an = in a mount option. Returns null if option
* doesn't exist or doesn't have an '='. Won't fall for opt,foo=.
*/
char *
hasmnteq(mntent_t *mnt, char *opt)
{
if (mnt && opt) { /* disallow null input pointers */
if ( *opt ) { /* disallow the null string as an opt */
char *str = hasmntopt(mnt, opt);
if ( str ) { /* option was there */
char *eq = str + strlen(opt); /* Look at char just after option */
if (*eq == '=') /* Is it '=' ? */
return ++eq; /* If so, return pointer to remaining str */
}
}
}
return NULL;
}
/*
* Utility routine which determines the value of a
* numeric option in the mount options (such as port=%d).
* Returns 0 if the option is not specified.
*/
int
hasmntval(mntent_t *mnt, char *opt)
{
char *str = hasmntopt(mnt, opt);
if (str) { /* The option was there */
char *eq = hasmnteq(mnt, opt);
if (eq) { /* and had an = after it */
char *endptr = NULL;
long int i = strtol(eq,&endptr,0); /* hex and octal allowed ;-) */
if ( (! endptr) || /* endptr == NULL means all chars valid */
/*
* endptr set means strtol saw a non-digit. If the
* non-digit is a comma, it's probably the start of the next
* option. If the comma is the first char though, complain about
* it (foo=,bar is made noticeable by this).
*/
((endptr == strchr(eq, ',')) && (endptr != eq))
)
return((int) i);
/* whatever was after = wasn't a number */
plog(XLOG_MAP, "invalid numeric option in \"%s\": \"%s\"", opt, str);
} else {
/* No argument to option (= was missing) */
plog(XLOG_MAP, "numeric option to \"%s\" missing", opt);
}
}
return 0;
}