Synchronize with trunk revision 59781.
[reactos.git] / boot / freeldr / freeldr / comm / rs232.c
index 0ef92ce..7f0d9d8 100644 (file)
 #ifndef _M_ARM
 
 #include <freeldr.h>
+#include <cportlib/cportlib.h>
 
 /* MACROS *******************************************************************/
 
 #if DBG
 
-#define DEFAULT_BAUD_RATE    19200
+#define DEFAULT_BAUD_RATE   19200
 
-#define   SER_RBR(x)   ((x)+0)
-#define   SER_THR(x)   ((x)+0)
-#define   SER_DLL(x)   ((x)+0)
-#define   SER_IER(x)   ((x)+1)
-#define   SER_DLM(x)   ((x)+1)
-#define   SER_IIR(x)   ((x)+2)
-#define   SER_LCR(x)   ((x)+3)
-#define     SR_LCR_CS5 0x00
-#define     SR_LCR_CS6 0x01
-#define     SR_LCR_CS7 0x02
-#define     SR_LCR_CS8 0x03
-#define     SR_LCR_ST1 0x00
-#define     SR_LCR_ST2 0x04
-#define     SR_LCR_PNO 0x00
-#define     SR_LCR_POD 0x08
-#define     SR_LCR_PEV 0x18
-#define     SR_LCR_PMK 0x28
-#define     SR_LCR_PSP 0x38
-#define     SR_LCR_BRK 0x40
-#define     SR_LCR_DLAB 0x80
-#define   SER_MCR(x)   ((x)+4)
-#define     SR_MCR_DTR 0x01
-#define     SR_MCR_RTS 0x02
-#define   SER_LSR(x)   ((x)+5)
-#define     SR_LSR_DR  0x01
-#define     SR_LSR_TBE 0x20
-#define   SER_MSR(x)   ((x)+6)
-#define     SR_MSR_CTS 0x10
-#define     SR_MSR_DSR 0x20
-#define   SER_SCR(x)   ((x)+7)
 
 /* STATIC VARIABLES *********************************************************/
 
-static ULONG Rs232ComPort = 0;
-static ULONG Rs232BaudRate = 0;
-static PUCHAR Rs232PortBase = (PUCHAR)0;
+static ULONG BaseArray[] = {0, 0x3F8, 0x2F8, 0x3E8, 0x2E8};
 
-/* The com port must only be initialized once! */
+/* The COM port must only be initialized once! */
+static CPPORT Rs232ComPort;
 static BOOLEAN PortInitialized = FALSE;
 
-/* STATIC FUNCTIONS *********************************************************/
-
-static BOOLEAN Rs232DoesComPortExist(PUCHAR BaseAddress)
-{
-        BOOLEAN found;
-        UCHAR mcr;
-        UCHAR msr;
-
-        found = FALSE;
-
-        /* save Modem Control Register (MCR) */
-        mcr = READ_PORT_UCHAR (SER_MCR(BaseAddress));
-
-        /* enable loop mode (set Bit 4 of the MCR) */
-        WRITE_PORT_UCHAR (SER_MCR(BaseAddress), 0x10);
-
-        /* clear all modem output bits */
-        WRITE_PORT_UCHAR (SER_MCR(BaseAddress), 0x10);
-
-        /* read the Modem Status Register */
-        msr = READ_PORT_UCHAR (SER_MSR(BaseAddress));
-
-        /*
-         * the upper nibble of the MSR (modem output bits) must be
-         * equal to the lower nibble of the MCR (modem input bits)
-         */
-        if ((msr & 0xF0) == 0x00)
-        {
-                /* set all modem output bits */
-                WRITE_PORT_UCHAR (SER_MCR(BaseAddress), 0x1F);
-
-                /* read the Modem Status Register */
-                msr = READ_PORT_UCHAR (SER_MSR(BaseAddress));
-
-                /*
-                 * the upper nibble of the MSR (modem output bits) must be
-                 * equal to the lower nibble of the MCR (modem input bits)
-                 */
-                if ((msr & 0xF0) == 0xF0)
-                        found = TRUE;
-        }
-
-        /* restore MCR */
-        WRITE_PORT_UCHAR (SER_MCR(BaseAddress), mcr);
-
-        return (found);
-}
 
 /* FUNCTIONS *********************************************************/
 
