port/gen/event_port.c

	event_port.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 2004 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

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

#pragma weak port_create = _port_create
#pragma weak port_associate = _port_associate
#pragma weak port_dissociate = _port_dissociate
#pragma weak port_send = _port_send
#pragma weak port_sendn = _port_sendn
#pragma weak port_get = _port_get
#pragma weak port_getn = _port_getn
#pragma weak port_alert = _port_alert
#pragma weak port_dispatch = _port_dispatch

#include "lint.h"
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <unistd.h>
#include <sys/port_impl.h>
#include <errno.h>
#include <stdlib.h>
#include <sys/systm.h>
#include <libc.h>

/*
 * The second argument of _portfs(PORT_CREATE, 0,,,) represents the version
 * number of the event ports framework. The version number is required to
 * identify possible changes/extensions of the port_event_t structure. If an
 * extension is required the port_create() function will be mapped to a second
 * library create function like port_create_v1(PORT_CREATE, VERSION,,,)
 * VERSION will be a number > 0.
 * As long as such an extension is not required the second argument will be
 * set to 0 and no check will be done in the kernel interface.
 */
int
_port_create()
{
    rval_t  r;
    r.r_vals = _portfs(PORT_CREATE | PORT_SYS_NOPORT, 0, 0, 0, 0, 0);
    return (r.r_val1);
}

int
_port_associate(int port, int source, uintptr_t object, int events, void *user)
{
    rval_t  r;
    r.r_vals = _portfs(PORT_ASSOCIATE, port, source, object, events,
        (uintptr_t)user);
    return (r.r_val1);
}


int
_port_get(int port, port_event_t *pe, struct timespec *to)
{
    rval_t  r;
    if (to)
        r.r_vals = _portfs(PORT_GET, port, (uintptr_t)pe, to->tv_sec,
            to->tv_nsec, (uintptr_t)to);
    else
        r.r_vals = _portfs(PORT_GET, port, (uintptr_t)pe, 0, 0, NULL);
    return (r.r_val1);
}

int
_port_getn(int port, port_event_t list[], uint_t max, uint_t *nget,
    struct timespec *timeout)
{
    rval_t  r;
    if (nget == NULL) {
        errno = EINVAL;
        return (-1);
    }
    r.r_vals = _portfs(PORT_GETN, port, (uintptr_t)list, max, *nget,
        (uintptr_t)timeout);
    if (r.r_val1 == -1) {
        /* global error, errno is already set */
        return (-1);
    }
    *nget = r.r_val1;
    if (r.r_val2 == ETIME) {
        errno = ETIME;
        return (-1);
    }
    return (r.r_val2);
}

int
_port_dissociate(int port, int source, uintptr_t object)
{
    rval_t  r;
    r.r_vals = _portfs(PORT_DISSOCIATE, port, source, object, 0, 0);
    return (r.r_val1);
}

int
_port_send(int port, int events, void *user)
{
    rval_t  r;
    r.r_vals = _portfs(PORT_SEND, port, events, (uintptr_t)user, NULL,
        NULL);
    return (r.r_val1);
}

/*
 * port_dispatch() will block if there are not resources available to
 * satisfy the request.
 */

int
_port_dispatch(int port, int flags, int source, int events, uintptr_t object,
    void *user)
{
    rval_t  r;
    if (flags & PORT_SHARE_EVENT)
        r.r_vals = _portfs(PORT_DISPATCH, port, source, events, object,
            (uintptr_t)user);
    else
        r.r_vals = _portfs(PORT_DISPATCH | PORT_SYS_NOSHARE, port,
            source, events, object, (uintptr_t)user);
    return (r.r_val1);
}

int
_port_sendn(int ports[], int errors[], uint_t nent, int events, void *user)
{
    rval_t  r;
    uint_t  offset;
    uint_t  lnent;
    uint_t  nevents;
    if (nent <= PORT_MAX_LIST) {
        r.r_vals = _portfs(PORT_SENDN | PORT_SYS_NOPORT,
            (uintptr_t)ports, (uintptr_t)errors, nent, events,
            (uintptr_t)user);
        return (r.r_val1);
    }

    /* use chunks of max PORT_MAX_LIST elements per syscall */
    nevents = 0;
    for (offset = 0; offset < nent; ) {
        lnent = nent - offset;
        if (nent - offset > PORT_MAX_LIST)
            lnent = PORT_MAX_LIST;
        else
            lnent = nent - offset;
        r.r_vals = _portfs(PORT_SENDN | PORT_SYS_NOPORT,
            (uintptr_t)&ports[offset], (uintptr_t)&errors[offset],
            lnent, events, (uintptr_t)user);
        if (r.r_val2 == -1) {
            /* global error, return last no of events submitted */
            if (nevents)
                return (nevents);
            return (-1);
        }
        nevents += r.r_val1;
        offset += lnent;
    }
    /* list submitted */
    return (nevents);
}

int
_port_alert(int port, int flags, int events, void *user)
{
    rval_t  r;
    r.r_vals = _portfs(PORT_ALERT, port, flags, events, (uintptr_t)user,
        NULL);
    return (r.r_val1);
}