#include "zx.h"
#include "zxbdos.h"
#include "zxcbdos.h"
#include <sys/ioctl.h>
#ifdef WIN32
#include <conio.h>
#endif

/* Line input */
#ifdef USE_CPMIO


void bdos_rdline(word line, word *PC)
{
	char *buf;

	if (!line) line = cpm_dma;
	else RAM[line + 1] = 0;

	buf = (char *)&RAM[line];

	if (cpm_bdos_10(buf)) *PC = 0;
}

#else /* def USE_CPMIO */

void bdos_rdline(word line, word *PC)
{
	int maxlen;

	if (!line) line = cpm_dma;
	maxlen = RAM[line];

	fgets((char *)(RAM + line + 2), maxlen, stdin);
	RAM[line + 1] = strlen((char *)(RAM + line + 2)) - 1;	

	Msg("Input: [%d] %-*.*s\n", RAM[line + 1], RAM[line + 1], RAM[line +1], (char *)(RAM+line+2));
}
#endif /* ndef USE_CPMIO */

#ifndef USE_CPMIO


int cpm_bdos_6(byte e)
{
	int c;

	switch(e) {
	case 0xFF:
		if (cstat()) return cin();
		return 0;

	case 0xFE:
		return cstat();

	case 0xFD:
		return cin();

	default:
		cout(e);
		break;
	}
	return 0;
}
#endif

#if defined(__MINGW32__) || defined(_MSC_BUILD)  || defined(__WATCOMC__)

byte cin()
{
	if (_isatty(_fileno(stdin)))
		return getch();
	else
		return getchar();
}

void cout(byte c)
{
	if (_isatty(_fileno(stdout)))
		putch(c);
	else
		putchar(c);
}

int cstat()
{
	if (_isatty(_fileno(stdin)))
		return _kbhit() ? 0xFF : 0;
	else
		return 0xFF;
}

#else /* defined(__MINGW32__) || defined(_MSC_BUILD) */

byte cin()
{
	return getchar();
}

void cout(byte c)
{
	putchar(c);
}

int cstat()
{
	int i;

	ioctl(_fileno(stdin), FIONREAD, &i);
	if (i > 0) return 0xff;
	return 0;
}

#endif