Проблемы общения TELNET - клиента с Microsoft Telnet server

#include "declare.h"
#include "func.h"
#include "classes.h"
 
void main()
{
setlocale(LC_ALL, "Russian");
Client *client = 0;
client = new Client();
try
{
int V = 0;
do {V = ShowMenu(client);} while(V != 0);
}
catch(...) // блок для отлавливания ошибок из нижних уровней
{
    cout << "Если появилось это сообщение, то одно из исключений "
        << "не было обработано внутри своего блока try-catch" << endl;
}
system("pause");
return;
}   //конец main()

#ifndef DECLARE_H_
#define DECLARE_H_
 
#define _CRT_SECURE_NO_DEPRECATE // для отключения вывода предупреждений
#define MAX_BUF_SIZE 1024 // макс кол-во, передаваемых через сокет
#include <WinSock2.h>
#include <stdio.h>
#include <stdint.h> 
#include <iostream>
#include <WS2tcpip.h>
#include <string>
#include <vector>
//#include <conio.h> //для нажатия клавиш
//#include <atlstr.h>
//#include <Windows.h>
#pragma comment (lib, "ws2_32.lib")
using namespace std;
#endif

#ifndef CLASSES_H_
#define CLASSES_H_
 
#include "declare.h"
 
class Connection
{
public:
    bool ConnectionStatus;
    string IPadress;
    //enum TermType termtype;
    
    Connection()
    {
        ConnectionStatus = false;
        //IPadress = "127.0.0.1";
    }
    ~Connection(){}
    const char * getIP() const
        {return IPadress.c_str();}
};//end.
 
class Client
{
public:
    SOCKET hSocket;
    Connection connection;
    string EscapeSymbol;
    WORD wVerReq;
    WSADATA wsaData;
    static const int iReqWinsockVer = 2;
    sockaddr_in sockAddr;
 
    Client();
    ~Client();
    void toConnect(int socknum);
    void toClose();
    void Status();
    void toRecieve();
    void toSend(const char *buff, int msgsize); //для текста
    void toSend(uint8_t *buff, int msgsize); //для команд
};//end.
 
#endif

#include "declare.h"
#include "classes.h"
#include "func.h"
 
using namespace std;
int SBcount = 0; // количество подопций
 
int ShowMenu(Client *client)
{
    int socknum = 23; //номер порта по умолчанию
    string ip_adress; //буфер для ввода ip
    int choice = 3;
    cout << "Выберите действие:" << endl;
    cout << "Введите 1 для подключения к localhost" << endl;
    cout << "Введите 2 для подключения к хосту по ip-адресу" << endl;
    cout << "Введите 0 для завершения клиента" << endl;
    cin >> choice;
    int V = 0;
    switch (choice)
    {
    case 1: 
        client->connection.IPadress = "127.0.0.1";
        client->toConnect(socknum);
        do {V = ShowSubMenu(client);} while(V != 0);
        break;
    case 2:
        cout << "Введите ip-адрес хоста:" << endl; 
        cin >> ip_adress;
        client->connection.IPadress = ip_adress;
        cout << "Введите номер порта для подключения:" << endl;
        cin >> socknum;
        client->toConnect(socknum);
        do {V = ShowSubMenu(client);} while(V != 0);
        break;
    case 3:
        break;
    default:
        break;
    }
    return choice;
}
 
