branches/linux-serial/Serial.cpp

#ifndef _MSC_VER //linux
#include <sys/types.h>
#include <sys/stat.h>

#include <unistd.h>
#include <errno.h>
#include <termios.h>
#include <fcntl.h>
#endif

#include "stdafx.h"
#include "Serial.h"

#include <stdexcept>
#include <string>
#include <sstream>
#include <iostream>
#include <iomanip>

#define _POSIX_SOURCE 1 /* POSIX compliant source */
#define BAUDRATE B9600

#ifndef _MSC_VER // ugly hack, else will gcc not accept this constant in openLinux()
const int flags = O_RDWR | O_NOCTTY | O_NONBLOCK;
#endif

std::string writeLastError()
{
#ifdef _MSC_VER
        LPVOID lpMsgBuf;
        FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER|FORMAT_MESSAGE_FROM_SYSTEM|FORMAT_MESSAGE_IGNORE_INSERTS,
                        NULL,
                        GetLastError(),
                        MAKELANGID(LANG_NEUTRAL,SUBLANG_DEFAULT),
                        (LPSTR) &lpMsgBuf,
                        0,
                        NULL);

        std::ostringstream out;
        out << "Error" << lpMsgBuf;
        return out.str();
#else //linux
        return std::string( strerror(errno) );
#endif
}


CSerial::CSerial()
{
        mIsopen = false;
}


CSerial::CSerial(char* port, Baudrate bitrate)
{
        mPortstr = port;
        mBitrate = bitrate;
        mIsopen = false;

#ifdef _MSC_VER
        openWindows();
#else
        openLinux();
#endif
}

CSerial::~CSerial(void)
{
        close();
}

void CSerial::open(char* port, Baudrate bitrate)
{
        if (mIsopen)
                throw std::runtime_error("Port already opened");

        mPortstr = port;
        mBitrate = bitrate;
        
#ifdef _MSC_VER
        openWindows();
#else
        openLinux();
#endif
}

#ifdef _MSC_VER
void CSerial::openWindows()
{
        mComport = CreateFile( mPortstr, GENERIC_READ|GENERIC_WRITE,0,0,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0);

        if (mComport == INVALID_HANDLE_VALUE)
        {
                throw std::runtime_error(writeLastError().c_str());
        }

        DCB dcb;
        dcb.DCBlength = sizeof(DCB);
        mDcbRestore.DCBlength = sizeof(DCB);

        if (!GetCommState(mComport,&dcb) || !GetCommState(mComport,&mDcbRestore))
        {
                std::string error = writeLastError();
                CloseHandle(mComport);
                throw std::exception(error.c_str());
        }

        dcb.BaudRate = convertBaudrate(mBitrate);
        dcb.ByteSize = 8;
        dcb.Parity = NOPARITY;
        dcb.StopBits = ONESTOPBIT;
        dcb.fDtrControl = DTR_CONTROL_DISABLE;
        dcb.fRtsControl = RTS_CONTROL_DISABLE;
        dcb.fParity = false;
        dcb.fDsrSensitivity = false;

        if (!SetCommState(mComport,&dcb))
        {
                std::string error = writeLastError();
                CloseHandle(mComport);
                throw std::runtime_error( error );
        }

        mIsopen = true;
}
#endif


#ifndef _MSC_VER
void CSerial::openLinux()
{
        termios newtio;

        std::cout << "opening port " << std::endl;      
        mFiledescriptor = ::open(mPortstr, flags);
        if (mFiledescriptor < 0)
                throw std::runtime_error( writeLastError() );

        std::cout << "port opened" << std::endl;
        bzero(&newtio, sizeof(newtio) ); 

        // use a std. 8N1 config
        newtio.c_cflag = convertBaudrate(mBitrate) | CRTSCTS | CS8 | CLOCAL | CREAD;
        newtio.c_iflag = IGNPAR;
        newtio.c_oflag = 0;

        // set input mode (non-canonical, no echo,...) 
        newtio.c_lflag = 0;
                         
        newtio.c_cc[VTIME]    = 0;   // inter-character timer unused 
        newtio.c_cc[VMIN]     = 0;   // blocking read until 1 chars received 
        

/*      cfmakeraw(&newtio);
        cfsetospeed(&newtio, B9600 );
        cfsetispeed(&newtio, B9600 );
*/      
                                        
        tcflush(mFiledescriptor, TCIFLUSH);
        tcsetattr(mFiledescriptor, TCSANOW, &newtio);
        
        std::cout << "port configured " << std::endl;
        mIsopen = true;
}
#endif

