Форум программистов [Powered by Invision Power Board]

Цитата(GreatShogun @ 13.8.2012, 12:41

)

дополнительный преобразователь?

Цитата(GremlinProg @ 13.8.2012, 11:15)

Цитата(GreatShogun @ 13.8.2012, 12:41

)

дополнительный преобразователь?

еще один контроллер, который понимает эти 9 бит и ретранслирует их в обычные 8

Код



HANDLE HanPORT = 0;
DCB dcb;

memset(&dcb,0,sizeof(dcb));
dcb.DCBlength=sizeof(dcb);


HanPORT = CreateFile(&NamePort[1], GENERIC_READ|GENERIC_WRITE, 0, NULL,OPEN_EXISTING, 0,NULL);



    if(HanPORT!=INVALID_HANDLE_VALUE)
    { Form1->Memo1->Lines->Add("Порт открыт");}
    else
    { Form1->Memo1->Lines->Add("Порт не открылся"); return;}



    if (!GetCommState(HanPORT,&dcb))
    {Form1->Memo1->Lines->Add("Не считались настройки"); return;}else
    {Form1->Memo1->Lines->Add("считались настройки");}

    dcb.BaudRate=StrToInt(ComboBox2->Text);
    dcb.ByteSize=StrToInt(ComboBox3->Text);;
    dcb.Parity=0;//Form1->CheckBox1->Checked;
    dcb.StopBits=ONESTOPBIT;//Form1->CheckBox2->Checked;
 //   dcb.fDtrControl = DTR_CONTROL_ENABLE;
 //   dcb.fRtsControl = RTS_CONTROL_DISABLE;

    if (!SetCommState(HanPORT,&dcb))
    {Form1->Memo1->Lines->Add("Не записались настройки"); return;}else
    {Form1->Memo1->Lines->Add("записались настройки");}

  COMMTIMEOUTS  CommTimeouts;
  GetCommTimeouts(HanPORT, &CommTimeouts); //получаем структуру CommTimeouts что бы не заполнять все вручную
  CommTimeouts.ReadIntervalTimeout =MAXDWORD;  //функция ReadFile возвращает
  CommTimeouts.ReadTotalTimeoutMultiplier = 0; //немедленно все имеющиеся
  CommTimeouts.ReadTotalTimeoutConstant = 0;   //байты в приемном буфере
  CommTimeouts.WriteTotalTimeoutMultiplier = 0;//общий тайм-аут для
  CommTimeouts.WriteTotalTimeoutConstant = 0;  //операции записи не используется.
  SetCommTimeouts(HanPORT, &CommTimeouts); //записываем измененную структуру

Цитата(GremlinProg @ 13.8.2012, 11:32)

успокойся, bass, преобразователь нужен только если это не UART, как я уже сказал

Цитата(bass @ 13.8.2012, 13:55

)

Прочитал повнимательнее ТС.

Цитата(GremlinProg @ 13.8.2012, 12:37

)

надо выставить в DCB::ByteSize значение 9

Цитата(bass @ 13.8.2012, 13:55

)

dcb.ByteSize= 9

Код


WriteFile(HanPORT,&Buffer,1,&Bytes,0);

Код


WriteFile(HanPORT,&Buffer,2,&Bytes,0);

Код


bool SerialPort::CreateCOM(string name)
{
    LPCWSTR NameCom = StdStrToLpt(name);
    hCom = CreateFile(NameCom, GENERIC_READ | GENERIC_WRITE, 0, NULL, OPEN_EXISTING, FILE_FLAG_OVERLAPPED, NULL);

    SetReadTimeout(1);
    SetWriteTimeout(1);
    SetSpeed(9600);
    SetParity(4);
    SetOtherSettings();

    SetupComm(hCom, 2000, 2000);

    PurgeComm(hCom, PURGE_RXCLEAR);

    if (hCom == INVALID_HANDLE_VALUE)
    {
        return false;
    }
    return true;
}