int ShowSubMenu(Client *client)
{
    int subchoice = 3;
    string msgbuffer;
    //char msgbuffer[MAX_BUF_SIZE] = "\0";
    //int mas[] = {255,252,0};
    //int outmas[] = {255,252,37};
    //char outbuf[] = {"TASKLIST\r\n"};
    //int bytesSent = 0;
    //char * pCRLF = 0;
    int chrlen = 0;
 
    cout << "\tВыберите действие:" << endl;
    cout << "\tВведите 1 для отображения статуса" << endl;
    cout << "\tВведите 2 для отправки сообщения" << endl;
    cout << "\tВведите 3 для чтения запросов от сервера" << endl;
    cout << "\tВведите 4 для согласования опций с сервером" << endl;
    cout << "\tВведите 5 для разрыва соединения" << endl;
    cout << "\tВведите 0 для выхода в меню" << endl;
    cin >> subchoice;
    switch (subchoice)
    {
    case 1: 
        client->Status();
        return 1;
    case 2: //Отправка сообщения
        cout << "Введите текст сообщения: " << endl;
        //gets(msgbuffer);
        getline(cin, msgbuffer); msgbuffer+='\0'; //strcat(msgbuffer,'\0'); 
        chrlen = msgbuffer.length();
        //chrlen = strlen(msgbuffer);
        //pCRLF = strchr(msgbuffer, '0'); //findCRLF(msgbuffer, MAX_BUF_SIZE);
        if (chrlen <= MAX_BUF_SIZE)
            client->toSend(msgbuffer.c_str(), chrlen+1); //+3 т.к. еще \r\n\0
 
        return 2;
    case 3: //Чтение с сервера
        client->toRecieve();
        return 3;
    case 4: //Согласование
        cout << "Включить эхо? (1 - да/0 - нет)" << endl;
        int echo_is; cin >> echo_is;
        if (echo_is == 1)
        {
            uint8_t do_echo[] = {255,253,1}; // IAC DO ECHO
            client->toSend(do_echo, arraysize(do_echo));
            uint8_t wont_echo[] = {255,252,1}; // IAC WON'T ECHO
            client->toSend(wont_echo, arraysize(wont_echo));
        }
        else
        {
            uint8_t dont_echo[] = {255,254,1}; // IAC DON'T ECHO
            client->toSend(dont_echo, arraysize(dont_echo));
        }
 
        cout << "Включить режим бинарной передачи? (1 - да/0 - нет)" << endl;
        int bin_transmit_is; cin >> bin_transmit_is;
        if (bin_transmit_is == 1)
        {
            uint8_t do_bin_transmit[] = {255,253,0}; // IAC DO TRANSMIT-BINARY
            client->toSend(do_bin_transmit, arraysize(do_bin_transmit));
        }
        else
        {
            uint8_t dont_bin_transmit[] = {255,254,0}; // IAC DON'T TRANSMIT-BINARY
            client->toSend(dont_bin_transmit, arraysize(dont_bin_transmit));
        }
        return 4;
    case 5: //Закрытие сокета
        client->toClose();
        return 5;
    case 0: //Выход в меню
        return 0;
    default: return -1;
    }
}
 
void errwait(char ch[])
{   cout << ch <<endl;
    system("pause");
    return;
}
//закрытие сокета
void closeS(SOCKET p) 
{   if (closesocket(p)==SOCKET_ERROR)
    {   errwait("Невозможно закрыть сокет");}
}
// выгрузка Winsock
void releaseWSA()
{   //cout << "Освобождение ресурсов, занятых Winsock... ";
    if (WSACleanup()!=0)
    {   //cout << "Освобождение не удалось" <<endl;
    }
    //cout << "Выполнено" <<endl;
}
// анализ введенной команды
bool defcom(char Msg[], const char com[]) 
{   int csize = strlen(com);
    if (strncmp(Msg, com, tolower(csize)) == 0)
    {   return true;    
    }
    else return false;
}
 
