serialport-os2.cpp@ 98103

Last change on this file since 98103 was 98103, checked in by vboxsync, 23 months ago
Copyright year updates by scm.
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 25.6 KB

Line
1	/* $Id: serialport-os2.cpp 98103 2023-01-17 14:15:46Z vboxsync $ */
2	/** @file
3	* IPRT - Serial Port API, OS/2 Implementation.
4	*/
5
6	/*
7	* Copyright (C) 2017-2023 Oracle and/or its affiliates.
8	*
9	* This file is part of VirtualBox base platform packages, as
10	* available from https://www.virtualbox.org.
11	*
12	* This program is free software; you can redistribute it and/or
13	* modify it under the terms of the GNU General Public License
14	* as published by the Free Software Foundation, in version 3 of the
15	* License.
16	*
17	* This program is distributed in the hope that it will be useful, but
18	* WITHOUT ANY WARRANTY; without even the implied warranty of
19	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
20	* General Public License for more details.
21	*
22	* You should have received a copy of the GNU General Public License
23	* along with this program; if not, see <https://www.gnu.org/licenses>.
24	*
25	* The contents of this file may alternatively be used under the terms
26	* of the Common Development and Distribution License Version 1.0
27	* (CDDL), a copy of it is provided in the "COPYING.CDDL" file included
28	* in the VirtualBox distribution, in which case the provisions of the
29	* CDDL are applicable instead of those of the GPL.
30	*
31	* You may elect to license modified versions of this file under the
32	* terms and conditions of either the GPL or the CDDL or both.
33	*
34	* SPDX-License-Identifier: GPL-3.0-only OR CDDL-1.0
35	*/
36
37
38	/*********************************************************************************************************************************
39	* Header Files *
40	*********************************************************************************************************************************/
41	#define INCL_BASE
42	#define INCL_DOSFILEMGR
43	#define INCL_ERRORS
44	#define INCL_DOS
45	#define INCL_DOSDEVIOCTL
46	#define INCL_DOSDEVICES
47	#include <os2.h>
48	#undef RT_MAX
49
50	#include <iprt/serialport.h>
51	#include "internal/iprt.h"
52
53	#include <iprt/asm.h>
54	#include <iprt/assert.h>
55	#include <iprt/cdefs.h>
56	#include <iprt/err.h>
57	#include <iprt/mem.h>
58	#include <iprt/string.h>
59	#include <iprt/time.h>
60	#include "internal/magics.h"
61
62
63
64	/*********************************************************************************************************************************
65	* Structures and Typedefs *
66	*********************************************************************************************************************************/
67
68	/**
69	* Returned data structure for ASYNC_EXTGETBAUDRATE.
70	*/
71	typedef struct OS2EXTGETBAUDRATEDATA
72	{
73	/** Current bit rate. */
74	ULONG uBitRateCur;
75	/** Fraction of the current bit rate. */
76	BYTE bBitRateCurFrac;
77	/** Minimum supported bit rate. */
78	ULONG uBitRateMin;
79	/** Fraction of the minimum bit rate. */
80	BYTE bBitRateCurMin;
81	/** Maximum supported bit rate. */
82	ULONG uBitRateMax;
83	/** Fraction of the maximum bit rate. */
84	BYTE bBitRateCurMax;
85	} OS2EXTGETBAUDRATEDATA;
86	/** Pointer to the get extended baud rate data packet. */
87	typedef OS2EXTGETBAUDRATEDATA *POS2EXTGETBAUDRATEDATA;
88
89
90	/**
91	* Data packet for the ASYNC_EXTSETBAUDRATE ioctl.
92	*/
93	typedef struct OS2EXTSETBAUDRATEDATA
94	{
95	/** Current bit rate. */
96	ULONG uBitRate;
97	/** Fraction of the current bit rate. */
98	BYTE bBitRateFrac;
99	} OS2EXTSETBAUDRATEDATA;
100	/** Pointer to the set extended baud rate data packet. */
101	typedef OS2EXTSETBAUDRATEDATA *POS2EXTSETBAUDRATEDATA;
102
103
104	/**
105	* Data packet for the ASYNC_GETLINECTRL ioctl.
106	*/
107	typedef struct OS2GETLINECTRLDATA
108	{
109	/** Returns the current amount of data bits in a symbol used for the communication. */
110	BYTE bDataBits;
111	/** Current parity setting. */
112	BYTE bParity;
113	/** Current number of stop bits. */
114	BYTE bStopBits;
115	/** Flag whether a break condition is currently transmitted on the line. */
116	BYTE bTxBrk;
117	} OS2GETLINECTRLDATA;
118	/** Pointer to the get line control data packet. */
119	typedef OS2GETLINECTRLDATA *POS2GETLINECTRLDATA;
120
121
122	/**
123	* Data packet for the ASYNC_SETLINECTRL ioctl.
124	*/
125	typedef struct OS2SETLINECTRLDATA
126	{
127	/** Returns the current amount of data bits in a symbol used for the communication. */
128	BYTE bDataBits;
129	/** Current parity setting. */
130	BYTE bParity;
131	/** Current number of stop bits. */
132	BYTE bStopBits;
133	} OS2SETLINECTRLDATA;
134	/** Pointer to the get line control data packet. */
135	typedef OS2SETLINECTRLDATA *POS2SETLINECTRLDATA;
136
137
138	/**
139	* Internal serial port state.
140	*/
141	typedef struct RTSERIALPORTINTERNAL
142	{
143	/** Magic value (RTSERIALPORT_MAGIC). */
144	uint32_t u32Magic;
145	/** Flags given while opening the serial port. */
146	uint32_t fOpenFlags;
147	/** The file descriptor of the serial port. */
148	HFILE hDev;
149	/** Flag whether blocking mode is currently enabled. */
150	bool fBlocking;
151	/** Flag whether RTSerialPortEvtPoll() was interrupted by RTSerialPortEvtPollInterrupt(). */
152	volatile bool fInterrupt;
153	} RTSERIALPORTINTERNAL;
154	/** Pointer to the internal serial port state. */
155	typedef RTSERIALPORTINTERNAL *PRTSERIALPORTINTERNAL;
156
157
158
159	/*********************************************************************************************************************************
160	* Defined Constants And Macros *
161	*********************************************************************************************************************************/
162
163	/** Indicator whether the CTS input is set/clear. */
164	#define OS2_GET_MODEM_INPUT_CTS RT_BIT(4)
165	/** Indicator whether the DSR input is set/clear. */
166	#define OS2_GET_MODEM_INPUT_DSR RT_BIT(5)
167	/** Indicator whether the RI input is set/clear. */
168	#define OS2_GET_MODEM_INPUT_RI RT_BIT(6)
169	/** Indicator whether the DCD input is set/clear. */
170	#define OS2_GET_MODEM_INPUT_DCD RT_BIT(7)
171
172	/** There is something to read on the serial port. */
173	#define OS2_GET_COMM_EVT_RX RT_BIT(0)
174	/** A receive timeout interrupt was generated on the serial port during a read request. */
175	#define OS2_GET_COMM_EVT_RTI RT_BIT(1)
176	/** The transmit queue for the serial port is empty. */
177	#define OS2_GET_COMM_EVT_TX_EMPTY RT_BIT(2)
178	/** The CTS signal changes state. */
179	#define OS2_GET_COMM_EVT_CTS_CHG RT_BIT(3)
180	/** The DSR signal changes state. */
181	#define OS2_GET_COMM_EVT_DSR_CHG RT_BIT(4)
182	/** The DCD signal changes state. */
183	#define OS2_GET_COMM_EVT_DCD_CHG RT_BIT(5)
184	/** A break condition was detected on the serial port. */
185	#define OS2_GET_COMM_EVT_BRK RT_BIT(6)
186	/** A parity, framing or receive hardware overrun error occurred. */
187	#define OS2_GET_COMM_EVT_COMM_ERR RT_BIT(7)
188	/** Trailing edge ring indicator was detected. */
189	#define OS2_GET_COMM_EVT_RI_TRAIL_EDGE RT_BIT(8)
190
191
192	/*********************************************************************************************************************************
193	* Global variables *
194	*********************************************************************************************************************************/
195	/** OS/2 parity value to IPRT parity enum. */
196	static RTSERIALPORTPARITY s_aParityConvTbl[] =
197	{
198	RTSERIALPORTPARITY_NONE,
199	RTSERIALPORTPARITY_ODD,
200	RTSERIALPORTPARITY_EVEN,
201	RTSERIALPORTPARITY_MARK,
202	RTSERIALPORTPARITY_SPACE
203	};
204
205	/** OS/2 data bits value to IPRT data bits enum. */
206	static RTSERIALPORTDATABITS s_aDataBitsConvTbl[] =
207	{
208	RTSERIALPORTDATABITS_INVALID,
209	RTSERIALPORTDATABITS_INVALID,
210	RTSERIALPORTDATABITS_INVALID,
211	RTSERIALPORTDATABITS_INVALID,
212	RTSERIALPORTDATABITS_INVALID,
213	RTSERIALPORTDATABITS_5BITS,
214	RTSERIALPORTDATABITS_6BITS,
215	RTSERIALPORTDATABITS_7BITS,
216	RTSERIALPORTDATABITS_8BITS
217	};
218
219	/** OS/2 stop bits value to IPRT stop bits enum. */
220	static RTSERIALPORTSTOPBITS s_aStopBitsConvTbl[] =
221	{
222	RTSERIALPORTSTOPBITS_ONE,
223	RTSERIALPORTSTOPBITS_ONEPOINTFIVE,
224	RTSERIALPORTSTOPBITS_TWO
225	};
226
227
228	/*********************************************************************************************************************************
229	* Internal Functions *
230	*********************************************************************************************************************************/
231
232	/**
233	* The slow path of rtSerialPortSwitchBlockingMode that does the actual switching.
234	*
235	* @returns IPRT status code.
236	* @param pThis The internal serial port instance data.
237	* @param fBlocking The desired mode of operation.
238	* @remarks Do not call directly.
239	*
240	* @note Affects only read behavior.
241	*/
242	static int rtSerialPortSwitchBlockingModeSlow(PRTSERIALPORTINTERNAL pThis, bool fBlocking)
243	{
244	DCBINFO DcbInfo;
245	ULONG cbDcbInfo = sizeof(DcbInfo);
246	ULONG rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, ASYNC_GETDCBINFO, NULL, 0, NULL, &DcbInfo, cbDcbInfo, &cbDcbInfo);
247	if (!rcOs2)
248	{
249	DcbInfo.fbTimeout &= ~0x06;
250	DcbInfo.fbTimeout \|= fBlocking ? 0x04 : 0x06;
251	rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, ASYNC_SETDCBINFO, &DcbInfo, cbDcbInfo, &cbDcbInfo, NULL, 0, NULL);
252	if (rcOs2)
253	return RTErrConvertFromOS2(rcOs2);
254	}
255	else
256	return RTErrConvertFromOS2(rcOs2);
257
258	pThis->fBlocking = fBlocking;
259	return VINF_SUCCESS;
260	}
261
262
263	/**
264	* Switches the serial port to the desired blocking mode if necessary.
265	*
266	* @returns IPRT status code.
267	* @param pThis The internal serial port instance data.
268	* @param fBlocking The desired mode of operation.
269	*
270	* @note Affects only read behavior.
271	*/
272	DECLINLINE(int) rtSerialPortSwitchBlockingMode(PRTSERIALPORTINTERNAL pThis, bool fBlocking)
273	{
274	if (pThis->fBlocking != fBlocking)
275	return rtSerialPortSwitchBlockingModeSlow(pThis, fBlocking);
276	return VINF_SUCCESS;
277	}
278
279
280	RTDECL(int) RTSerialPortOpen(PRTSERIALPORT phSerialPort, const char *pszPortAddress, uint32_t fFlags)
281	{
282	AssertPtrReturn(phSerialPort, VERR_INVALID_POINTER);
283	AssertPtrReturn(pszPortAddress, VERR_INVALID_POINTER);
284	AssertReturn(*pszPortAddress != '\0', VERR_INVALID_PARAMETER);
285	AssertReturn(!(fFlags & ~RTSERIALPORT_OPEN_F_VALID_MASK), VERR_INVALID_PARAMETER);
286	AssertReturn((fFlags & RTSERIALPORT_OPEN_F_READ) \|\| (fFlags & RTSERIALPORT_OPEN_F_WRITE),
287	VERR_INVALID_PARAMETER);
288
289	int rc = VINF_SUCCESS;
290	PRTSERIALPORTINTERNAL pThis = (PRTSERIALPORTINTERNAL)RTMemAllocZ(sizeof(*pThis));
291	if (pThis)
292	{
293	ULONG fOpenMode = OPEN_SHARE_DENYREADWRITE
294	\| OPEN_FLAGS_SEQUENTIAL
295	\| OPEN_FLAGS_NOINHERIT
296	\| OPEN_FLAGS_FAIL_ON_ERROR;
297
298	if ((fFlags & RTSERIALPORT_OPEN_F_READ) && !(fFlags & RTSERIALPORT_OPEN_F_WRITE))
299	fOpenMode \|= OPEN_ACCESS_READONLY;
300	else if (!(fFlags & RTSERIALPORT_OPEN_F_READ) && (fFlags & RTSERIALPORT_OPEN_F_WRITE))
301	fOpenMode \|= OPEN_ACCESS_WRITEONLY;
302	else
303	fOpenMode \|= OPEN_ACCESS_READWRITE;
304
305	pThis->u32Magic = RTSERIALPORT_MAGIC;
306	pThis->fOpenFlags = fFlags;
307	pThis->fInterrupt = false;
308	pThis->fBlocking = true;
309
310	ULONG uAction = 0;
311	ULONG rcOs2 = DosOpen((const UCHAR *)pszPortAddress, &pThis->hDev, &uAction, 0, FILE_NORMAL, FILE_OPEN, fOpenMode, NULL);
312	if (!rcOs2)
313	{
314	/* Switch to a known read blocking mode. */
315	rc = rtSerialPortSwitchBlockingMode(pThis, false);
316	if (RT_SUCCESS(rc))
317	{
318	*phSerialPort = pThis;
319	return VINF_SUCCESS;
320	}
321
322	DosClose(pThis->hDev);
323	}
324	else
325	rc = RTErrConvertFromOS2(rcOs2);
326
327	RTMemFree(pThis);
328	}
329	else
330	rc = VERR_NO_MEMORY;
331
332	return rc;
333	}
334
335
336	RTDECL(int) RTSerialPortClose(RTSERIALPORT hSerialPort)
337	{
338	PRTSERIALPORTINTERNAL pThis = hSerialPort;
339	if (pThis == NIL_RTSERIALPORT)
340	return VINF_SUCCESS;
341	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
342	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
343
344	/*
345	* Do the cleanup.
346	*/
347	AssertReturn(ASMAtomicCmpXchgU32(&pThis->u32Magic, RTSERIALPORT_MAGIC_DEAD, RTSERIALPORT_MAGIC), VERR_INVALID_HANDLE);
348
349	DosClose(pThis->hDev);
350	RTMemFree(pThis);
351	return VINF_SUCCESS;
352	}
353
354
355	RTDECL(RTHCINTPTR) RTSerialPortToNative(RTSERIALPORT hSerialPort)
356	{
357	PRTSERIALPORTINTERNAL pThis = hSerialPort;
358	AssertPtrReturn(pThis, -1);
359	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, -1);
360
361	return pThis->hDev;
362	}
363
364
365	RTDECL(int) RTSerialPortRead(RTSERIALPORT hSerialPort, void pvBuf, size_t cbToRead, size_t pcbRead)
366	{
367	PRTSERIALPORTINTERNAL pThis = hSerialPort;
368	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
369	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
370	AssertPtrReturn(pvBuf, VERR_INVALID_POINTER);
371	AssertReturn(cbToRead > 0, VERR_INVALID_PARAMETER);
372
373	int rc = rtSerialPortSwitchBlockingMode(pThis, true);
374	if (RT_SUCCESS(rc))
375	{
376	/*
377	* Attempt read.
378	*/
379	ULONG cbRead = 0;
380	ULONG rcOs2 = DosRead(pThis->hDev, pvBuf, cbToRead, &cbRead);
381	if (!rcOs2)
382	{
383	if (pcbRead)
384	/* caller can handle partial read. */
385	*pcbRead = cbRead;
386	else
387	{
388	/* Caller expects all to be read. */
389	while (cbToRead > cbRead)
390	{
391	ULONG cbReadPart = 0;
392	rcOs2 = DosRead(pThis->hDev, (uint8_t *)pvBuf + cbRead, cbToRead - cbRead, &cbReadPart);
393	if (rcOs2)
394	return RTErrConvertFromOS2(rcOs2);
395
396	cbRead += cbReadPart;
397	}
398	}
399	}
400	else
401	rc = RTErrConvertFromOS2(rcOs2);
402	}
403
404	return rc;
405	}
406
407
408	RTDECL(int) RTSerialPortReadNB(RTSERIALPORT hSerialPort, void pvBuf, size_t cbToRead, size_t pcbRead)
409	{
410	PRTSERIALPORTINTERNAL pThis = hSerialPort;
411	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
412	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
413	AssertPtrReturn(pvBuf, VERR_INVALID_POINTER);
414	AssertReturn(cbToRead > 0, VERR_INVALID_PARAMETER);
415	AssertPtrReturn(pcbRead, VERR_INVALID_POINTER);
416
417	*pcbRead = 0;
418
419	int rc = rtSerialPortSwitchBlockingMode(pThis, false);
420	if (RT_SUCCESS(rc))
421	{
422	ULONG cbThisRead = 0;
423	ULONG rcOs2 = DosRead(pThis->hDev, pvBuf, cbToRead, &cbThisRead);
424	if (!rcOs2)
425	{
426	*pcbRead = cbThisRead;
427
428	if (cbThisRead == 0)
429	rc = VINF_TRY_AGAIN;
430	}
431	else
432	rc = RTErrConvertFromOS2(rcOs2);
433	}
434
435	return rc;
436	}
437
438
439	RTDECL(int) RTSerialPortWrite(RTSERIALPORT hSerialPort, const void pvBuf, size_t cbToWrite, size_t pcbWritten)
440	{
441	PRTSERIALPORTINTERNAL pThis = hSerialPort;
442	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
443	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
444	AssertPtrReturn(pvBuf, VERR_INVALID_POINTER);
445	AssertReturn(cbToWrite > 0, VERR_INVALID_PARAMETER);
446
447	/*
448	* Attempt write.
449	*/
450	int rc = VINF_SUCCESS;
451	ULONG cbThisWritten = 0;
452	ULONG rcOs2 = DosWrite(pThis->hDev, pvBuf, cbToWrite, &cbThisWritten);
453	if (!rcOs2)
454	{
455	if (pcbWritten)
456	/* caller can handle partial write. */
457	*pcbWritten = cbThisWritten;
458	else
459	{
460	/** @todo Wait for TX empty and loop. */
461	rc = VERR_NOT_SUPPORTED;
462	}
463	}
464	else
465	rc = RTErrConvertFromOS2(rcOs2);
466
467	return rc;
468	}
469
470
471	RTDECL(int) RTSerialPortWriteNB(RTSERIALPORT hSerialPort, const void pvBuf, size_t cbToWrite, size_t pcbWritten)
472	{
473	PRTSERIALPORTINTERNAL pThis = hSerialPort;
474	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
475	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
476	AssertPtrReturn(pvBuf, VERR_INVALID_POINTER);
477	AssertReturn(cbToWrite > 0, VERR_INVALID_PARAMETER);
478	AssertPtrReturn(pcbWritten, VERR_INVALID_POINTER);
479
480	*pcbWritten = 0;
481
482	int rc = VINF_SUCCESS;
483	ULONG cbThisWritten = 0;
484	ULONG rcOs2 = DosWrite(pThis->hDev, pvBuf, cbToWrite, &cbThisWritten);
485	if (!rcOs2)
486	{
487	*pcbWritten = cbThisWritten;
488	if (!cbThisWritten)
489	rc = VINF_TRY_AGAIN;
490	}
491	else
492	rc = RTErrConvertFromOS2(rcOs2);
493
494	return rc;
495	}
496
497
498	RTDECL(int) RTSerialPortCfgQueryCurrent(RTSERIALPORT hSerialPort, PRTSERIALPORTCFG pCfg)
499	{
500	PRTSERIALPORTINTERNAL pThis = hSerialPort;
501	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
502	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
503
504	int rc = VINF_SUCCESS;
505	OS2EXTGETBAUDRATEDATA ExtBaudRate;
506	ULONG cbExtBaudRate = sizeof(ExtBaudRate);
507	ULONG rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, ASYNC_EXTGETBAUDRATE, NULL, 0, NULL, &ExtBaudRate, cbExtBaudRate, &cbExtBaudRate);
508	if (!rcOs2)
509	{
510	OS2GETLINECTRLDATA LineCtrl;
511	ULONG cbLineCtrl = sizeof(LineCtrl);
512	rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, ASYNC_GETLINECTRL, NULL, 0, NULL, &LineCtrl, cbLineCtrl, &cbLineCtrl);
513	if (!rcOs2)
514	{
515	pCfg->uBaudRate = ExtBaudRate.uBitRateCur;
516	if (LineCtrl.bParity < RT_ELEMENTS(s_aParityConvTbl))
517	pCfg->enmParity = s_aParityConvTbl[LineCtrl.bParity];
518	else
519	rc = VERR_IPE_UNEXPECTED_STATUS;
520
521	if ( RT_SUCCESS(rc)
522	&& LineCtrl.bDataBits < RT_ELEMENTS(s_aDataBitsConvTbl)
523	&& s_aDataBitsConvTbl[LineCtrl.bDataBits] != RTSERIALPORTDATABITS_INVALID)
524	pCfg->enmDataBitCount = s_aDataBitsConvTbl[LineCtrl.bDataBits];
525	else
526	rc = VERR_IPE_UNEXPECTED_STATUS;
527
528	if ( RT_SUCCESS(rc)
529	&& LineCtrl.bStopBits < RT_ELEMENTS(s_aStopBitsConvTbl))
530	pCfg->enmStopBitCount = s_aStopBitsConvTbl[LineCtrl.bStopBits];
531	else
532	rc = VERR_IPE_UNEXPECTED_STATUS;
533	}
534	else
535	rc = RTErrConvertFromOS2(rcOs2);
536	}
537	else
538	rc = RTErrConvertFromOS2(rcOs2);
539
540	return rc;
541	}
542
543
544	RTDECL(int) RTSerialPortCfgSet(RTSERIALPORT hSerialPort, PCRTSERIALPORTCFG pCfg, PRTERRINFO pErrInfo)
545	{
546	PRTSERIALPORTINTERNAL pThis = hSerialPort;
547	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
548	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
549
550	int rc = VINF_SUCCESS;
551	OS2EXTSETBAUDRATEDATA ExtBaudRate;
552	OS2SETLINECTRLDATA LineCtrl;
553	ULONG cbExtBaudRate = sizeof(ExtBaudRate);
554	ULONG cbLineCtrl = sizeof(LineCtrl);
555
556	ExtBaudRate.uBitRate = pCfg->uBaudRate;
557	ExtBaudRate.bBitRateFrac = 0;
558
559	BYTE idx = 0;
560	while (idx < RT_ELEMENTS(s_aParityConvTbl))
561	{
562	if (s_aParityConvTbl[idx] == pCfg->enmParity)
563	{
564	LineCtrl.bParity = idx;
565	break;
566	}
567	idx++;
568	}
569	AssertReturn(idx < RT_ELEMENTS(s_aParityConvTbl), VERR_INTERNAL_ERROR);
570
571	idx = 0;
572	while (idx < RT_ELEMENTS(s_aDataBitsConvTbl))
573	{
574	if (s_aDataBitsConvTbl[idx] == pCfg->enmDataBitCount)
575	{
576	LineCtrl.bDataBits = idx;
577	break;
578	}
579	idx++;
580	}
581	AssertReturn(idx < RT_ELEMENTS(s_aDataBitsConvTbl), VERR_INTERNAL_ERROR);
582
583	idx = 0;
584	while (idx < RT_ELEMENTS(s_aStopBitsConvTbl))
585	{
586	if (s_aStopBitsConvTbl[idx] == pCfg->enmStopBitCount)
587	{
588	LineCtrl.bStopBits = idx;
589	break;
590	}
591	idx++;
592	}
593	AssertReturn(idx < RT_ELEMENTS(s_aStopBitsConvTbl), VERR_INTERNAL_ERROR);
594
595	ULONG rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, ASYNC_EXTSETBAUDRATE, &ExtBaudRate, cbExtBaudRate, &cbExtBaudRate, NULL, 0, NULL);
596	if (!rcOs2)
597	{
598	rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, ASYNC_SETLINECTRL, &LineCtrl, cbLineCtrl, &cbLineCtrl, NULL, 0, NULL);
599	if (rcOs2)
600	rc = RTErrConvertFromOS2(rcOs2);
601	}
602	else
603	rc = RTErrConvertFromOS2(rcOs2);
604
605	return rc;
606	}
607
608
609	RTDECL(int) RTSerialPortEvtPoll(RTSERIALPORT hSerialPort, uint32_t fEvtMask, uint32_t *pfEvtsRecv,
610	RTMSINTERVAL msTimeout)
611	{
612	PRTSERIALPORTINTERNAL pThis = hSerialPort;
613	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
614	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
615	AssertReturn(!(fEvtMask & ~RTSERIALPORT_EVT_F_VALID_MASK), VERR_INVALID_PARAMETER);
616	AssertPtrReturn(pfEvtsRecv, VERR_INVALID_POINTER);
617
618	*pfEvtsRecv = 0;
619
620	/*
621	* We need to kind of busy wait here as there is, to my knowledge, no API
622	* to wait for a COM event.
623	*
624	* @todo Adaptive waiting
625	* @todo Handle rollover after 48days eventually
626	*/
627	int rc = VINF_SUCCESS;
628	uint64_t tsStart = RTTimeSystemMilliTS();
629	do
630	{
631	if (ASMAtomicXchgBool(&pThis->fInterrupt, false))
632	{
633	rc = VERR_INTERRUPTED;
634	break;
635	}
636
637	USHORT fCommEvt = 0;
638	ULONG cbCommEvt = sizeof(fCommEvt);
639	ULONG rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, ASYNC_GETCOMMEVENT, NULL, 0, NULL,
640	&fCommEvt, cbCommEvt, &cbCommEvt);
641	if (!rcOs2)
642	{
643	AssertReturn(cbCommEvt = sizeof(fCommEvt), VERR_IPE_UNEXPECTED_STATUS);
644
645	if ( (fEvtMask & RTSERIALPORT_EVT_F_DATA_RX)
646	&& (fCommEvt & OS2_GET_COMM_EVT_RX))
647	*pfEvtsRecv \|= RTSERIALPORT_EVT_F_DATA_RX;
648
649	/** @todo Is there something better to indicate that there is room in the queue instead of queue is empty? */
650	if ( (fEvtMask & RTSERIALPORT_EVT_F_DATA_TX)
651	&& (fCommEvt & OS2_GET_COMM_EVT_TX_EMPTY))
652	*pfEvtsRecv \|= RTSERIALPORT_EVT_F_DATA_TX;
653
654	if ( (fEvtMask & RTSERIALPORT_EVT_F_STATUS_LINE_CHANGED)
655	&& (fCommEvt & (OS2_GET_COMM_EVT_CTS_CHG \| OS2_GET_COMM_EVT_DSR_CHG \| OS2_GET_COMM_EVT_DCD_CHG)))
656	*pfEvtsRecv \|= RTSERIALPORT_EVT_F_STATUS_LINE_CHANGED;
657
658	if ( (fEvtMask & RTSERIALPORT_EVT_F_BREAK_DETECTED)
659	&& (fCommEvt & OS2_GET_COMM_EVT_BRK))
660	*pfEvtsRecv \|= RTSERIALPORT_EVT_F_BREAK_DETECTED;
661
662	if (*pfEvtsRecv != 0)
663	break;
664	}
665	else
666	{
667	rc = RTErrConvertFromOS2(rcOs2);
668	break;
669	}
670
671	uint64_t tsNow = RTTimeSystemMilliTS();
672	if ( msTimeout == RT_INDEFINITE_WAIT
673	\|\| tsNow - tsStart < msTimeout)
674	DosSleep(1);
675	else
676	rc = VERR_TIMEOUT;
677	} while (RT_SUCCESS(rc));
678
679	return rc;
680	}
681
682
683	RTDECL(int) RTSerialPortEvtPollInterrupt(RTSERIALPORT hSerialPort)
684	{
685	PRTSERIALPORTINTERNAL pThis = hSerialPort;
686	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
687	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
688
689	ASMAtomicXchgBool(&pThis->fInterrupt, true);
690	return VINF_SUCCESS;
691	}
692
693
694	RTDECL(int) RTSerialPortChgBreakCondition(RTSERIALPORT hSerialPort, bool fSet)
695	{
696	PRTSERIALPORTINTERNAL pThis = hSerialPort;
697	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
698	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
699
700	ULONG rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, fSet ? ASYNC_SETBREAKON : ASYNC_SETBREAKOFF,
701	NULL, 0, NULL, NULL, 0, NULL);
702
703	return RTErrConvertFromOS2(rcOs2);
704	}
705
706
707	RTDECL(int) RTSerialPortChgStatusLines(RTSERIALPORT hSerialPort, uint32_t fClear, uint32_t fSet)
708	{
709	PRTSERIALPORTINTERNAL pThis = hSerialPort;
710	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
711	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
712
713	MODEMSTATUS MdmSts;
714	ULONG cbMdmSts = sizeof(MdmSts);
715
716	MdmSts.fbModemOn = (fSet & RTSERIALPORT_CHG_STS_LINES_F_RTS ? 0x02 : 0x00)
717	\| (fSet & RTSERIALPORT_CHG_STS_LINES_F_DTR ? 0x01 : 0x00);
718	MdmSts.fbModemOff = 0xff;
719	MdmSts.fbModemOff &= ~( (fClear & RTSERIALPORT_CHG_STS_LINES_F_RTS ? 0x02 : 0x00)
720	\| (fClear & RTSERIALPORT_CHG_STS_LINES_F_DTR ? 0x01 : 0x00));
721
722	ULONG rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, ASYNC_SETMODEMCTRL, &MdmSts, cbMdmSts, &cbMdmSts, NULL, 0, NULL);
723
724	return RTErrConvertFromOS2(rcOs2);
725	}
726
727
728	RTDECL(int) RTSerialPortQueryStatusLines(RTSERIALPORT hSerialPort, uint32_t *pfStsLines)
729	{
730	PRTSERIALPORTINTERNAL pThis = hSerialPort;
731	AssertPtrReturn(pThis, VERR_INVALID_PARAMETER);
732	AssertReturn(pThis->u32Magic == RTSERIALPORT_MAGIC, VERR_INVALID_HANDLE);
733	AssertPtrReturn(pfStsLines, VERR_INVALID_POINTER);
734
735	*pfStsLines = 0;
736
737	int rc = VINF_SUCCESS;
738	BYTE fStsLines = 0;
739	ULONG cbStsLines = sizeof(fStsLines);
740	ULONG rcOs2 = DosDevIOCtl(pThis->hDev, IOCTL_ASYNC, ASYNC_GETMODEMINPUT, NULL, 0, NULL, &fStsLines, cbStsLines, &cbStsLines);
741	if (!rcOs2)
742	{
743	AssertReturn(cbStsLines == sizeof(BYTE), VERR_IPE_UNEXPECTED_STATUS);
744
745	*pfStsLines \|= (fStsLines & OS2_GET_MODEM_INPUT_DCD) ? RTSERIALPORT_STS_LINE_DCD : 0;
746	*pfStsLines \|= (fStsLines & OS2_GET_MODEM_INPUT_RI) ? RTSERIALPORT_STS_LINE_RI : 0;
747	*pfStsLines \|= (fStsLines & OS2_GET_MODEM_INPUT_DSR) ? RTSERIALPORT_STS_LINE_DSR : 0;
748	*pfStsLines \|= (fStsLines & OS2_GET_MODEM_INPUT_CTS) ? RTSERIALPORT_STS_LINE_CTS : 0;
749	}
750	else
751	rc = RTErrConvertFromOS2(rcOs2);
752
753	return rc;
754	}
755

Note: See TracBrowser for help on using the repository browser.

source: vbox/trunk/src/VBox/Runtime/r3/os2/serialport-os2.cpp@ 98103

Download in other formats: