lib/msgs/mgetputm.c

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

/*  Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/*    All Rights Reserved   */


#pragma ident   "%Z%%M% %I% %E% SMI"    /* SVr4.0 1.6   */

# include   <unistd.h>
# include   <errno.h>
# include   <stdlib.h>

#if defined(__STDC__)
# include   <stdarg.h>
#else
# include   <varargs.h>
#endif

# include   "lp.h"
# include   "msgs.h"


/*
**  Size and pointer for mgetm()
*/
static int  MBGSize = 0;
static char *   MBG = NULL;

/*
**  Size and pointer for mputm()
*/
static int  MBPSize = 0;
static char *   MBP = NULL;

int     peek3_2();

#if defined(__STDC__)
int mgetm ( MESG * md, int type, ... )
#else
int mgetm (md, type, va_alist)
    MESG    *md;
    int     type;
    va_dcl
#endif
{
    va_list vp;
    int     ret;
    int     needsize;

#if defined(__STDC__)
    va_start(vp, type);
#else
    va_start(vp);
#endif

    needsize = mpeek(md);
    if (needsize <=0 || needsize > MSGMAX)
    needsize = MSGMAX;
    if (needsize > MBGSize)
    {
    if (MBG)
        Free(MBG);
    if ((MBG = (char *)Malloc(needsize)) == NULL)
    {
        MBGSize = 0;
        MBG = NULL;
        errno = ENOMEM;
        return(-1);
    }
    MBGSize = needsize;
    }
    if (mread(md, MBG, MBGSize) < 0)
    return(-1);

    ret = _getmessage(MBG, type, vp);

    va_end(vp);

    return(ret);
}

#if defined(__STDC__)
int mputm ( MESG * md, int type, ... )
#else
int mputm (md, type, va_alist)
    MESG    *md;
    int     type;
    va_dcl
#endif
{
    va_list vp;
    int     needsize;

#if defined(__STDC__)
    va_start(vp, type);
#else
    va_start(vp);
#endif
    needsize = _putmessage(NULL, type, vp);
    va_end(vp);
    if (needsize <= 0)
    return(-1);

    if (needsize > MBPSize)
    {
    if (MBP)
        Free(MBP);
    if ((MBP = (char *)Malloc(needsize)) == NULL)
    {
        MBPSize = 0;
        MBP = NULL;
        errno = ENOMEM;
        return(-1);
    }
    MBPSize = needsize;
    }

#if defined(__STDC__)
    va_start(vp, type);
#else
    va_start(vp);
#endif
    needsize = _putmessage(MBP, type, vp);
    va_end(vp);
    if (needsize <= 0)
    return(-1);


    return(mwrite(md, MBP));
}

#if defined(__STDC__)
void __mbfree ( void )
#else
void __mbfree ()
#endif
{
    MBGSize = MBPSize = 0;
    if (MBG)
    Free (MBG);
    if (MBP)
    Free (MBP);
    MBG = MBP = NULL;
}

#if defined(__STDC__)
short mpeek ( MESG * md )
#else
short mpeek (md)
    MESG    *md;
#endif
{
    int size;

    if (md->type == MD_USR_FIFO || md->type == MD_SYS_FIFO)
    return(peek3_2(md->readfd) - EXCESS_3_2_LEN);

    if (ioctl(md->readfd, I_NREAD, &size))
    return((short)size);

    return(-1);
}