void CSerial::close()
{
        if (mIsopen)
        {
#ifdef _MSC_VER
                while (getComstat().cbOutQue >0)
                        Sleep(5);
                SetCommState(mComport,&mDcbRestore);
                CloseHandle(mComport);
#else // linux close()
                tcdrain(mFiledescriptor);
                tcsetattr(mFiledescriptor, TCSADRAIN, &mOldtio); //restore settings, when all data is written
                ::close(mFiledescriptor); //close()== system-call
#endif
                mIsopen = false;
        }
}


int CSerial::readByte()
{
        unsigned char out;
        unsigned long size;

        if (!mIsopen)
                throw std::runtime_error("Port not opened");
#ifdef _MSC_VER
        ReadFile(mComport,&out,1,&size,0);
        if (size != 1)
        {
                std::string error = writeLastError();
                CloseHandle(mComport);
                throw std::exception(error.c_str());
        }
#else //linux readByte()
        size = read(mFiledescriptor, &out, 1);
        if (size != 1) 
        {
                //std::cout << writeLastError() << std::endl;
                return -1;
        }
#endif

        printByte("Read", out);
        return out;
}


void CSerial::writeByte(unsigned char out)
{
        unsigned long size;

        printByte("Write", out);
        if (!mIsopen)
                throw std::runtime_error("Port not opened");

#ifdef _MSC_VER
        while (getComstat().cbOutQue >0)
                Sleep(2);

        WriteFile(mComport,&out,1,&size, NULL);
        if (size ==0)
        {
                std::string error = writeLastError();
                CloseHandle(mComport);
                throw std::exception(error.c_str());
        }
#else //linux writeByte()
        //tcdrain(mFiledescriptor);
        size = write(mFiledescriptor,&out,1);
        Sleep(50);
        //tcdrain(mFiledescriptor);
        if (size != 1)
                throw std::runtime_error(writeLastError() );
#endif
}

int CSerial::convertBaudrate(Baudrate rate)
{
        int retval=0;
#ifdef _MSC_VER
        switch( rate )
        {
                case Baud300:
                        retval = 300;
                        break;
                case Baud600:
                        retval = 600;
                        break;
                case Baud1200:
                        retval = 1200;
                        break;
                case Baud2400:
                        retval = 2400;
                        break;
                case Baud4800:
                        retval = 4800;
                        break;
                case Baud9600:
                        retval = 9600;
                        break;
                case Baud19200:
                        retval = 19200;
                        break;
                case Baud38400:
                        retval = 38400;
                        break;
                case Baud57600:
                        retval = 57600;
                        break;
                case Baud115200:
                        retval = 115200;
                        break;                  
        }
#else
        switch (rate)
        {
                case Baud300:
                        retval = B300;
                        break;
                case Baud600:
                        retval = B600;
                        break;
                case Baud1200:
                        retval = B1200;
                        break;
                case Baud2400:
                        retval = B2400;
                        break;
                case Baud4800:
                        retval = B4800;
                        break;
                case Baud9600:
                        retval = B9600;
                        break;
                case Baud19200:
                        retval = B19200;
                        break;
                case Baud38400:
                        retval = B38400;
                        break;
                case Baud57600:
                        retval = B57600;
                        break;
                case Baud115200:
                        retval = B115200;
                        break;
        }
#endif

        return retval;
}