string Read(SOCKET s)
{
    string str;
    char b;
    bool EOL = false;
 
    while(!EOL)
    {
        if(recv(s, &b, 1, 0) < 1)
        {
        cout << "Ошибка при получении сообщения" << endl;
        break;
        }
        if(b == '\n')
        break;
        cout << b;
 
        str += b;
    }
    cout << endl;
    return str;
}
string TranslSymb(char *buf, int i, const int &bytesRec)
{
//buf - указатель на принятое сообщение
//i - номер переводимого символа
//bytesRec - размер принятого сообщения
 
string cmnd;    
char mes[16] = {""};
switch((unsigned char) buf[i])
{   
    case 255: cmnd = "\nIAC"; break;
    case 254: cmnd = "DON'T"; break;
    case 253: cmnd = "DO"; break;
    case 252: cmnd = "WON'T"; break;
    case 251: cmnd = "WILL"; break;
    case 250: cmnd = "SB"; break;
    case 249: cmnd = "GA"; break;
    case 246: cmnd = "AYT"; break;
    case 242: cmnd = "DM"; break;// завершение неотложного потока данных
    case 241: cmnd = "NOP"; break;
    case 240: cmnd = "SE"; break;
    case 38: cmnd = "ENCRIPT"; break;
    case 37: cmnd = "AUTHENTICATION"; break;
    case 32: cmnd = "TERMINAL-SPEED"; break;
    case 31: cmnd = "NAWS"; break;// обсуждение размера окна
    case 24: cmnd = "TERMINAL-TYPE"; break;
    case 6: cmnd = "TIMING-MARK"; break;
    case 5: cmnd = "STATUS"; break;// состояние опций другой стороны
    case 3: cmnd = "SUPPRESS GA"; break;
    case 1: cmnd = "ECHO"; break;
    case 0: cmnd = "TRANSMIT-BINARY"; break;
    default: cmnd = "NDEF"; // неопределено
}
//return &mes[0];
return cmnd/*.c_str()*/;
}
 
void translate(char *buf, const int &bytesRec)
{
    char mes[255] = {""};
    cout << "сообщение" << endl;
    vector <int> a(bytesRec);
    for (int i=0; i<bytesRec; i++)
    {   a[i] = (int)(unsigned char)buf[i];
        cout << a[i] << ",";
    }
    cout << endl;
    //cout << "Перевод в команды";
    for (int i=0; i<bytesRec+1; i++)
    {   switch((unsigned char) buf[i])
        {   case 255: strcat(mes, "\nIAC"); break;
            case 254: strcat(mes, "DON'T"); break;
            case 253: strcat(mes, "DO"); break;
            case 252: strcat(mes, "WON'T"); break;
            case 251: strcat(mes, "WILL"); break;
            case 250: strcat(mes, "SB"); 
SBcount++; 
if(i<bytesRec-1) 
{   strcat(mes, " ");
    switch((unsigned char) buf[i+1])
    {
        default: break;
        //case 0: strcat(mes, " IS"); break;//только клиент
        case 37: 
            strcat(mes, "AUTHENTICATION");
            i++;
            if(i<bytesRec-1)
            {   strcat(mes, " ");
                switch((unsigned char) buf[i+1])
                {
                default: strcat(mes, "UNDEFINED");break;
                case 1: strcat(mes, "SEND"); break;  
                case 2: strcat(mes, "REPLY"); break;
                }
                i++;
                if(i<bytesRec-1) 
                {   strcat(mes, " ");
                    //cout << (int)(unsigned char) inbuf[i+1] <<endl;
                    switch((unsigned char) buf[i+1])
                    {
                    default: strcat(mes, "\"authentication-type-pair\"");break;
                    case 0: strcat(mes, "NULL"); break;
                    case 1: strcat(mes, "KERBEROS_V4"); break;
                    case 2: strcat(mes, "KERBEROS_V5"); break;
                    case 4: strcat(mes, "SRP"); break;
                    case 12: strcat(mes, "KEA_SJ"); break;
                    case 15: strcat(mes, "NTLM"); break;
                    }
                    i++;
                }
            }
    }
}
break;
            case 249: strcat(mes, "GA"); break;
            case 246: strcat(mes, "AYT"); break;
            case 242: strcat(mes, "DM"); break;// завершение неотложного потока данных
            case 241: strcat(mes, "NOP"); break;
            case 240: strcat(mes, "SE"); break;
            case 38: strcat(mes, "ENCRIPT"); break;
            case 37: strcat(mes, "AUTHENTICATION"); break;
                     
            case 32: strcat(mes, "TERMINAL-SPEED"); break;
            case 31: strcat(mes, "NAWS"); break;// обсуждение размера окна
            case 24: strcat(mes, "TERMINAL-TYPE"); break;
            case 6: strcat(mes, "TIMING-MARK"); break;
            case 5: strcat(mes, "STATUS"); break;// состояние опций другой стороны
            case 3: strcat(mes, "SUPPRESS GA"); break;
            case 1: strcat(mes, "ECHO"); break;
            case 0: strcat(mes, "TRANSMIT-BINARY"); break;
            //default: strcat(mes, &inbuf[i]);
            default: strcat(mes, "NDEF"); // неопределено
        }
        strcat(mes, " ");
    }
    cout << mes << endl << endl;
}
 