bool SerialPort::DestroyCOM()
{
    CloseHandle(hCom);
    return true;
}

bool SerialPort::CheckPortOpen()
{
    if (hCom == INVALID_HANDLE_VALUE)
    {
        return false;
    }
    return true;
}

void SerialPort::InitReadOverllaped()
{
    overlapped.hEvent = CreateEvent(NULL, true, true, NULL);    //создать сигнальный объект-событие для асинхронных операций
    SetCommMask(hCom, EV_RXCHAR);                            //установить маску на срабатывание по событию приёма байта в порт
}

void SerialPort::InitWriteOverllaped()
{
    overlappedwr.hEvent = CreateEvent(NULL, true, true, NULL);      //создать событие
}

void SerialPort::SetReadTimeout(int time)
{
    COMMTIMEOUTS touts;
    GetCommTimeouts(hCom, &touts);
    touts.ReadIntervalTimeout =  time * 1000;
    touts.ReadTotalTimeoutMultiplier = time * 1000;
    touts.ReadTotalTimeoutConstant = time * 1000;
    SetCommTimeouts(hCom, &touts);
}

void SerialPort::SetWriteTimeout(int time)
{
    COMMTIMEOUTS touts;
    GetCommTimeouts(hCom, &touts);
    touts.WriteTotalTimeoutMultiplier = time * 1000;
    touts.WriteTotalTimeoutConstant = time * 1000;
    SetCommTimeouts(hCom, &touts);
}

void SerialPort::SetSpeed(int speed)
{
    DCB dcb;

    bool wasChange = GetCommState(hCom, &dcb);


    if(speed == 9600)
    {
        dcb.BaudRate = CBR_9600;
    }
    else if (speed == 19200)
    {
        dcb.BaudRate = CBR_19200;
    }
    else if (speed == 38400)
    {
        dcb.BaudRate = CBR_38400;
    }
    else if (speed == 57600)
    {
        dcb.BaudRate = CBR_57600;
    }
    else if (speed == 115200)
    {
        dcb.BaudRate = CBR_115200;
    }
    else
    {
        dcb.BaudRate = CBR_9600;
    }

    if(wasChange)
    {
        wasChange = SetCommState(hCom, &dcb);
    }

}

void SerialPort::SetParity(int parity)
{
    DCB dcb;

    bool wasChange = GetCommState(hCom, &dcb);

    dcb.Parity = parity;

    if(wasChange)
    {
        wasChange = SetCommState(hCom, &dcb);
    }

}

void SerialPort::SetOtherSettings()
{
    DCB dcb;

    bool wasChange = GetCommState(hCom, &dcb);

    dcb.fBinary = FALSE;                                   //включаем двоичный режим обмена
    dcb.fParity = TRUE;                                   // разрешение контроля четности
    dcb.fOutxCtsFlow = FALSE;                              //выключаем режим слежения за сигналом CTS
    dcb.fOutxDsrFlow = FALSE;                              //выключаем режим слежения за сигналом DSR
    dcb.fDtrControl = DTR_CONTROL_DISABLE;                 //отключаем использование линии DTR
    dcb.fDsrSensitivity = FALSE;                           //отключаем восприимчивость драйвера к состоянию линии DSR
    dcb.fTXContinueOnXoff = FALSE;
    dcb.fOutX = FALSE;
    dcb.fInX = FALSE;
    dcb.fErrorChar = FALSE;
    dcb.fNull = FALSE;                                     //разрешить приём нулевых байтов
    dcb.fRtsControl = RTS_CONTROL_DISABLE;                 //отключаем использование линии RTS
    dcb.fAbortOnError = FALSE;                             //отключаем остановку всех операций чтения/записи при ошибке
    dcb.ByteSize = 8;                                      //задаём 9 бит в байте
    //dcb.Parity = 0;                                        //отключаем проверку чётности
    dcb.StopBits = 0;                                      //задаём один стоп-бит


    if(wasChange)
    {
        wasChange = SetCommState(hCom, &dcb);
    }
}