#ifdef _MSC_VER
COMSTAT CSerial::getComstat() const
{
        if (!mIsopen)
                throw std::exception("Port not opened");

        COMSTAT stat;
        DWORD x;
        ClearCommError(mComport,&x,&stat);
        return stat;
}
#endif

int CSerial::bytesReady() const
{
#ifdef _MSC_VER
        return getComstat().cbInQue;
#else
        return 0;
#endif
}

int CSerial::outQueueSize() const
{
#ifdef _MSC_VER
        return getComstat().cbOutQue;
#else
        return 0;
#endif
}

// Debug function
//
void CSerial::printByte(char* description, unsigned char byte)
{
        std::cout << description << " : " <<  (int) byte << "/" << std::setw(2) << std::setfill('0') << std::hex << (int) byte << std::endl;
        std::cout << std::dec;
}


/*
void CSerial::writeBytes(UCVector out)
{
        unsigned long bytesWritten;
        unsigned int size = out.size();
        unsigned char *buf = new unsigned char[size];

        for (int i=0; i<size; i++)
                buf[i] = out[i];

        WriteFile(mComport,buf,size,&bytesWritten,NULL);
        if (bytesWritten != size)
        {
                std::string error = writeLastError();
                CloseHandle(mComport);
                throw std::exception(error.c_str());
        }
        delete[] buf;
}
*/


