/*
 *	Vdi raster funcs library interface
 *
 *		vro_cpyfm	copy raster opaque
 *		vrt_cpyfm	copy raster transparent
 *		vr_trnfm	transform form
 *		v_get_pixel get pix
 *
 *			++jrb	bammi@cadence.com
 *			modified: mj -- ntomczak@vm.ucs.ualberta.ca
 */
#include "common.h"

#ifdef __DEF_ALL__

#define L_vro_cpyf
#define L_vrt_cpyf
#define L_vr_trnfm
#define L_v_get_pi

#endif /* __DEF_ALL__ */


#ifdef L_vro_cpyf

/* vro_cpyfm	copy raster opaque
 * returns void
 */
void vro_cpyfm(int handle, int mode, int pxyarray[],
		   void *src,  void *dst)
{
#ifdef __MSHORT__		/* we have 16 bit ints, just change vdi params */
	_vdiparams[2] = (void *) &pxyarray[0];
#else					/* 32 bit ints - let's copy */
	register short i;

	for(i = 0; i < 8; i++)
	_ptsin[i] = pxyarray[i];
#endif

	_intin[0] = mode;
	*((void **)(&_contrl[7])) = src;
	*((void **)(&_contrl[9])) = dst;

	__vdi__(VDI_CONTRL_ENCODE(109, 4, 1, 0), handle);

#ifdef __MSHORT__
	_vdiparams[2] = (void *)&_ptsin[0]; /* restore vdi parameters */
#endif
}
#endif /* L_vro_cpyf */

#ifdef L_vrt_cpyf

/* vrt_cpyfm	copy raster transparent
 * returns void
 */
void vrt_cpyfm(int handle, int mode, int pxyarray[],
		   void *src,  void *dst, int color[])
{
#ifdef __MSHORT__		/* we have 16 bit ints, just change vdi params */
	_vdiparams[2] = (void *) &pxyarray[0];
#else					/* 32 bit ints - let's copy */
	register short i;

	for(i = 0; i < 8; i++)
	_ptsin[i] = pxyarray[i];
#endif

	_intin[0] = mode;
	_intin[1] = color[0];
	_intin[2] = color[1];

	*((void **)(&_contrl[7])) = src;
	*((void **)(&_contrl[9])) = dst;

	__vdi__(VDI_CONTRL_ENCODE(121, 4, 3, 0), handle);

#ifdef __MSHORT__
	_vdiparams[2] = (void *)&_ptsin[0]; /* restore vdi parameters */
#endif
}
#endif /* L_vrt_cpyf */

#ifdef L_vr_trnfm

/* vr_trnfm transform form
 * returns void
 */
void vr_trnfm(int handle, void *src, void *dst)
{
	*((void **)(&_contrl[7])) = src;
	*((void **)(&_contrl[9])) = dst;

	__vdi__(VDI_CONTRL_ENCODE(110, 0, 0, 0), handle);
}
#endif /* L_vr_trnfm */

#ifdef L_v_get_pi

/* v_get_pixel	get pix
 * returns void (results in args)
 */
void v_get_pixel( int handle, int x, int y, int *pel, int *index)
{
	_ptsin[0] = x;
	_ptsin[1] = y;

	__vdi__(VDI_CONTRL_ENCODE(105, 1, 0, 0), handle);

	*pel = _intout[0];
	*index = _intout[1];
}
#endif /* L_v_get_pi */

/* -eof- */