-BOOLEAN Rs232PortInitialize(ULONG ComPort, ULONG BaudRate)
+BOOLEAN Rs232PortInitialize(IN ULONG ComPort,
+                            IN ULONG BaudRate)
 {
-        ULONG BaseArray[5] = {0, 0x3F8, 0x2F8, 0x3E8, 0x2E8};
-        //char buffer[80];
-        ULONG divisor;
-        UCHAR lcr;
+    NTSTATUS Status;
+    PUCHAR Address;
 
-        if (PortInitialized == FALSE)
+    if (PortInitialized == FALSE)
+    {
+        if (BaudRate == 0)
         {
-                if (BaudRate != 0)
-                {
-                        Rs232BaudRate = BaudRate;
-                }
-                else
-                {
-                        Rs232BaudRate = DEFAULT_BAUD_RATE;
-                }
-
-                if (ComPort == 0)
-                {
-                        if (Rs232DoesComPortExist ((PUCHAR)(ULONG_PTR)BaseArray[2]))
-                        {
-                                Rs232PortBase = (PUCHAR)(ULONG_PTR)BaseArray[2];
-                                Rs232ComPort = 2;
-/*#ifndef NDEBUG
-                                sprintf (buffer,
-                                         "\nSerial port COM%ld found at 0x%lx\n",
-                                         ComPort,
-                                         (ULONG)PortBase);
-                                HalDisplayString (buffer);
-#endif*/ /* NDEBUG */
-                        }
-                        else if (Rs232DoesComPortExist ((PUCHAR)(ULONG_PTR)BaseArray[1]))
-                        {
-                                Rs232PortBase = (PUCHAR)(ULONG_PTR)BaseArray[1];
-                                Rs232ComPort = 1;
-/*#ifndef NDEBUG
-                                sprintf (buffer,
-                                         "\nSerial port COM%ld found at 0x%lx\n",
-                                         ComPort,
-                                         (ULONG)PortBase);
-                                HalDisplayString (buffer);
-#endif*/ /* NDEBUG */
-                        }
-                        else
-                        {
-                                /*sprintf (buffer,
-                                         "\nKernel Debugger: No COM port found!!!\n\n");
-                                HalDisplayString (buffer);*/
-                                return FALSE;
-                        }
-                }
-                else
-                {
-                        if (Rs232DoesComPortExist ((PUCHAR)(ULONG_PTR)BaseArray[ComPort]))
-                        {
-                                Rs232PortBase = (PUCHAR)(ULONG_PTR)BaseArray[ComPort];
-                                Rs232ComPort = ComPort;
-/*#ifndef NDEBUG
-                                sprintf (buffer,
-                                         "\nSerial port COM%ld found at 0x%lx\n",
-                                         ComPort,
-                                         (ULONG)PortBase);
-                                HalDisplayString (buffer);
-#endif*/ /* NDEBUG */
-                        }
-                        else
-                        {
-                                /*sprintf (buffer,
-                                         "\nKernel Debugger: No serial port found!!!\n\n");
-                                HalDisplayString (buffer);*/
-                                return FALSE;
-                        }
-                }
-
-                PortInitialized = TRUE;
+            BaudRate = DEFAULT_BAUD_RATE;
         }
 
-        /*
-         * set baud rate and data format (8N1)
-         */
-
-        /*  turn on DTR and RTS  */
-        WRITE_PORT_UCHAR (SER_MCR(Rs232PortBase), SR_MCR_DTR | SR_MCR_RTS);
-
-        /* set DLAB */
-        lcr = READ_PORT_UCHAR (SER_LCR(Rs232PortBase)) | SR_LCR_DLAB;
-        WRITE_PORT_UCHAR (SER_LCR(Rs232PortBase), lcr);
-
-        /* set baud rate */
-        divisor = 115200 / BaudRate;
-        WRITE_PORT_UCHAR (SER_DLL(Rs232PortBase), divisor & 0xff);
-        WRITE_PORT_UCHAR (SER_DLM(Rs232PortBase), (divisor >> 8) & 0xff);
-
-        /* reset DLAB and set 8N1 format */
-        WRITE_PORT_UCHAR (SER_LCR(Rs232PortBase),
-                          SR_LCR_CS8 | SR_LCR_ST1 | SR_LCR_PNO);
-
-        /* read junk out of the RBR */
-        lcr = READ_PORT_UCHAR (SER_RBR(Rs232PortBase));
-
-        /*
-         * set global info
-         */
-        //KdComPortInUse = (ULONG)PortBase;
+        if (ComPort == 0)
+        {
+            if (CpDoesPortExist(UlongToPtr(BaseArray[2])))
+            {
+                Address = UlongToPtr(BaseArray[2]);
+            }
+            else if (CpDoesPortExist(UlongToPtr(BaseArray[1])))
+            {
+                Address = UlongToPtr(BaseArray[1]);
+            }
+            else
+            {
+                return FALSE;
+            }
+        }
+        else if (ComPort <= 4) // 4 == MAX_COM_PORTS
+        {
+            if (CpDoesPortExist(UlongToPtr(BaseArray[ComPort])))
+            {
+                Address = UlongToPtr(BaseArray[ComPort]);
+            }
+            else
+            {
+                return FALSE;
+            }
+        }
+        else
+        {
+            return FALSE;
+        }
 
-        /*
-         * print message to blue screen
-         */
-        /*sprintf (buffer,
-                 "\nKernel Debugger: COM%ld (Port 0x%lx) BaudRate %ld\n\n",
-                 ComPort,
-                 (ULONG)PortBase,
-                 BaudRate);
+        Status = CpInitialize(&Rs232ComPort, Address, BaudRate);
+        if (!NT_SUCCESS(Status)) return FALSE;
 
-        HalDisplayString (buffer);*/
+        PortInitialized = TRUE;
+    }
 
-        return TRUE;
+    return TRUE;
 }
 
