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

update

Browse source
This commit is contained in:
y4my4my4m 2023-05-10 23:26:55 +09:00
parent c820e5b726
commit b64d0bb563
2 changed files with 69 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -26,13 +26,15 @@ U0 HandleControlCodes(U8 ch) {
case 0: // NUL (Null) - Typically ignored
break;
case 7: // BEL (Bell)
// Beep;
Beep;
break;
case 8: // BS (Backspace)
"%c%c%c", 8, ' ', 8; // Move cursor back, erase character, move cursor back again
// "%c%c%c", 8, ' ', 8; // Move cursor back, erase character, move cursor back again
"$$CM,-8,0$$";
break;
case 9: // HT (Horizontal Tab)
" "; // 8 spaces
// " "; // 8 spaces
"$$CM,8,0$$";
break;
case 10: // LF (Line Feed)
"\n";
@ -117,9 +119,9 @@ U0 InputTask(U0 *args) {
TCPSocketSendString(sock, 0x27);
break;
}
else if (ch == CH_BACKSPACE) {
break;
}
// else if (ch == CH_BACKSPACE) {
// break;
// }
else if (ch == 0x0F) { // TAB?
TCPSocketSendString(sock, 0x09);
break;
@ -366,7 +368,7 @@ U0 Telnet(U8 *host, U16 port=TELNET_PORT) {
// Not sure if really should do -1...
if (row > window_height)
row = window_heigh-1;
row = window_height-1;
if (col > window_width)
col = window_width-1;
@ -375,7 +377,7 @@ U0 Telnet(U8 *host, U16 port=TELNET_PORT) {
ptr++;
break;
case 'J':
// SysLog("J code\n");
// SysLog("J code, %d %d\n", ansi_param_count, ansi_code[0]);
// Erase in Display
if (ansi_code[0] == 0) {
// Erase from cursor to end of display
@ -433,8 +435,16 @@ U0 Telnet(U8 *host, U16 port=TELNET_PORT) {
switch (code) {
case 25:
// if (*ptr == 'l') SysLog("code 25l\n");// Hide cursor
// if (*ptr == 'h') SysLog("code 25h\n");// Show cursor
if (*ptr == 'l') {
// Hide cursor
// SysLog("code 25l\n");
DocCursor(OFF);
}
if (*ptr == 'h') {
// Show cursor
// SysLog("code 25h\n");
DocCursor(ON);
}
ptr++; // Move past 'l' or 'h'
break;
case 47:

49
src/Home/Telnet/TelnetNegotiation.ZC
View file

@ -1,3 +1,52 @@
#define IAC 0xFF
#define WILL 0xFB
#define WONT 0xFC
#define DO 0xFD
#define DONT 0xFE
#define ECHO 0x01
#define SUPPRESS_GO_AHEAD 0x03
#define TERMINAL_TYPE 0x18
#define LINEMODE 0x22
#define NAWS 0x1F // (Negotiate About Window Size)
#define IS 0x00
#define SB 0xFA
#define SE 0xF0
U0 SendWindowSize(I64 sock, U16 rows, U16 cols) {
U8 buf[9];
buf[0] = IAC;
buf[1] = SB;
buf[2] = NAWS;
buf[3] = cols >> 8; // High byte of columns
buf[4] = cols & 0xFF; // Low byte of columns
buf[5] = rows >> 8; // High byte of rows
buf[6] = rows & 0xFF; // Low byte of rows
buf[7] = IAC;
buf[8] = SE;
SysLog("SendWindowSize: %d x %d\n", cols, rows);
TCPSocketSendString(sock, buf);
}
U0 SendTerminalType(I64 sock, U8 *terminal_type) {
U8 response[256];
I64 len = StrLen(terminal_type);
response[0] = IAC;
response[1] = SB;
response[2] = TERMINAL_TYPE;
response[3] = IS;
MemCopy(response + 4, terminal_type, len);
SysLog("SendTerminalType: %s\n", terminal_type);
response[len + 4] = IAC;
response[len + 5] = SE;
response[len + 6] = '\0';
TCPSocketSendString(sock, response);
}
U0 TelnetNegotiate()
{
U8 negotiation_code = *(ptr + 1);