:i	static char d_ioctl_sccs_id[] = "%W% %G%";
:1#include "V_s_lc.h"
/*
* Here's our wrapper for the ioctl-catching system call.  Note that we
* generate a rather detailed debug message at level 4.  This is a rather
* difficult part of most programs...
*/

#if defined(USE_syscall) && defined(SYS_ioctl)
ioctl(f,b,a) char *b; {return Ioctl(f,b,a);}
#endif

d_ioctl(f,r,a)
	int   f;
	Ulong r;
	char *a;
{	int   i;
	int   e;
:8	V8s "ioctl(%d,0%o,%08X)",f,r,a D;
/*	errno = 0; */
#if defined(USE_syscall) && defined(SYS_ioctl)
:8	V7s "syscall(SYS_ioctl%d,%08lX,%d)",f,r,a D;
	i = syscall(SYS_ioctl,f,r,a);
	e = errno;
:6	V6s "syscall(SYS_ioctl,%d,%08lX,%d)=%d [Err %d=%s=%s]",f,r,a,i,Errlist D;
#else
:8	V7s "ioctl(%d,%08lX,%d)",f,r,a,i,Errlist D;
	i = ioctl(f,r,a);
:6	V6s "ioctl(%d,%08lX,%d)=%d [Err %d=%s=%s]",f,r,a,i,Errlist D;
	e = errno;
#endif
:6	V6s "ioctl(%d,0%o,%08X)=%d [Err %d=%s=%s]",f,r,a,i,Errlist D;
	errno = e;
	return(i);
}