void SerialPort::ParityONOFF(bool logic)
{
    DCB dcb;

    bool wasChange = GetCommState(hCom, &dcb);

    if(logic)
    {
        dcb.fParity = TRUE;
    }
    else
    {
        dcb.fParity = FALSE;
    }


    if(wasChange)
    {
        wasChange = SetCommState(hCom, &dcb);
    }
}

bool SerialPort::WriteToCOM(string mess)
{
    DWORD temp, signal;    //temp - переменная-заглушка

    char* buf = new char[mess.length()];
    memcpy(buf, mess.c_str(), mess.length());
    bool writed = WriteFile(hCom, buf, mess.length(), &temp, &overlappedwr);

    signal = WaitForSingleObject(overlappedwr.hEvent, INFINITE);      //приостановить поток, пока не завершится перекрываемая операция WriteFile
    return !writed;
}

bool SerialPort::ReadFromCOM(string & mess, int bits, int timeout)
{
    COMSTAT comstat;        //структура текущего состояния порта, в данной программе используется для определения количества принятых в порт байтов
    DWORD btr = 1, temp, mask, signal;    //переменная temp используется в качестве заглушки

    timeout *= 1000;
    Sleep(timeout);

    WaitCommEvent(hCom, &mask, &overlapped);                //ожидать события приёма байта (это и есть перекрываемая операция)
    signal = WaitForSingleObject(overlapped.hEvent, 1);    //приостановить поток до прихода байта
    if(signal == WAIT_OBJECT_0)                        //если событие прихода байта произошло
    {
        if(GetOverlappedResult(hCom, &overlapped, &temp, true)) //проверяем, успешно ли завершилась перекрываемая операция WaitCommEvent
        {
            if((mask & EV_RXCHAR)!=0)                    //если произошло именно событие прихода байта
            {
                ClearCommError(hCom, &temp, &comstat);        //нужно заполнить структуру COMSTAT
                btr = comstat.cbInQue;                           //и получить из неё количество принятых байтов

                if(btr)                                  //если действительно есть байты для чтения
                {
                    int leng = (int)btr;
                    char* buf = new char[leng];
                    string bufer = "";
                    for(int i = 0; i < leng; i++)
                    {
                        ReadFile(hCom, buf, 1, &temp, &overlapped);     //прочитать байты из порта в буфер программы
                        bufer += buf[0];
                    }
                    counter += leng;                                          //увеличиваем счётчик байтов
                    mess = string(bufer);
                    //mess = mess.substr(0, mess.length()-3);

                    if(bits < mess.length());
                    {
                        mess = mess.substr(0, bits-1);
                    }


                    return true;                          //вызываем функцию для вывода данных на экран и в файл
                }
             }
         }
     }

     return true;
}

void SerialPort::CloseReadOverllaped()
{
    CloseHandle(overlapped.hEvent);
}

void SerialPort::CloseWriteOverllaped()
{
    CloseHandle(overlappedwr.hEvent);
}

void SerialPort::PurgeCOM()
{
    PurgeComm(hCom, PURGE_RXCLEAR);
    PurgeComm(hCom, PURGE_TXCLEAR);             //очистить передающий буфер порта
}

Код


bool writed = WriteFile(hCom, mess, 1, &temp, &overlappedwr);

Код


    if(GetCommState(Handle,&MyDCB)==0) return -1;
    MyDCB.Parity=MARKPARITY;
    if(SetCommState(Handle,&MyDCB)==0)return -1;

Код


    if(GetCommState(Handle,&MyDCB)==0) return -1;
    MyDCB.Parity=SPACEPARITY;
    if(SetCommState(Handle,&MyDCB)==0)return -1;

Цитата

Хотя комп порт обязан их поддерживать всетаки это стандарт.........