void translate(int *buf, const int &bytesRec)
{
    char mes[255] = {""};
    cout << "сообщение" << endl;
    vector <int> a(bytesRec);
    for (int i=0; i<bytesRec; i++)
    {   a[i] = (int)(unsigned char)buf[i];
        cout << a[i] << ",";
    }
    cout << endl;
    //cout << "Перевод в команды";
    for (int i=0; i<bytesRec+1; i++)
    {   switch((unsigned char) buf[i])
        {   case 255: strcat(mes, "\nIAC"); break;
            case 254: strcat(mes, "DON'T"); break;
            case 253: strcat(mes, "DO"); break;
            case 252: strcat(mes, "WON'T"); break;
            case 251: strcat(mes, "WILL"); break;
            case 250: strcat(mes, "SB"); 
SBcount++; 
if(i<bytesRec-1) 
{   strcat(mes, " ");
    switch((unsigned char) buf[i+1])
    {
        default: break;
        //case 0: strcat(mes, " IS"); break;//только клиент
        case 37: 
            strcat(mes, "AUTHENTICATION");
            i++;
            if(i<bytesRec-1)
            {   strcat(mes, " ");
                switch((unsigned char) buf[i+1])
                {
                default: strcat(mes, "UNDEFINED");break;
                case 1: strcat(mes, "SEND"); break;  
                case 2: strcat(mes, "REPLY"); break;
                }
                i++;
                if(i<bytesRec-1) 
                {   strcat(mes, " ");
                    //cout << (int)(unsigned char) inbuf[i+1] <<endl;
                    switch((unsigned char) buf[i+1])
                    {
                    default: strcat(mes, "\"authentication-type-pair\"");break;
                    case 0: strcat(mes, "NULL"); break;
                    case 1: strcat(mes, "KERBEROS_V4"); break;
                    case 2: strcat(mes, "KERBEROS_V5"); break;
                    case 4: strcat(mes, "SRP"); break;
                    case 12: strcat(mes, "KEA_SJ"); break;
                    case 15: strcat(mes, "NTLM"); break;
                    }
                    i++;
                }
            }
    }
}
break;
            case 249: strcat(mes, "GA"); break;
            case 246: strcat(mes, "AYT"); break;
            case 242: strcat(mes, "DM"); break;// завершение неотложного потока данных
            case 241: strcat(mes, "NOP"); break;
            case 240: strcat(mes, "SE"); break;
            case 38: strcat(mes, "ENCRIPT"); break;
            case 37: strcat(mes, "AUTHENTICATION"); break;           
            case 32: strcat(mes, "TERMINAL-SPEED"); break;
            case 31: strcat(mes, "NAWS"); break;// обсуждение размера окна
            case 24: strcat(mes, "TERMINAL-TYPE"); break;
            case 6: strcat(mes, "TIMING-MARK"); break;
            case 5: strcat(mes, "STATUS"); break;// состояние опций другой стороны
            case 3: strcat(mes, "SUPPRESS GA"); break;
            case 1: strcat(mes, "ECHO"); break;
            case 0: strcat(mes, "TRANSMIT-BINARY"); break;
            default: strcat(mes, "NDEF"); // неопределено
        }
        strcat(mes, " ");
    }
    cout << mes << endl << endl;
}