/*
UCVector CSerial::readBytes(int maxcount)
{
        UCVector buf;


        return buf;
}
*/
1	#ifndef _MSC_VER //linux
2	#include <sys/types.h>
3	#include <sys/stat.h>
4
5	#include <unistd.h>
6	#include <errno.h>
7	#include <termios.h>
8	#include <fcntl.h>
9	#endif
10
11	#include "stdafx.h"
12	#include "Serial.h"
13
14	#include <stdexcept>
15	#include <string>
16	#include <sstream>
17	#include <iostream>
18	#include <iomanip>
19
20	#define _POSIX_SOURCE 1 /* POSIX compliant source */
21	#define BAUDRATE B9600
22
23	#ifndef _MSC_VER // ugly hack, else will gcc not accept this constant in openLinux()
24	const int flags = O_RDWR \| O_NOCTTY \| O_NONBLOCK;
25	#endif
26
27	std::string writeLastError()
28	{
29	#ifdef _MSC_VER
30	LPVOID lpMsgBuf;
31	FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER\|FORMAT_MESSAGE_FROM_SYSTEM\|FORMAT_MESSAGE_IGNORE_INSERTS,
32	NULL,
33	GetLastError(),
34	MAKELANGID(LANG_NEUTRAL,SUBLANG_DEFAULT),
35	(LPSTR) &lpMsgBuf,
36	0,
37	NULL);
38
39	std::ostringstream out;
40	out << "Error" << lpMsgBuf;
41	return out.str();
42	#else //linux
43	return std::string( strerror(errno) );
44	#endif
45	}
46
47
48	CSerial::CSerial()
49	{
50	mIsopen = false;
51	}
52
53
54	CSerial::CSerial(char* port, Baudrate bitrate)
55	{
56	mPortstr = port;
57	mBitrate = bitrate;
58	mIsopen = false;
59
60	#ifdef _MSC_VER
61	openWindows();
62	#else
63	openLinux();
64	#endif
65	}
66
67	CSerial::~CSerial(void)
68	{
69	close();
70	}
71
72	void CSerial::open(char* port, Baudrate bitrate)
73	{
74	if (mIsopen)
75	throw std::runtime_error("Port already opened");
76
77	mPortstr = port;
78	mBitrate = bitrate;
79
80	#ifdef _MSC_VER
81	openWindows();
82	#else
83	openLinux();
84	#endif
85	}
86
87	#ifdef _MSC_VER
88	void CSerial::openWindows()
89	{
90	mComport = CreateFile( mPortstr, GENERIC_READ\|GENERIC_WRITE,0,0,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0);
91
92	if (mComport == INVALID_HANDLE_VALUE)
93	{
94	throw std::runtime_error(writeLastError().c_str());
95	}
96
97	DCB dcb;
98	dcb.DCBlength = sizeof(DCB);
99	mDcbRestore.DCBlength = sizeof(DCB);
100
101	if (!GetCommState(mComport,&dcb) \|\| !GetCommState(mComport,&mDcbRestore))
102	{
103	std::string error = writeLastError();
104	CloseHandle(mComport);
105	throw std::exception(error.c_str());
106	}
107
108	dcb.BaudRate = convertBaudrate(mBitrate);
109	dcb.ByteSize = 8;
110	dcb.Parity = NOPARITY;
111	dcb.StopBits = ONESTOPBIT;
112	dcb.fDtrControl = DTR_CONTROL_DISABLE;
113	dcb.fRtsControl = RTS_CONTROL_DISABLE;
114	dcb.fParity = false;
115	dcb.fDsrSensitivity = false;
116
117	if (!SetCommState(mComport,&dcb))
118	{
119	std::string error = writeLastError();
120	CloseHandle(mComport);
121	throw std::runtime_error( error );
122	}
123
124	mIsopen = true;
125	}
126	#endif
127
128
129	#ifndef _MSC_VER
130	void CSerial::openLinux()
131	{
132	termios newtio;
133
134	std::cout << "opening port " << std::endl;
135	mFiledescriptor = ::open(mPortstr, flags);
136	if (mFiledescriptor < 0)
137	throw std::runtime_error( writeLastError() );
138
139	std::cout << "port opened" << std::endl;
140	bzero(&newtio, sizeof(newtio) );
141
142	// use a std. 8N1 config
143	newtio.c_cflag = convertBaudrate(mBitrate) \| CRTSCTS \| CS8 \| CLOCAL \| CREAD;
144	newtio.c_iflag = IGNPAR;
145	newtio.c_oflag = 0;
146
147	// set input mode (non-canonical, no echo,...)
148	newtio.c_lflag = 0;
149
150	newtio.c_cc[VTIME] = 0; // inter-character timer unused
151	newtio.c_cc[VMIN] = 0; // blocking read until 1 chars received
152
153
154	/* cfmakeraw(&newtio);
155	cfsetospeed(&newtio, B9600 );
156	cfsetispeed(&newtio, B9600 );
157	*/
158
159	tcflush(mFiledescriptor, TCIFLUSH);
160	tcsetattr(mFiledescriptor, TCSANOW, &newtio);
161
162	std::cout << "port configured " << std::endl;
163	mIsopen = true;
164	}
165	#endif
166
167	void CSerial::close()
168	{
169	if (mIsopen)
170	{
171	#ifdef _MSC_VER
172	while (getComstat().cbOutQue >0)
173	Sleep(5);
174	SetCommState(mComport,&mDcbRestore);
175	CloseHandle(mComport);
176	#else // linux close()
177	tcdrain(mFiledescriptor);
178	tcsetattr(mFiledescriptor, TCSADRAIN, &mOldtio); //restore settings, when all data is written
179	::close(mFiledescriptor); //close()== system-call
180	#endif
181	mIsopen = false;
182	}
183	}
184
185
186	int CSerial::readByte()
187	{
188	unsigned char out;
189	unsigned long size;
190
191	if (!mIsopen)
192	throw std::runtime_error("Port not opened");
193	#ifdef _MSC_VER
194	ReadFile(mComport,&out,1,&size,0);
195	if (size != 1)
196	{
197	std::string error = writeLastError();
198	CloseHandle(mComport);
199	throw std::exception(error.c_str());
200	}
201	#else //linux readByte()
202	size = read(mFiledescriptor, &out, 1);
203	if (size != 1)
204	{
205	//std::cout << writeLastError() << std::endl;
206	return -1;
207	}
208	#endif
209
210	printByte("Read", out);
211	return out;
212	}
213
214
215	void CSerial::writeByte(unsigned char out)
216	{
217	unsigned long size;
218
219	printByte("Write", out);
220	if (!mIsopen)
221	throw std::runtime_error("Port not opened");
222
223	#ifdef _MSC_VER
224	while (getComstat().cbOutQue >0)
225	Sleep(2);
226
227	WriteFile(mComport,&out,1,&size, NULL);
228	if (size ==0)
229	{
230	std::string error = writeLastError();
231	CloseHandle(mComport);
232	throw std::exception(error.c_str());
233	}
234	#else //linux writeByte()
235	//tcdrain(mFiledescriptor);
236	size = write(mFiledescriptor,&out,1);
237	Sleep(50);
238	//tcdrain(mFiledescriptor);
239	if (size != 1)
240	throw std::runtime_error(writeLastError() );
241	#endif
242	}
243
244	int CSerial::convertBaudrate(Baudrate rate)
245	{
246	int retval=0;
247	#ifdef _MSC_VER
248	switch( rate )
249	{
250	case Baud300:
251	retval = 300;
252	break;
253	case Baud600:
254	retval = 600;
255	break;
256	case Baud1200:
257	retval = 1200;
258	break;
259	case Baud2400:
260	retval = 2400;
261	break;
262	case Baud4800:
263	retval = 4800;
264	break;
265	case Baud9600:
266	retval = 9600;
267	break;
268	case Baud19200:
269	retval = 19200;
270	break;
271	case Baud38400:
272	retval = 38400;
273	break;
274	case Baud57600:
275	retval = 57600;
276	break;
277	case Baud115200:
278	retval = 115200;
279	break;
280	}
281	#else
282	switch (rate)
283	{
284	case Baud300:
285	retval = B300;
286	break;
287	case Baud600:
288	retval = B600;
289	break;
290	case Baud1200:
291	retval = B1200;
292	break;
293	case Baud2400:
294	retval = B2400;
295	break;
296	case Baud4800:
297	retval = B4800;
298	break;
299	case Baud9600:
300	retval = B9600;
301	break;
302	case Baud19200:
303	retval = B19200;
304	break;
305	case Baud38400:
306	retval = B38400;
307	break;
308	case Baud57600:
309	retval = B57600;
310	break;
311	case Baud115200:
312	retval = B115200;
313	break;
314	}
315	#endif
316
317	return retval;
318	}
319
320	#ifdef _MSC_VER
321	COMSTAT CSerial::getComstat() const
322	{
323	if (!mIsopen)
324	throw std::exception("Port not opened");
325
326	COMSTAT stat;
327	DWORD x;
328	ClearCommError(mComport,&x,&stat);
329	return stat;
330	}
331	#endif
332
333	int CSerial::bytesReady() const
334	{
335	#ifdef _MSC_VER
336	return getComstat().cbInQue;
337	#else
338	return 0;
339	#endif
340	}
341
342	int CSerial::outQueueSize() const
343	{
344	#ifdef _MSC_VER
345	return getComstat().cbOutQue;
346	#else
347	return 0;
348	#endif
349	}
350
351	// Debug function
352	//
353	void CSerial::printByte(char* description, unsigned char byte)
354	{
355	std::cout << description << " : " << (int) byte << "/" << std::setw(2) << std::setfill('0') << std::hex << (int) byte << std::endl;
356	std::cout << std::dec;
357	}
358
359
360	/*
361	void CSerial::writeBytes(UCVector out)
362	{
363	unsigned long bytesWritten;
364	unsigned int size = out.size();
365	unsigned char *buf = new unsigned char[size];
366
367	for (int i=0; i<size; i++)
368	buf[i] = out[i];
369
370	WriteFile(mComport,buf,size,&bytesWritten,NULL);
371	if (bytesWritten != size)
372	{
373	std::string error = writeLastError();
374	CloseHandle(mComport);
375	throw std::exception(error.c_str());
376	}
377	delete[] buf;
378	}
379	*/
380
381
382	/*
383	UCVector CSerial::readBytes(int maxcount)
384	{
385	UCVector buf;
386
387
388
389	return buf;
390	}
391	*/