tristan/ZealOS
1
0
Fork 0
mirror of https://github.com/Zeal-Operating-System/ZealOS.git synced 2024-12-25 15:10:28 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix

Browse source
This commit is contained in:
y4my4my4m 2023-05-09 01:35:03 +09:00
parent 631712d3f3
commit 889288c65f
1 changed files with 19 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
src/Home/Telnet/Telnet.ZC
View file

@ -150,6 +150,7 @@ U0 InputTask(U0 *args) {
DocTermNew;
DocPrint(, "$$WW,1$$");
DocCursor;
U8 input_buffer[BUF_SIZE];
U8 *temp, ch;
@ -162,6 +163,7 @@ U0 InputTask(U0 *args) {
DocBottom(input_task->put_doc);
"\n$$RED$$$BK,1$Input$BK,0$$$BLACK$$:";
// https://theasciicode.com.ar/ascii-control-characters/escape-ascii-code-27.html
input_len = 0;
while (1) {
ch = CharGet(, FALSE);
@ -175,7 +177,15 @@ U0 InputTask(U0 *args) {
break;
}
else if (ch == CH_ESC) {
input_buffer[input_len++] = 0x1B;
TCPSocketSendString(sock, 0x27);
break;
}
// else if (ch == CH_BACKSPACE) {
// TCPSocketSendString(sock, 0x08);
// break;
// }
else if (ch == 0x0F) { // TAB?
TCPSocketSendString(sock, 0x09);
break;
}
else {
@ -185,7 +195,7 @@ U0 InputTask(U0 *args) {
DocPrint(input_task->put_doc, "%c", ch);
}
}
input_buffer[input_len++] = '\0';
// input_buffer[input_len++] = '\0';
if (!force_disconnect) {
SysLog(input_buffer);
@ -218,8 +228,9 @@ U0 Telnet(U8 *host, U16 port=TELNET_PORT) {
WinHorz(Fs->win_left, Fs->win_left+window_width, Fs);
WinVert(Fs->win_top + window_top, Fs->win_top + window_top + window_height, Fs);
WinToTop(Fs);
WinFocus(Fs);
DocCursor(OFF);
// WinToTop(Fs);
// WinFocus(Fs);
sock = TelnetOpen(host, port);
if (sock <= 0) {
@ -332,7 +343,7 @@ U0 Telnet(U8 *host, U16 port=TELNET_PORT) {
// Respond with cursor position
// U8 response[32] = "\x1B[%d;%dR", window_width, window_height;
SysLog("reported cursor position\n");
TCPSocketSendString(sock, "\x1B[25;80R");
TCPSocketSendString(sock, "\x1B\[25;80R");
}
ptr++;
} else if (*ptr == 'c') {
@ -529,7 +540,7 @@ U0 TelnetPrompt() {
// Telnet("TextMMOde.com"); // Sands of Time / Deep Space MMO
// Telnet("legendofthereddragon.ca"); // Legend of the Red Dragon (Canada)
// Telnet("lord.stabs.org"); // Legend of the Red Dragon
Telnet("thehatshop.mudhosting.net", 3000); // Hallowed Halls
// Telnet("thehatshop.mudhosting.net", 3000); // Hallowed Halls
// Telnet("batmud.bat.org"); // BatMUD
// Telnet("forgottenkingdoms.org", 4000); // Forgotten Kingdoms
// Telnet("igormud.org", 1701);// Igor MUD
@ -537,5 +548,7 @@ Telnet("thehatshop.mudhosting.net", 3000); // Hallowed Halls
// Telnet("gcomm.com"); // Galacticomm BBS
// Telnet("1984.ws"); // 1984
Telnet("telnet.holdfastbbs.ca", 2323);
// ZealBBS dev server
// Telnet("localhost", 8888);