#include "copyright.h"

/* $XConsortium: XAllCells.c,v 11.18 89/12/09 19:14:31 rws Exp $ */
/* Copyright    Massachusetts Institute of Technology    1986	*/

/* -- 'Shared X' Version -- */

#define NEED_REPLIES

#include "Xlibint.h"
#include "XmuXlibint.h"

Status XAllocColorCells(calling_dpy, cmap, contig, masks, nplanes, pixels, ncolors)
register Display *calling_dpy;
Colormap cmap;
Bool contig;
unsigned int ncolors; /* CARD16 */
unsigned int nplanes; /* CARD16 */
unsigned long *masks; /* LISTofCARD32 */ /* RETURN */
unsigned long *pixels; /* LISTofCARD32 */ /* RETURN */
{

    Status status;
    xAllocColorCellsReply rep;
    register xAllocColorCellsReq *req;
    register Display *dpy ;

    register int                i ;
             unsigned long     *new_pixels = NULL ,
                               *new_masks = NULL ;
    if( nplanes )
	if( ( new_masks = ( unsigned long * ) 
	      Xmalloc( nplanes * sizeof( long ) ) ) == NULL )
	{
	    errno = ENOMEM ;  
	    ( * _XIOErrorFunction )( calling_dpy ) ;
	}
    if( ncolors )
	if( ( new_pixels = ( unsigned long * ) 
	      Xmalloc( ncolors * sizeof( long ) ) ) == NULL ) 
	{
	    errno = ENOMEM ;
	    ( * _XIOErrorFunction )( calling_dpy ) ;
	}

    /* -- flush default dpy to keep buffers aligned -- */
    XmuXFlushDefault( calling_dpy ) ;
    
    status = True ;
    for( i = 0 ; 
	 ( dpy = XmuXGetDisplay( calling_dpy , i ) ) != NULL && status ; i++ )
    {
	LockDisplay(dpy);
	GetReq(AllocColorCells, req);

	if( i != 0 )
	    req->cmap = XmuXMapID( dpy , cmap , FromClient ) ;
	else
	    req->cmap = cmap ;

	req->colors = ncolors;
	req->planes = nplanes;
	req->contiguous = contig;

	status = _XReply(dpy, (xReply *)&rep, 0, xFalse);

	if (status) 
	{
	    if( i == 0 )
	    {
		_XRead32 (dpy, (long *) pixels, 4L * (long) (rep.nPixels));
		_XRead32 (dpy, (long *) masks, 4L * (long) (rep.nMasks));

	    if( XmuXStoreResources( dpy ) )
		XmuXUpdateColormapInfo( dpy , cmap , pixels , ncolors ,
				        masks , nplanes , False , True ) ;
	    }
	    else
	    { 
                _XRead32 (dpy, (long *) new_pixels, 4L * (long) (rep.nPixels));
                _XRead32 (dpy, (long *) new_masks, 4L * (long) (rep.nMasks));
		
		XmuXInsertPrivateCells( dpy , req->cmap ,
				        pixels , new_pixels , ncolors ,
				        masks , new_masks , nplanes , True ) ;
	    }
	}
	UnlockDisplay(dpy);
	SyncHandle();
    }
    if( ncolors )
	Xfree( ( char * ) new_pixels ) ;
    if( nplanes )
	Xfree( ( char * ) new_masks ) ;
    return(status);
}