/*

 * Copyright © 2002 Keith Packard

 *

 * Permission to use, copy, modify, distribute, and sell this software and its

 * documentation for any purpose is hereby granted without fee, provided that

 * the above copyright notice appear in all copies and that both that

 * copyright notice and this permission notice appear in supporting

 * documentation, and that the name of Keith Packard not be used in

 * advertising or publicity pertaining to distribution of the software without

 * specific, written prior permission.  Keith Packard makes no

 * representations about the suitability of this software for any purpose.  It

 * is provided "as is" without express or implied warranty.

 *

 * KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,

 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO

 * EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR

 * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,

 * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER

 * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR

 * PERFORMANCE OF THIS SOFTWARE.

 */

#include "xftint.h"

_X_HIDDEN int

XftNativeByteOrder (void)

{

    int	    whichbyte = 1;

    if (*((char *) &whichbyte))

	return LSBFirst;

    return MSBFirst;

}

/* byte swap a 32-bit value */

#define swapl(x, n) { \

		 n = ((char *) (x))[0];\

		 ((char *) (x))[0] = ((char *) (x))[3];\

		 ((char *) (x))[3] = n;\

		 n = ((char *) (x))[1];\

		 ((char *) (x))[1] = ((char *) (x))[2];\

		 ((char *) (x))[2] = n; }

/* byte swap a short */

#define swaps(x, n) { \

		 n = ((char *) (x))[0];\

		 ((char *) (x))[0] = ((char *) (x))[1];\

		 ((char *) (x))[1] = n; }

/* byte swap a three-byte unit */

#define swapt(x, n) { \

		 n = ((char *) (x))[0];\

		 ((char *) (x))[0] = ((char *) (x))[2];\

		 ((char *) (x))[2] = n; }

_X_HIDDEN void

XftSwapCARD32 (CARD32 *data, int u)

{

    char    n;

    while (u--)

    {

	swapl (data, n);

	data++;

    }

}

_X_HIDDEN void

XftSwapCARD24 (CARD8 *data, int width, int height)

{

    int	    units, u;

    char    n;

    CARD8   *d;

    units = width / 3;

    while (height--)

    {

	d = data;

	data += width;

	u = units;

	while (u--)

	{

	    swapt (d, n);

	    d += 3;

	}

    }

}

_X_HIDDEN void

XftSwapCARD16 (CARD16 *data, int u)

{

    char    n;

    while (u--)

    {

	swaps (data, n);

	data++;

    }

}

_X_HIDDEN void

XftSwapImage (XImage *image)

{

    switch (image->bits_per_pixel) {

    case 32:

	XftSwapCARD32 ((CARD32 *) image->data,

		       image->height * image->bytes_per_line >> 2);

	break;

    case 24:

	XftSwapCARD24 ((CARD8 *) image->data,

		       image->bytes_per_line,

		       image->height);

	break;

    case 16:

	XftSwapCARD16 ((CARD16 *) image->data,

		       image->height * image->bytes_per_line >> 1);

	break;

    default:

	break;

    }

}