io.c

BIOS emulator and interface to Realmode X86 Emulator Library Can emulate a PCI Graphic Controller V

/*
 * Copyright 1999 Egbert Eich
 *
 * 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 the authors not be used in
 * advertising or publicity pertaining to distribution of the software without
 * specific, written prior permission.  The authors makes no representations
 * about the suitability of this software for any purpose.  It is provided
 * "as is" without express or implied warranty.
 *
 * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
 * EVENT SHALL THE AUTHORS 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 "debug.h"

#include <stdio.h>
#include "AsmMacros.h"
#include "v86bios.h"
#include "pci.h"

int r_inb = 0, r_inw = 0, r_inl = 0, r_outb = 0, r_outw = 0, r_outl = 0;
int in_b = 0, in_w = 0, in_l = 0, out_b = 0, out_w = 0, out_l = 0;

void
s_break()
{}

int
port_rep_inb(CARD16 port, CARD8 *base, int d_f, CARD32 count)
{
	register int inc = d_f ? -1 : 1;
	CARD8 *dst = base;
	
	p_printf(" rep_insb(%#x) %d bytes at %p %s\n",
			 port, count, base, d_f?"up":"down");
	r_inb++;
	while (count--) {
		*dst = inb(port);
		dst += inc;
	}
	return (dst-base);
}

int
port_rep_inw(CARD16 port, CARD16 *base, int d_f, CARD32 count)
{
	register int inc = d_f ? -1 : 1;
	CARD16 *dst = base;
	
	p_printf(" rep_insw(%#x) %d bytes at %p %s\n",
			 port, count, base, d_f?"up":"down");
	r_inw++;
	while (count--) {
		*dst = inw(port);
		dst += inc;
	}
	return (dst-base);
}

int
port_rep_inl(CARD16 port, CARD32 *base, int d_f, CARD32 count)
{
	register int inc = d_f ? -1 : 1;
	CARD32 *dst = base;
	
	p_printf(" rep_insl(%#x) %d bytes at %p %s\n",
			 port, count, base, d_f?"up":"down");
	r_inl++;
	while (count--) {
		*dst = inl(port);
		dst += inc;
	}
	return (dst-base);
}

int
port_rep_outb(CARD16 port, CARD8 *base, int d_f, CARD32 count)
{
	register int inc = d_f ? -1 : 1;
	CARD8 *dst = base;
	
	p_printf(" rep_outb(%#x) %d bytes at %p %s\n",
			 port, count, base, d_f?"up":"down");
	r_outb++;
	while (count--) {
		outb(port,*dst);
		dst += inc;
	}
	return (dst-base);
}

int
port_rep_outw(CARD16 port, CARD16 *base, int d_f, CARD32 count)
{
	register int inc = d_f ? -1 : 1;
	CARD16 *dst = base;
	
	p_printf(" rep_outw(%#x) %d bytes at %p %s\n",
			 port, count, base, d_f?"up":"down");
	r_outw++;
	while (count--) {
		outw(port,*dst);
		dst += inc;
	}
	return (dst-base);
}

int
port_rep_outl(CARD16 port, CARD32 *base, int d_f, CARD32 count)
{
	register int inc = d_f ? -1 : 1;
	CARD32 *dst = base;
	
	p_printf(" rep_outl(%#x) %d bytes at %p %s\n",
			 port, count, base, d_f?"up":"down");
	r_outl++;
	while (count--) {
		outl(port,*dst);
		dst += inc;
	}
	return (dst-base);
}

CARD8
p_inb(CARD16 port)
{
	CARD8 val = 0;

	in_b++;
	val = inb(port);
	p_printf(" inb(%#x) = %2.2x\n",port,val);
        if (port == 0x3d5) s_break();
	return val;
}

CARD16
p_inw(CARD16 port)
{
	CARD16 val = 0;

	in_w++;
	val = inw(port);
	p_printf(" inw(%#x) = %4.4x\n",port,val);
	return val;
}

CARD32
p_inl(CARD16 port)
{
	CARD32 val = 0;

	in_l++;
#ifdef NEED_PCI_IO
	if (cfg1in(port,&val))
		return val;
	else
#endif
	val = inl(port);
	p_printf(" inl(%#x) = %8.8x\n",port,val);
	return val;
}

void
p_outb(CARD16 port, CARD8 val)
{
	out_b++;
	p_printf(" outb(%#x, %2.2x)\n",port,val);
	outb(port,val);
}

void
p_outw(CARD16 port, CARD16 val)
{
	out_w++;
	p_printf(" outw(%#x, %4.4x)\n",port,val);
	outw(port,val);
}

void
p_outl(CARD16 port, CARD32 val)
{
	out_l++;
	p_printf(" outl(%#x, %8.8x)\n",port,val);
#ifdef NEED_PCI_IO
	if (cfg1out(port,val))
		return;
#endif
	outl(port,val);
}

void
io_statistics(void)
{
#ifdef PRINT_PORT
	p_printf("rep: inb: %i, inw: %i, inl: %i, outb: %i, outw: %i, outl: %i\n",
		   r_inb,r_inw,r_inl,r_outb,r_outw,r_outl);
	p_printf("inb: %i, inw: %i, inl: %i, outb: %i, outw: %i, outl: %i\n",
		   in_b,in_w,in_l,out_b,out_w,out_l);
#endif
}