Код


    COMMTIMEOUTS tout; // Струтура, описавающая времена ожидания (таймауты)

    // Открытие порта
    Handle=CreateFile( Name, GENERIC_WRITE|GENERIC_READ,NULL,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
    
    if( Handle == INVALID_HANDLE_VALUE )
    {
        DWORD res = GetLastError();
        return -1;
    }
    
    //Задание размера буфера в байтах
    
    fl = SetupComm( Handle, 3000, 3000 );  //
    if( fl == 0 ) 
        return -1;
    
    //Задание таймаутов
    tout.ReadIntervalTimeout = TimeOut;
    tout.ReadTotalTimeoutMultiplier = TimeOut;
    tout.ReadTotalTimeoutConstant = TimeOut;
    tout.WriteTotalTimeoutMultiplier = TimeOut;
    tout.WriteTotalTimeoutConstant = TimeOut;
    fl = SetCommTimeouts( Handle, &tout ); // !!!
    if( fl == 0 ) 
        return -1;

    //Считывание текущего состояния DCB (
    fl = GetCommState( Handle, &MyDCB );  // !!!
    if( fl == 0 )
        return -1;

    //Заполнение DCB
    MyDCB.BaudRate = BaudRate;     // current baud rate
    MyDCB.fBinary = TRUE;          // binary mode, no EOF check
    MyDCB.fParity = TRUE;          // enable parity checking
 
        MyDCB.fOutxCtsFlow = FALSE;      // CTS output flow control
        MyDCB.fRtsControl = RTS_CONTROL_DISABLE;       // RTS flow control
 
    MyDCB.fOutxDsrFlow = FALSE;      // DSR output flow control
    MyDCB.fDtrControl = DTR_CONTROL_DISABLE;       // DTR flow control type
    
    MyDCB.fDsrSensitivity = FALSE;   // DSR sensitivity
    MyDCB.fTXContinueOnXoff = 0; // XOFF continues Tx
    MyDCB.fOutX = 0;            // XON/XOFF out flow control
    MyDCB.fInX = 0;             // XON/XOFF in flow control
    MyDCB.fErrorChar = 0;       // enable error replacement
    MyDCB.fNull = 0;            // enable null stripping

    MyDCB.fAbortOnError = 0;     // abort reads/writes on error
    MyDCB.XonLim = 0;               // transmit XON threshold
    MyDCB.XoffLim = 0;              // transmit XOFF threshold
    MyDCB.ByteSize = DataBit;       // number of bits/byte, 4-8

    switch( StopBit )
    { 
        case 1:    
            MyDCB.StopBits = 0;            // 0,1,2 = 1, 1.5, 2
            break;
        case 2:    
            MyDCB.StopBits=1;
            break;
    }
     
    MyDCB.XonChar = 0;              // Tx and Rx XON character
    MyDCB.XoffChar = 0;             // Tx and Rx XOFF character
    MyDCB.ErrorChar = 0;            // error replacement character
    MyDCB.EofChar = 0;              // end of input character
    MyDCB.EvtChar = 0;              // received event character
    MyDCB.wReserved1;           // reserved; do not use

     //Настройка порта в соответствии с заполненным DCB
    fl = SetCommState( Handle, &MyDCB );  // !!!
    if( fl == 0 ) 
        return -1;
    return 0;

Код


    GetCommState(hComPort, &dcb1);
    dcb1.BaudRate=9600;
    dcb1.fBinary=1;
    dcb1.fParity=1;
    dcb1.fDtrControl=0;
    dcb1.Parity=MARKPARITY;

    dcb1.ByteSize=8;//databits;
    dcb1.StopBits =ONESTOPBIT; //stopbits;
    dcb1.fOutxCtsFlow=0;
    dcb1.fOutxDsrFlow=0;
    dcb1.fDsrSensitivity=0;
    dcb1.fOutX=0;
    dcb1.fInX=0;
    SetCommState(hComPort, &dcb1);

Цитата

Задержки действительно помогли