#include "declare.h"
#include "classes.h"
#include "func.h"
 
Client::Client()
{
    EscapeSymbol = "]";
    wVerReq = MAKEWORD(2, 2);   
    
    try
    {
        if (WSAStartup (wVerReq, &wsaData) != 0 ) 
            throw("Версия Winsock не подходит");
 
        hSocket = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
        if (hSocket==INVALID_SOCKET)
            throw("Не удалось создать сокет");
 
        system("cls");
        cout << "TELNET-клиент" << endl;
        cout << "Символ переключения режима: " << EscapeSymbol << endl;
 
    }
    catch(char er[])
        {cout << "Ошибка при создании: " << er << endl; system("pause"); return;}
    }
Client::~Client()
{
    try
    {
    if (closesocket(hSocket)==SOCKET_ERROR)
        throw("Невозможно закрыть сокет");
    if (WSACleanup()!=0)
        throw("Не удалось освободить ресурсы, занятые Winsock");
    }
    catch(char er[]){cout << "Ошибка при завершении: " << er << endl; system("pause"); return;}
    
}
 
void Client::toConnect(int socknum)
{
    sockAddr.sin_family = AF_INET;
    sockAddr.sin_port = htons(socknum);
    sockAddr.sin_addr.S_un.S_addr = inet_addr(connection.getIP());
    
    try
    {
    if (connection.ConnectionStatus == false)
        if (connect(hSocket, (sockaddr*)(&sockAddr), sizeof(sockAddr))!=0)
            throw("Не удалось подключиться к серверу");
    connection.ConnectionStatus = true;
    
    cout << "Проходить авторизацию? (1 - да/0 - нет)" << endl;
    int auth_is; cin >> auth_is;
    if (auth_is == 0)
    {
        uint8_t wont_auth[] = {255,252,37}; // IAC WON'T AUTH
        toSend(wont_auth, arraysize(wont_auth));
    }
 
    }
    catch(char er[])
    {   
        cout << "Ошибка при соединении: " << er << endl; 
        system("pause"); 
        return;
    }
}
 
void Client::toClose()
{
    try
    {
    if (shutdown (hSocket, SD_BOTH)==SOCKET_ERROR)
    {
        throw("Не удалось закрыть соединение"); 
        if (closesocket(hSocket)==SOCKET_ERROR)
            throw("Невозможно закрыть сокет");
    }
    connection.ConnectionStatus = false;
 
    }
    catch(char er[])
    {   
        cout << "Ошибка при соединении: " << er << endl; 
        system("pause"); 
        return;
    }
}
 
void Client::Status()
{
    uint8_t are_you_there[] = {255,246}; // IAC AYT
    toSend(are_you_there, arraysize(are_you_there));
    toRecieve();
 
    if (connection.ConnectionStatus)
    {
        cout << "Подключен к " << connection.IPadress << endl;
        //cout << "Согласованный с сервером тип терминала " << connection.TermType << endl;
    }
    else
        cout << "Нет связи" << endl;
}
 
