From 752cd8fb98f1c65b9f482bdbebeef0bd14d98856 Mon Sep 17 00:00:00 2001
From: Joel Sherrill <joel.sherrill@OARcorp.com>
Date: Tue, 15 Oct 1996 20:57:04 +0000
Subject: initial version from Erik

---
 c/src/lib/libbsp/i386/i386ex/console/console.c | 220 +++++++++++++++++++++++++
 1 file changed, 220 insertions(+)
 create mode 100644 c/src/lib/libbsp/i386/i386ex/console/console.c

(limited to 'c/src/lib/libbsp/i386/i386ex/console')

diff --git a/c/src/lib/libbsp/i386/i386ex/console/console.c b/c/src/lib/libbsp/i386/i386ex/console/console.c
new file mode 100644
index 0000000000..60d9db17dc
--- /dev/null
+++ b/c/src/lib/libbsp/i386/i386ex/console/console.c
@@ -0,0 +1,220 @@
+/*
+ *  This file contains the Force CPU386 console IO package.
+ *
+ *  COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
+ *  On-Line Applications Research Corporation (OAR).
+ *  All rights assigned to U.S. Government, 1994.
+ *
+ *  This material may be reproduced by or for the U.S. Government pursuant
+ *  to the copyright license under the clause at DFARS 252.227-7013.  This
+ *  notice must appear in all copies of this file and its derivatives.
+ *
+ *  $Id$
+ */
+
+#define F386_INIT
+
+#include <stdlib.h>
+#include <stdio.h>   /* to be removed */
+
+#include <rtems.h>
+#include "console.h"
+#include "bsp.h"
+#include "../startup/80386ex.h"
+
+/*  console_cleanup
+ *
+ *  This routine is called at exit to clean up the console hardware.
+ *
+ *  Input parameters: NONE
+ *
+ *  Output parameters:  NONE
+ *
+ *  Return values:
+ */
+
+void console_cleanup( void )
+{
+  register rtems_unsigned8 ignored;
+
+/* clear the read buffer */
+
+   inport_byte( RBR0, ignored );
+
+/*  inport_byte( RBR0, ignored );
+ *  inport_byte( RBR0, ignored );
+ *  inport_byte( RBR0, ignored );
+ *  inport_byte( RBR0, ignored );
+ */
+
+}
+
+/*  console_initialize
+ *
+ *  This routine initializes the console IO driver.
+ *
+ *  Input parameters: NONE
+ *
+ *  Output parameters:  NONE
+ *
+ *  Return values:
+ */
+
+rtems_device_driver console_initialize(
+  rtems_device_major_number  major,
+  rtems_device_minor_number  minor,
+  void                      *arg,
+  rtems_id                   self,
+  rtems_unsigned32          *status
+)
+{
+   /*
+    *  flush the console now and at exit.  Just in case.
+    */
+
+   console_cleanup();
+
+   atexit( console_cleanup );
+}
+
+
+/*  is_character_ready
+ *
+ *  This routine returns TRUE if a character is available.
+ *
+ *  Input parameters: NONE
+ *
+ *  Output parameters:  NONE
+ *
+ *  Return values:
+ */
+
+rtems_boolean is_character_ready(
+  char *ch
+)
+{
+  register rtems_unsigned8 status;
+
+  inport_byte( LSR1, status );
+
+  if ( Is_rx_ready( status ) ) {
+     inport_byte( RBR1,  status );
+     *ch = status;
+     return TRUE;
+  }
+  return FALSE;
+}
+
+/*  inbyte
+ *
+ *  This routine reads a character from the UART.
+ *
+ *  Input parameters: NONE
+ *
+ *  Output parameters:  NONE
+ *
+ *  Return values:
+ *    character read from UART
+ */
+
+char inbyte( void )
+{
+  register rtems_unsigned8 status; 
+  char                     ch;
+
+  do {
+    inport_byte( LSR1, status );
+  } while ( !( status & 0x01 ));/* s/b while ( !( Is_rx_ready( status ) ) ); */
+
+  inport_byte( RBR1, ch );
+
+  return ch;
+}
+
+/*  outbyte
+ *
+ *  This routine transmits a character out the port.  It supports
+ *  XON/XOFF flow control.
+ *
+ *  Input parameters:
+ *    ch  - character to be transmitted
+ *
+ *  Output parameters:  NONE
+ */
+
+void outbyte(
+  char ch
+)
+{
+  rtems_unsigned8 status;
+
+  do {
+    inport_byte( LSR1, status );
+  } while ( ! ( 0x40 & status ) ); /* ( Is_tx_ready( status ) ) );*/
+
+/*
+ *  GDB will NOT use XON/XOFF protocol
+ */
+
+
+#ifdef USE_XON
+  
+  while ( is_character_ready( &status ) == TRUE ) { 
+    if ( status == XOFF )
+      do {
+        while ( is_character_ready( &status ) == FALSE ) ;
+      } while ( status != XON );
+  }
+
+#endif
+
+  outport_byte( TBR1, ch );
+
+}
+
+/*
+ * __read  -- read bytes from the serial port. Ignore fd, since
+ *            we only have stdin.
+ */
+
+int __read(
+  int fd,
+  char *buf,
+  int nbytes
+)
+{
+  int i = 0;
+
+  for (i = 0; i < nbytes; i++) {
+    *(buf + i) = inbyte();
+    if ((*(buf + i) == '\n') || (*(buf + i) == '\r')) {
+      (*(buf + i++)) = '\n';
+      (*(buf + i)) = 0;
+      break;
+    }
+  }
+  return (i);
+}
+
+/*
+ * __write -- write bytes to the serial port. Ignore fd, since
+ *            stdout and stderr are the same. Since we have no filesystem,
+ *            open will only return an error.
+ */
+
+int __write(
+  int fd,
+  char *buf,
+  int nbytes
+)
+{
+  int i;
+
+  for (i = 0; i < nbytes; i++) {
+    if (*(buf + i) == '\n') {
+      outbyte ('\r');
+    }
+    outbyte (*(buf + i));
+  }
+  return (nbytes);
+}
-- 
cgit v1.2.3