#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include "ppport.h"

MODULE = VXI11::Client		PACKAGE = VXI11::Client		

int
abort()
	CODE:
		RETVAL = vxi11_abort();
	OUTPUT:
		RETVAL

int
clear(waitforlock)
	bool	waitforlock
	CODE:
		RETVAL = vxi11_clear(waitforlock);
	OUTPUT:
		RETVAL

int
close()
	CODE:
		RETVAL = vxi11_close();
	OUTPUT:
		RETVAL

int
create_intr_chan()
	CODE:
		RETVAL = vxi11_create_intr_chan();
	OUTPUT:
		RETVAL

int
destroy_intr_chan()
	CODE:
		RETVAL = vxi11_destroy_intr_chan();
	OUTPUT:
		RETVAL

int
docmd(cmd, waitforlock)
	unsigned long	cmd
	bool	waitforlock
	CODE:
		RETVAL = vxi11_docmd();
	OUTPUT:
		RETVAL

int
enable_srq(enable)
	bool	enable
	CODE:
		RETVAL = glue_enable_srq(enable);
	OUTPUT:
		RETVAL

int
wait_for_interrupt()
        CODE:
                RETVAL = glue_wait_for_interrupt();
        OUTPUT:
                RETVAL


int
local(waitforlock)
	bool	waitforlock
	CODE:
		RETVAL = vxi11_local(waitforlock);
	OUTPUT:
		RETVAL

int
lock(waitforlock)
	bool	waitforlock
	CODE:
		RETVAL = vxi11_lock(waitforlock);
	OUTPUT:
		RETVAL

int
open(address, device)
	char *	address
	char *	device
	CODE:
		RETVAL = vxi11_open(address, device);	
	OUTPUT:
		RETVAL

int
read(buffer, bufferlen, waitlock, termchrset, termchr)
	char *	buffer
	unsigned int	bufferlen
	bool	waitlock
	bool	termchrset
	char	termchr
	CODE:
		RETVAL = vxi11_read(buffer, bufferlen, waitlock, termchrset, termchr);
	OUTPUT:
		RETVAL

int
readstatusbyte(waitforlock)
	bool	waitforlock
	CODE:
		RETVAL = vxi11_readstatusbyte();
	OUTPUT:
		RETVAL

int
remote(waitforlock)
	bool	waitforlock
	CODE:
		RETVAL = vxi11_remote();
	OUTPUT:
		RETVAL

int
trigger(waitforlock)
	bool	waitforlock
	CODE:
		RETVAL = vxi11_trigger();
	OUTPUT:
		RETVAL

int
unlock()
	CODE:
		RETVAL = vxi11_unlock();
	OUTPUT:
		RETVAL

int
write(data, len, waitlock, end)
	char *	data
	unsigned int	len
	bool	waitlock
	bool	end
	CODE:
		RETVAL = vxi11_write(data, len, waitlock, end);
	OUTPUT:
		RETVAL