/* 

 * Motif

 *

 * Copyright (c) 1987-2012, The Open Group. All rights reserved.

 *

 * These libraries and programs are free software; you can

 * redistribute them and/or modify them under the terms of the GNU

 * Lesser General Public License as published by the Free Software

 * Foundation; either version 2 of the License, or (at your option)

 * any later version.

 *

 * These libraries and programs are distributed in the hope that

 * they will be useful, but WITHOUT ANY WARRANTY; without even the

 * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR

 * PURPOSE. See the GNU Lesser General Public License for more

 * details.

 *

 * You should have received a copy of the GNU Lesser General Public

 * License along with these librararies and programs; if not, write

 * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth

 * Floor, Boston, MA 02110-1301 USA

*/

#include <X11/Intrinsic.h>

#include <Xm/DrawUtils.h>

#define STATIC_RECTS 20

/*

 * Function:

 *	XmDrawBevel(dpy, d, top_GC, bottom_GC, x, y, size, option)

 * Description:

 *	Draws a shadow corner (beveled) at the given location and size.

 * Input:

 *	dpy       : Display*     - the display to draw to

 *	d         : Drawable     - the drawable to use

 *	top_GC    : GC           - the GC to use to draw the top half of

 *                                 the bevel

 *	bottom_GC : GC           - the GC to use to draw the bottom half

 *                                 of the bevel

 *	x         : int          - the x location of the corner

 *	y         : int          - the y location of the corner

 *	size      : unsigned int - the size of the corner

 *                                 (width = height = size)

 *	option    : XmBevelOption- what part of the bevel should we draw.

 * Output:

 *	None.

 */

void

#ifndef _NO_PROTO

XmDrawBevel(Display *dpy, Drawable d, GC top_gc, GC bottom_gc,

	    int x, int y, unsigned int size, XmBevelOption option)

#else

XmDrawBevel(dpy, d, top_gc, bottom_gc, x, y, size, option)

    Display       *dpy;

    Drawable      d;

    GC            top_gc, bottom_gc;

    int           x, y;

    unsigned int  size;

    XmBevelOption option;

#endif

{

    static     XRectangle saved[STATIC_RECTS], *alloced = NULL;

    static int numAlloced = 0;

    XRectangle *rt;

    int        i;

    /*

     * First lets see if we can get away with using our list rectangles

     * without allocating any.

     */

    if( size < STATIC_RECTS )

    {

	/*

	 * OK we don't need to allocate any so lets use the static

	 * array.

	 */

	rt = saved;

    }

    else

    {

	/*

	 * Well we need more than our static array holds so lets see

	 * if we have enough in our alloced array and if no lets

	 * allocate what we need.

	 */

	if( size > numAlloced )

	{

	    numAlloced = size;

	    alloced = (XRectangle*) XtRealloc((XtPointer) alloced,

					      sizeof(XRectangle) * numAlloced);

	}

	rt = alloced;

    }

    /*

     * Now that we have enough rectangles to fill in an area lets

     * set up the rectangles and pass them off to be drawn.  First the

     * top half of the beveled corner ...

     */

    if( option == XmBEVEL_TOP )

    {

	for( i = 0; i < size; ++i )

	{

	    rt[i].x = x;

	    rt[i].y = y + i;

	    rt[i].width = size - i;

	    rt[i].height = 1;

	}

	XFillRectangles(dpy, d, top_gc, rt, size);

    }

    else if( option == XmBEVEL_BOTH )

    {

	XFillRectangle(dpy, d, top_gc, x, y, size, size);

    }

    /*

     * ... And the the bottom half of the beveled corner.

     */

    if( option == XmBEVEL_BOTH || option == XmBEVEL_BOTTOM )

    {

	for( i = 0; i < size; ++i )

	{

	    rt[i].x = x + size - i;

	    rt[i].y = y + i;

	    rt[i].width = i;

	    rt[i].height = 1;

	}

	XFillRectangles(dpy, d, bottom_gc, rt, size);

    }

}