void Client::toRecieve()
{
    try
    {
    char buff[MAX_BUF_SIZE]; 
    int bytesReceived = 0;
    int res;
    timeval timeout;
    fd_set fdr;
    
    FD_ZERO(&fdr);
    FD_SET(hSocket,&fdr);
    
    timeout.tv_sec = 5;   ///зададим  структуру времени со значением 5 сек
    timeout.tv_usec = 0;   
    if (SOCKET_ERROR == (res = select (0, &fdr, NULL, NULL, &timeout)) )
    {
        cout <<"За " << timeout.tv_sec << 
        " секунд от сервера ничего не пришло" << endl;
        return;
    }
    if ((res!=0) && (FD_ISSET (hSocket, &fdr)) ) 
        bytesReceived = recv(hSocket, &buff[0], MAX_BUF_SIZE, 0);   //получаем данные из потока
    if(bytesReceived <= 0)
        throw("От сервера нет сообщений");
    
    buff[bytesReceived]=0;
    for (int i=0; i<bytesReceived; i++)
    {
        //Проверка на команду
        if ( ((uint8_t)(unsigned char)buff[i] == 255) && i+1 < bytesReceived)
            if ((i+2 < bytesReceived) 
            && ((uint8_t)(unsigned char)buff[i+1] != 255)) 
            {//если это команда
                cout << TranslSymb(buff, i, bytesReceived) << " ";
                cout << TranslSymb(buff, i+1, bytesReceived) << " ";
                cout << TranslSymb(buff, i+2, bytesReceived) << endl;
                
                i = i + 2;
            }
            else
            {cout << buff[i]; return;}
 
        //Проверка на перевод каретки
        else 
        {
            if ((uint8_t)(unsigned char)buff[i] == 13 && (i+1 < bytesReceived))
                if ((uint8_t)(unsigned char)buff[i+1] == 10)
                {i++; cout << endl; return;}
        cout << buff[i];
        }
    }
    cout << endl;   
 
    }
    catch (char er[])
    {
    cout << "Ошибка при получении сообщения от сервера: " << er << endl; 
    system("pause"); 
    return;
    }
}
 
void Client::toSend(const char *buff, int msgsize)
{
    try
    {
    int bytesSent = send(hSocket, buff, msgsize, 0);
    if (bytesSent <= 0)
        throw("Сообщение не было отправлено");
 
    cout << "Было отправлено сообщение: " << endl; 
    for (int i=0; i<bytesSent; i++)
    {
        cout << (unsigned char)buff[i];
    }
    cout << endl;
    }
 
    catch(char er[])
    {
    cout << "Ошибка при отправке сообщения на сервер: " << er << endl; 
    system("pause"); 
    return;
    }
}
 
void Client::toSend(uint8_t *buff, int msgsize)
{
    try
    {
    char *outbuf;
    outbuf = new char[msgsize+1];
    for (int i=0; i<msgsize; i++)
    {
        outbuf[i] = (unsigned char)buff[i];
        //if (buff[i] == 255)
        //{// если IAC, то удваиваем символ
        //  outbuf[i+1] = (unsigned char)buff[i];
        //  i++;
        //}
    } outbuf[msgsize] = '\0';// последний символ - \0
    cout << endl;
 
    int bytesSent = send(hSocket, outbuf, msgsize+1, 0);
    if (bytesSent <= 0)
        throw("Команда не была отправлена");
 
    cout << "Была отправлена команда: " << endl;
    for (int i=0; i<bytesSent; i++)
    {
        string com = TranslSymb(outbuf, i, bytesSent);
        cout << com.c_str() << " ";
    }
    cout << endl;
    }
 
    catch(char er[])
    {
    cout << "Ошибка при отправке сообщения на сервер: " << er << endl; 
    system("pause"); 
    return;
    }
}

        int chrlen = 0;
 
        //printf("Введите логин: ");
        char login[23];
        cin >> login;
        //cin.sync();
        //cin.getline(login,23);
        strcat(login,"\n\r");
        chrlen=strlen(login);
        //cin.get();getline(cin,msgbuffer,'\n');
        //msgbuffer+='\r';
        //msgbuffer+='\n';
        //chrlen = msgbuffer.length();
        toSend(login, chrlen);
        cout << endl;
        toRecieve();
        cout << endl;
 
        printf("Введите пароль: ");
        char password[23];
        //cin >> password;
        //cin.clear();
        //cin.sync();
        //cin.ignore();
        //cin.getline(password,23);
        strcat(password,"\r\n");
        chrlen=strlen(password);
        //msgbuffer2+='\r';
        //msgbuffer2+='\n';
        //chrlen = msgbuffer2.length();
        toSend(password, chrlen);
        cout << endl;
        toRecieve();
        cout << endl;