-BOOLEAN Rs232PortGetByte(PUCHAR ByteRecieved)
+BOOLEAN Rs232PortGetByte(PUCHAR ByteReceived)
 {
-       if (PortInitialized == FALSE)
-               return FALSE;
-
-       if ((READ_PORT_UCHAR (SER_LSR(Rs232PortBase)) & SR_LSR_DR))
-       {
-               *ByteRecieved = READ_PORT_UCHAR (SER_RBR(Rs232PortBase));
-               return TRUE;
-       }
+    if (PortInitialized == FALSE)
+        return FALSE;
 
-       return FALSE;
+    return (CpGetByte(&Rs232ComPort, ByteReceived, TRUE, FALSE) == CP_GET_SUCCESS);
 }
 
-BOOLEAN Rs232PortPollByte(PUCHAR ByteRecieved)
+/*
+BOOLEAN Rs232PortPollByte(PUCHAR ByteReceived)
 {
-       if (PortInitialized == FALSE)
-               return FALSE;
-
-       while ((READ_PORT_UCHAR (SER_LSR(Rs232PortBase)) & SR_LSR_DR) == 0)
-               ;
+    if (PortInitialized == FALSE)
+        return FALSE;
 
-       *ByteRecieved = READ_PORT_UCHAR (SER_RBR(Rs232PortBase));
-
-       return TRUE;
+    return (CpGetByte(&Rs232ComPort, ByteReceived, FALSE) == CP_GET_SUCCESS);
 }
+*/
 
 VOID Rs232PortPutByte(UCHAR ByteToSend)
 {
-       if (PortInitialized == FALSE)
-               return;
-
-       while ((READ_PORT_UCHAR (SER_LSR(Rs232PortBase)) & SR_LSR_TBE) == 0)
-               ;
+    if (PortInitialized == FALSE)
+        return;
 
-       WRITE_PORT_UCHAR (SER_THR(Rs232PortBase), ByteToSend);
+    CpPutByte(&Rs232ComPort, ByteToSend);
 }
 
 #endif /* DBG */
 
-BOOLEAN Rs232PortInUse(ULONG Base)
+BOOLEAN Rs232PortInUse(PUCHAR Base)
 {
 #if DBG
-    return PortInitialized && Rs232PortBase == (PUCHAR)(ULONG_PTR)Base ? TRUE : FALSE;
+    return ( (PortInitialized && (Rs232ComPort.Address == Base)) ? TRUE : FALSE );
 #else
     return FALSE;
 #endif