cmd/rexd/mntent.c

	mntent.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 *
 * Copyright 1993 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#pragma ident   "%Z%%M% %I% %E% SMI"

#define LOCK_EX     1

#include <stdio.h>
#include <ctype.h>
#include <sys/mntent.h>
#include <sys/mnttab.h>

static  struct mnttab *mntp = 0;

int getmntent(FILE *mnttabp, struct mnttab *mp);
static int mntdigit(char **p);
extern  char    *calloc();

struct mnttab *
_mnt()
{

    if (mntp == 0)
        mntp = (struct mnttab *)calloc(1, sizeof (struct mnttab));
    return (mntp);
}

static char *
mntstr(p)
    register char **p;
{
    char *cp = *p;
    char *retstr;

    while (*cp && isspace(*cp))
        cp++;
    retstr = cp;
    while (*cp && !isspace(*cp))
        cp++;
    if (*cp)
    {
        *cp = '\0';
        cp++;
    }
    *p = cp;
    return (retstr);
}

static int
mntdigit(p)
    register char **p;
{
    register int value = 0;
    char *cp = *p;

    while (*cp && isspace(*cp))
        cp++;
    for (; *cp && isdigit(*cp); cp++)
    {
        value *= 10;
        value += *cp - '0';
    }
    while (*cp && !isspace(*cp))
        cp++;
    if (*cp)
    {
        *cp = '\0';
        cp++;
    }
    *p = cp;
    return (value);
}

static
mnttabscan(mnttabp, mnt)
    FILE *mnttabp;
    struct mnttab *mnt;
{
    static  char *line = NULL;
    char *cp;

    if (line == NULL)
        line = (char *)malloc(BUFSIZ+1);
    do
    {
        cp = fgets(line, 256, mnttabp);
        if (cp == NULL)
        {
            return (EOF);
        }
    } while (*cp == '#');
    mnt->mnt_special = mntstr(&cp);
    if (*cp == '\0')
        return (1);
    mnt->mnt_mountp = mntstr(&cp);
    if (*cp == '\0')
        return (2);
    mnt->mnt_fstype = mntstr(&cp);
    if (*cp == '\0')
        return (3);
    mnt->mnt_mntopts = mntstr(&cp);
    if (*cp == '\0')
        return (4);
    mnt->mnt_time = mntstr(&cp);
    return (5);
}

FILE *
setmntent(fname, flag)
    char *fname;
    char *flag;
{
    FILE *mnttabp;

    if ((mnttabp = fopen(fname, flag)) == NULL)
    {
        return (NULL);
    }
    for (; *flag ; flag++)
    {
        if (*flag == 'w' || *flag == 'a' || *flag == '+')
        {
            if (lockf(fileno(mnttabp), LOCK_EX, 0) < 0)
            {
                fclose(mnttabp);
                return (NULL);
            }
            break;
        }
    }
    return (mnttabp);
}

int
endmntent(mnttabp)
    FILE *mnttabp;
{

    if (mnttabp)
    {
        fclose(mnttabp);
    }
    return (1);
}

/* #ifdef   NOWAY
/* int getmntent (mnttabp, mp)
/*  FILE *mnttabp;
/*  struct mnttab *mp;
/* {
/*  int nfields;
/*
/*  if (mnttabp == 0)
/*      return (-1);
/*
/*  if (_mnt() == 0)
/*      return (-1);
/*
/*  nfields = mnttabscan(mnttabp, mntp);
/*
/*  if (nfields == EOF || nfields != 5)
/*      return (-1);
/*
/*  mp = mntp;
/*
/*  return ( 0 );
/* }
/* #endif
/* */

/* #ifdef   NOWAY
/* struct mnttab *
/* getmntent(mnttabp)
/*  FILE *mnttabp;
/* {
/*  int nfields;
/*
/*  if (mnttabp == 0)
/*      return ((struct mnttab *)0);
/*  if (_mnt() == 0)
/*      return ((struct mnttab *)0);
/*  nfields = mnttabscan(mnttabp, mntp);
/*  if (nfields == EOF || nfields != 5)
/*      return ((struct mnttab *)0);
/*  return (mntp);
/* }
/* #endif
/* */

/* addmntent(mnttabp, mnt)
/*  FILE *mnttabp;
/*  register struct mnttab *mnt;
/*
/*  if (fseek(mnttabp, 0L, 2) < 0)
/*      return (1);
/*  if (mnt == (struct mnttab *)0)
/*      return (1);
/*  if (mnt->mnt_special == NULL || mnt->mnt_mountp  == NULL ||
/*      mnt->mnt_fstype   == NULL || mnt->mnt_mntopts == NULL)
/*      return (1);
/*
/*  mntprtent(mnttabp, mnt);
/*  return (0);
/* }
/* */

static
mntprtent(mnttabp, mnt)
    FILE *mnttabp;
    register struct mnttab *mnt;
{
    fprintf(mnttabp, "%s\t%s\t%s\t%s\t%s\n",
        mnt->mnt_special,
        mnt->mnt_mountp,
        mnt->mnt_fstype,
        mnt->mnt_mntopts,
        mnt->mnt_time);
    return(0);
}