files/common/getservent.c

/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (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 (c) 1991, 2011, Oracle and/or its affiliates. All rights reserved.
 *
 * files/getservent.c -- "files" backend for nsswitch "services" database
 */

#include <netdb.h>
#include "files_common.h"
#include <sys/types.h>
#include <netinet/in.h>
#include <inttypes.h>
#include <strings.h>
#include <ctype.h>
#include <stdlib.h>

static int
check_name(nss_XbyY_args_t *argp, const char *line, int linelen)
{
    const char  *limit, *linep, *keyp;
    int     name_match = 0;

    linep = line;
    limit = line + linelen;
    keyp = argp->key.serv.serv.name;

    /* compare name */
    while (*keyp && linep < limit && !isspace(*linep) && *keyp == *linep) {
        keyp++;
        linep++;
    }
    if (*keyp == '\0' && linep < limit && isspace(*linep)) {
        if (argp->key.serv.proto == NULL)
            return (1);
        else
            name_match = 1;
    }

    /* skip remainder of the name, if any */
    while (linep < limit && !isspace(*linep))
        linep++;
    /* skip the delimiting spaces */
    while (linep < limit && isspace(*linep))
        linep++;
    /* skip port number */
    while (linep < limit && !isspace(*linep) && *linep != '/')
        linep++;
    if (linep == limit || *linep != '/')
        return (0);

    linep++;
    if ((keyp = argp->key.serv.proto) == NULL) {
        /* skip protocol */
        while (linep < limit && !isspace(*linep))
            linep++;
    } else {
        /* compare protocol */
        while (*keyp && linep < limit && !isspace(*linep) &&
            *keyp == *linep) {
            keyp++;
            linep++;
        }
        /* no protocol match */
        if (*keyp || (linep < limit && !isspace(*linep)))
            return (0);
        /* protocol and name match, return */
        if (name_match)
            return (1);
        /* protocol match but name yet to be matched, so continue */
    }

    /* compare with the aliases */
    while (linep < limit) {
        /* skip the delimiting spaces */
        while (linep < limit && isspace(*linep))
            linep++;

        /* compare with the alias name */
        keyp = argp->key.serv.serv.name;
        while (*keyp && linep < limit && !isspace(*linep) &&
            *keyp == *linep) {
            keyp++;
            linep++;
        }
        if (*keyp == '\0' && (linep == limit || isspace(*linep)))
                return (1);

        /* skip remainder of the alias name, if any */
        while (linep < limit && !isspace(*linep))
            linep++;
    }
    return (0);
}

static nss_status_t
getbyname(be, a)
    files_backend_ptr_t be;
    void            *a;
{
    nss_XbyY_args_t     *argp = (nss_XbyY_args_t *)a;

    return (_nss_files_XY_all(be, argp, 1,
                argp->key.serv.serv.name, check_name));
}

static int
check_port(nss_XbyY_args_t *argp, const char *line, int linelen)
{
    const char  *limit, *linep, *keyp, *numstart;
    int     numlen, s_port;
    char        numbuf[12], *numend;

    linep = line;
    limit = line + linelen;

    /* skip name */
    while (linep < limit && !isspace(*linep))
        linep++;
    /* skip the delimiting spaces */
    while (linep < limit && isspace(*linep))
        linep++;

    /* compare port num */
    numstart = linep;
    while (linep < limit && !isspace(*linep) && *linep != '/')
        linep++;
    if (linep == limit || *linep != '/')
        return (0);
    numlen = linep - numstart;
    if (numlen == 0 || numlen >= sizeof (numbuf))
        return (0);
    (void) memcpy(numbuf, numstart, numlen);
    numbuf[numlen] = '\0';
    s_port = htons((int)strtol(numbuf, &numend, 10));
    if (*numend != '\0')
        return (0);
    if (s_port == argp->key.serv.serv.port) {
        if ((keyp = argp->key.serv.proto) == NULL)
            return (1);
    } else
        return (0);

    /* compare protocol */
    linep++;
    while (*keyp && linep < limit && !isspace(*linep) && *keyp == *linep) {
        keyp++;
        linep++;
    }
    return (*keyp == '\0' && (linep == limit || isspace(*linep)));
}

static nss_status_t
getbyport(be, a)
    files_backend_ptr_t be;
    void            *a;
{
    nss_XbyY_args_t     *argp   = (nss_XbyY_args_t *)a;
    char            portstr[12];

    (void) snprintf(portstr, 12, "%d", ntohs(argp->key.serv.serv.port));
    return (_nss_files_XY_all(be, argp, 1, portstr, check_port));
}

static files_backend_op_t serv_ops[] = {
    _nss_files_destr,
    _nss_files_endent,
    _nss_files_setent,
    _nss_files_getent_netdb,
    getbyname,
    getbyport
};

/*ARGSUSED*/
nss_backend_t *
_nss_files_services_constr(dummy1, dummy2, dummy3)
    const char  *dummy1, *dummy2, *dummy3;
{
    return (_nss_files_constr(serv_ops,
                sizeof (serv_ops) / sizeof (serv_ops[0]),
                _PATH_SERVICES,
                NSS_LINELEN_SERVICES,
                NULL, 0));
}