sys/common/shmsys.c

	shmsys.c revision 5d54f3d8999eac1762fe0a8c7177d20f1f201fae
/*
 * 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 1991 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*      Copyright (c) 1984 AT&T */
/*        All Rights Reserved   */

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

#include    <syscall.h>
#include    <stdarg.h>
#include    <sys/types.h>
#include    <sys/ipc.h>
#include    <sys/shm.h>
#include    <errno.h>


/* shmsys dispatch argument */
#define SHMAT   0
#define SHMCTL  1
#define SHMDT   2
#define SHMGET  3

struct shmid_sv {
    struct ipc_perm shm_perm;
    int     shm_segsz;
    struct anon_map *shm_amp;
    unsigned short  shm_lkcnt;
    char        pad[2];
    short       shm_lpid;
    short       shm_cpid;
    unsigned short  shm_nattch;
    unsigned short  shm_cnattch;
    time_t      shm_atime;
    time_t      shm_dtime;
    time_t      shm_ctime;
};


char *
shmat(int shmid, char *shmaddr, int shmflg)
{
    return ((char *)_syscall(SYS_shmsys, SHMAT, shmid, shmaddr, shmflg));
}

int
shmctl(int shmid, int cmd, struct shmid_ds *buf)
{
    struct shmid_sv n_buf;
    int ret;

    if (buf == (struct shmid_ds *)-1) {
        errno = EFAULT;
        return (-1);
    }

    if (buf == 0) {
        ret = _syscall(SYS_shmsys, SHMCTL, shmid, cmd, 0);
    } else {
        n_buf.shm_perm = buf->shm_perm;
        n_buf.shm_segsz = buf->shm_segsz;
        n_buf.shm_amp = buf->shm_amp;
        n_buf.shm_lpid = buf->shm_lpid;
        n_buf.shm_cpid = buf->shm_cpid;
        n_buf.shm_nattch = buf->shm_nattch;
        n_buf.shm_atime = buf->shm_atime;
        n_buf.shm_dtime = buf->shm_dtime;
        n_buf.shm_ctime = buf->shm_ctime;
        n_buf.shm_lkcnt = 0;
        n_buf.shm_cnattch = 0;

        ret = _syscall(SYS_shmsys, SHMCTL, shmid, cmd, &n_buf);

        buf->shm_perm = n_buf.shm_perm;
        buf->shm_segsz = n_buf.shm_segsz;
        buf->shm_amp = n_buf.shm_amp;
        buf->shm_lpid = n_buf.shm_lpid;
        buf->shm_cpid = n_buf.shm_cpid;
        buf->shm_nattch = n_buf.shm_nattch;
        buf->shm_atime = n_buf.shm_atime;
        buf->shm_dtime = n_buf.shm_dtime;
        buf->shm_ctime = n_buf.shm_ctime;
    }

    return (ret);
}

int
shmdt(char *shmaddr)
{

    return (_syscall(SYS_shmsys, SHMDT, shmaddr));
}

int
shmget(key_t key, int size, int shmflg)
{
    return (_syscall(SYS_shmsys, SHMGET, key, size, shmflg));
}

int
shmsys(int sysnum, ...)
{
        va_list ap;
    int shmid, shmflg, cmd, size;
    char *shmaddr;
    struct shmid_ds *buf;
    key_t key;

    va_start(ap, sysnum);
    switch (sysnum) {
    case SHMAT:
            shmid=va_arg(ap, int);
            shmaddr=va_arg(ap, char *);
            shmflg=va_arg(ap, int);
            va_end(ap);
            return ((int)shmat(shmid, shmaddr, shmflg));
    case SHMCTL:
            shmid=va_arg(ap, int);
            cmd=va_arg(ap, int);
            buf=va_arg(ap, struct shmid_ds *);
            va_end(ap);
            return (shmctl(shmid, cmd, buf));
    case SHMDT:
            shmaddr=va_arg(ap, char *);
            va_end(ap);
            return (shmdt(shmaddr));
    case SHMGET:
            key=va_arg(ap, key_t);
            size=va_arg(ap, int);
            shmflg=va_arg(ap, int);
            va_end(ap);
            return (shmget(key, size, shmflg));
    }
    va_end(ap);
    return (-1);
}