unsigned char spdFactor;
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <oscalls.h>
#include <osfs.h>
#include <intrz80.h>
#include <terminal.c>
#include <uartdelay.h>
#define RBR_THR 0xF8EF
#define IER 0xF9EF
#define IIR_FCR 0xFAEF
#define LCR 0xFBEF
#define MCR 0xFCEF
#define LSR 0xFDEF
#define MSR 0xFEEF
#define SR 0xFFEF
unsigned char key;
unsigned char buffer[8500] = "";
int bufferPos;
int endPos;
int curpos;
int oldpos;
void delay(unsigned long counter)
{
unsigned long start, finish;
counter = counter / 20;
if (counter < 1)
{
counter = 1;
}
finish = start + counter;
while (start < finish)
{
}
}
void uart_init(unsigned char divisor)
{
output(MCR, 0x00); // Disable input
output(IIR_FCR, 0x87); // Enable fifo 8 level, and clear it
output(LCR, 0x83); // 8n1, DLAB=1
output(RBR_THR, divisor); // 115200 (divider 1-115200, 3 - 38400)
output(IER, 0x00); // (divider 0). Divider is 16 bit, so we get (#0002 divider)
output(LCR, 0x03); // 8n1, DLAB=0
output(IER, 0x00); // Disable int
}
unsigned char uart_CTS(void)
{
unsigned char cts;
cts = input(MSR);
cts = (cts && 16) >> 3;
return cts;
}
void uart_write(unsigned char data)
{
while ((input(LSR) & 32) >> 5 == 0)
{
}
output(RBR_THR, data);
}
void uart_startrts(void)
{
output(MCR, 2);
}
void uart_stoprts(void)
{
output(MCR, 0);
}
void uart_flashrts(void)
{
unsigned char count;
disable_interrupt();
output(MCR, 2);
for (count = 0; count < spdFactor; count++)
{
uart_delay1k();
}
output(MCR, 0);
enable_interrupt();
}
unsigned char uart_queue(void)
{
unsigned char queue;
queue = input(LSR);
queue = queue & 1;
return queue;
}
unsigned char uart_read(void)
{
unsigned char data;
while (input(LSR) & 1 == 0)
{
}
data = input(RBR_THR);
return data;
}
void getdata(void)
{
unsigned char readbyte;
while (uart_queue() != 0)
{
readbyte = uart_read();
buffer[bufferPos] = readbyte;
bufferPos++;
}
uart_flashrts();
if (bufferPos > 8191)
{
endPos = bufferPos;
bufferPos = 0;
}
}
void renderWin(void)
{
for (curpos = oldpos; curpos < bufferPos; curpos++)
{
}
oldpos = curpos;
}
void sendcommand(char commandline[])
{
int pos = 0;
while (commandline[pos] != '\0')
{
uart_write(commandline[pos]);
pos++;
}
uart_write('\r');
uart_write('\n');
getdata();
renderWin();
}
void saveBuff(void)
{
int len;
unsigned long size;
FILE *fp1;
unsigned char crlf[2] = {13, 10};
fp1 = OS_OPENHANDLE("buffer.log", 0x80);
if (((int)fp1) & 0xff)
{
puts("Open buffer.log error"); puts("Creating buffer.log file"); fp1 = OS_CREATEHANDLE("buffer.log", 0x80);
if (((int)fp1) & 0xff)
{
puts("Create buffer.log error"); return;
}
OS_CLOSEHANDLE(fp1);
fp1 = OS_OPENHANDLE("buffer.log", 0x80);
if (((int)fp1) & 0xff)
{
puts("Open buffer.log error"); return;
}
}
size = OS_GETFILESIZE(fp1);
len = curpos;
OS_SEEKHANDLE(fp1, size);
OS_WRITEHANDLE(crlf, fp1, 2);
OS_WRITEHANDLE("********************************************************************************", fp1, 80);
OS_WRITEHANDLE(crlf, fp1, 2);
OS_WRITEHANDLE(buffer, fp1, len);
OS_CLOSEHANDLE(fp1);
puts("buffer.log saved."); }
void flushbuf(void)
{
while (uart_queue() != 0)
{
uart_read();
}
}
void testQueue(void)
{
unsigned char cmd[6000];
sendcommand("AT+CIPMUX=0\0");
sendcommand("AT+CIPSERVER=0\0");
sendcommand("AT+CIPDINFO=0\0");
sendcommand("AT+CIPRECVMODE=1\0");
sendcommand("AT+CIPSTART=\"TCP\",\"ti6.nedopc.com\",80\0");
delay(1000);
sendcommand(cmd);
sendcommand("GET /attachments/pages/your_game6_160.png HTTP/1.1\r\nHost: ti6.nedopc.com\r\nUser-Agent: Mozilla/4.0 (compatible; MSIE5.01; NedoOS)\r\n\0");
delay(1000);
sendcommand("AT+CIPRECVDATA=5000\0");
}
C_task main(void)
{
unsigned char cmd[256];
unsigned char cmdpos;
os_initstdio();
BOX(1, 1, 80, 25, 40);
AT(1, 1);
ATRIB(92);
puts("EVO UART TESTER. SEND AND RECIEVE BYTES."); uart_init(1);
spdFactor = 3;
puts("Uart inited @ 115200\r\n"); cmd[0] = '\0';
cmdpos = 0;
while (1)
{
unsigned char count;
getdata();
renderWin();
key = _low_level_get();
if (key != 0)
{
//printf("key = %u ", key);
switch (key)
{
case 177:
uart_init(1);
puts("Uart inited @ 115200"); spdFactor = 3;
key = 0;
break;
case 178:
uart_init(2);
puts("Uart inited @ 57600"); spdFactor = 5;
key = 0;
break;
case 179:
uart_init(3);
puts("Uart inited @ 38400"); spdFactor = 7;
key = 0;
break;
case 180:
uart_init(4);
puts("Uart inited @ 28800"); spdFactor = 9;
key = 0;
break;
case 181:
uart_init(6);
puts("Uart inited @ 19200"); spdFactor = 15;
key = 0;
break;
case 182:
uart_init(8);
puts("Uart inited @ 14400"); spdFactor = 21;
key = 0;
break;
case 183:
uart_init(12);
puts("Uart inited @ 9600"); spdFactor = 31;
key = 0;
break;
case 184:
uart_init(24);
puts("Uart inited @ 4800"); spdFactor = 64;
key = 0;
break;
case 185:
uart_init(48);
puts("Uart inited @ 2400"); spdFactor = 115;
key = 0;
break;
case 176:
uart_init(96);
puts("Uart inited @ 1200"); spdFactor = 240;
key = 0;
break;
case 13:
cmd[cmdpos] = '\0';
sendcommand(cmd);
cmdpos = 0;
cmd[cmdpos] = '\0';
key = 0;
break;
case 19:
saveBuff();
key = 0;
break;
case 27:
case 8:
if (cmdpos != 0)
{
cmdpos--;
cmd[cmdpos] = '\0';
for (count = 0; count < cmdpos + 1; count++)
{
}
count = 0;
while (cmd[count] != '\0')
{
count++;
}
}
key = 0;
break;
case 246: // +
spdFactor++;
printf("spdFactor = %u \r\n ", spdFactor
); sendcommand("AT+GMR\0");
key = 0;
break;
case 247: // -
spdFactor--;
printf("spdFactor = %u \r\n ", spdFactor
); sendcommand("AT+GMR\0");
key = 0;
break;
case 28: // home
testQueue();
key = 0;
break;
}
}
if (key != 0)
{
cmd[cmdpos] = key;
cmdpos++;
}
}
return 0;
}