#include "copyright.h"

/* $XConsortium: XLiProps.c,v 11.18 88/09/06 16:08:58 jim Exp $ */
/* Copyright    Massachusetts Institute of Technology    1986	*/

#define NEED_REPLIES
#include "Xlibint.h"

Atom *XListProperties(dpy, window, n_props)
register Display *dpy;
Window window;
int *n_props;  /* RETURN */
{
    long nbytes;
    xListPropertiesReply rep;
    Atom *properties;
    register xResourceReq *req;

    LockDisplay(dpy);
    GetResReq(ListProperties, window, req);
    if (!_XReply(dpy, (xReply *)&rep, 0, xFalse)) {
	*n_props = 0;
	UnlockDisplay(dpy);
        SyncHandle();
	return (NULL);
	}

    *n_props = rep.nProperties;
    nbytes = rep.nProperties * sizeof(Atom);
    properties = (Atom *) Xmalloc (nbytes);
    nbytes = rep.nProperties * 4;
    _XRead32 (dpy, (char *) properties, nbytes);

    UnlockDisplay(dpy);
    SyncHandle();
    return (properties);
}