2001-01-26 Ralf Corsepius <corsepiu@faw.uni-ulm.de>

* gdbsci/, scitab/, trap34/: Add directories.

c/src/lib/libbsp/sh/shsim/ChangeLog

@@ -1,3 +1,7 @@
+2001-01-25	Ralf Corsepius <corsepiu@faw.uni-ulm.de>
+
+	* gdbsci/, scitab/, trap34/: Add directories.
+
 2001-01-24	Ralf Corsepius <corsepiu@faw.uni-ulm.de>
 
 	* Makefile.am, README, console/console-io.c, start/start.S,

c/src/lib/libbsp/sh/shsim/gdbsci/.cvsignore

@@ -0,0 +1,2 @@
+Makefile
+Makefile.in

c/src/lib/libbsp/sh/shsim/gdbsci/Makefile.am

@@ -0,0 +1,31 @@
+##
+## $Id$
+##
+
+AUTOMAKE_OPTIONS = foreign 1.4
+
+PGM = $(ARCH)/sci.rel
+
+C_FILES = gdbsci.c
+C_O_FILES = $(C_FILES:%.c=$(ARCH)/%.o)
+
+OBJS = $(C_O_FILES)
+
+include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg
+include $(top_srcdir)/../../../../../../automake/compile.am
+include $(top_srcdir)/../../../../../../automake/lib.am
+
+#
+# (OPTIONAL) Add local stuff here using +=
+#
+
+$(PGM): $(OBJS)
+	$(make-rel)
+
+all-local: $(ARCH) $(OBJS) $(PGM)
+
+.PRECIOUS: $(PGM)
+
+EXTRA_DIST = sci.c
+
+include $(top_srcdir)/../../../../../../automake/local.am

c/src/lib/libbsp/sh/shsim/gdbsci/gdbsci.c

@@ -0,0 +1,387 @@
+/*
+ * /dev/gdbsci[0|1] for gdb's simulator's SH sci emulation
+ *
+ *  Author: Ralf Corsepius (corsepiu@faw.uni-ulm.de)
+ *
+ *  COPYRIGHT (c) 2001, Ralf Corsepius, Ulm, Germany
+ *
+ *  This program is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ *
+ *  $Id$
+ */
+
+#include <rtems.h>
+
+#include <stdlib.h>
+
+#include <rtems/libio.h>
+#include <iosupp.h>
+#include <rtems/score/sh_io.h>
+/* HACK: There must be something better than this :) */
+#if defined(__sh1__)
+#include <rtems/score/ispsh7032.h>
+#include <rtems/score/iosh7032.h>
+#elif defined(__sh2__)
+#include <rtems/score/ispsh7045.h>
+#include <rtems/score/iosh7045.h>
+#else
+#error unsupported sh model
+#endif
+#include <sh/sh7_sci.h>
+#include <sh/sh7_pfc.h>
+#include <sh/sci.h>
+
+/* 
+ * gdb assumes area 5/char access (base address & 0x0500000), 
+ * the RTEMS's sh7045 code however defaults to area 5/int/short/char access
+ * [Very likely a bug in the sh7045 code, RC.]
+ */
+ 
+#define GDBSCI_BASE 0x05ffffff
+
+#define GDBSCI0_SMR (SCI0_SMR & GDBSCI_BASE)
+#define GDBSCI0_BRR (SCI0_BRR & GDBSCI_BASE)
+#define GDBSCI0_SCR (SCI0_SCR & GDBSCI_BASE)
+#define GDBSCI0_TDR (SCI0_TDR & GDBSCI_BASE)
+#define GDBSCI0_SSR (SCI0_SSR & GDBSCI_BASE)
+#define GDBSCI0_RDR (SCI0_RDR & GDBSCI_BASE)
+
+#define GDBSCI1_SMR (SCI1_SMR & GDBSCI_BASE)
+#define GDBSCI1_BRR (SCI1_BRR & GDBSCI_BASE)
+#define GDBSCI1_SCR (SCI1_SCR & GDBSCI_BASE)
+#define GDBSCI1_TDR (SCI1_TDR & GDBSCI_BASE)
+#define GDBSCI1_SSR (SCI1_SSR & GDBSCI_BASE)
+#define GDBSCI1_RDG (SCI1_RDR & GDBSCI_BASE)
+
+/*
+ * NOTE: Only device 1 is valid for the simulator
+ */
+  
+#define SH_GDBSCI_MINOR_DEVICES       2
+
+/* Force SIGBUS by using an unsupported address for /dev/gdbsci0 */
+#define SH_GDBSCI_BASE_0   SCI0_SMR
+#define SH_GDBSCI_BASE_1   GDBSCI1_SMR
+
+struct scidev_t {
+  char *			name ;
+  unsigned32			addr ;
+  rtems_device_minor_number	minor ;
+  unsigned short		opened ;
+  tcflag_t			cflags ;
+} sci_device[SH_GDBSCI_MINOR_DEVICES] =
+{
+  { "/dev/gdbsci0", SH_GDBSCI_BASE_0, 0, 0, B9600 | CS8 },
+  { "/dev/gdbsci1", SH_GDBSCI_BASE_1, 1, 0, B9600 | CS8 }
+} ;
+
+/*  imported from scitab.rel */
+extern int _sci_get_brparms(
+  tcflag_t      cflag,
+  unsigned char *smr,
+  unsigned char *brr );
+
+/* Translate termios' tcflag_t into sci settings */
+static int _sci_set_cflags(
+  struct scidev_t      *sci_dev,
+  tcflag_t      c_cflag )
+{
+  unsigned8	smr ;
+  unsigned8	brr ;
+  
+  if ( c_cflag & CBAUD )
+  {
+    if ( _sci_get_brparms( c_cflag, &smr, &brr ) != 0 )
+      return -1 ;
+  }
+                    
+  if ( c_cflag & CSIZE )
+  {
+    if ( c_cflag & CS8 )
+      smr &= ~SCI_SEVEN_BIT_DATA;
+    else if ( c_cflag & CS7 )
+      smr |= SCI_SEVEN_BIT_DATA;
+    else
+      return -1 ;
+  }
+
+  if ( c_cflag & CSTOPB )
+    smr |= SCI_STOP_BITS_2;
+  else
+    smr &= ~SCI_STOP_BITS_2;
+
+  if ( c_cflag & PARENB )
+    smr |= SCI_PARITY_ON ;
+  else
+    smr &= ~SCI_PARITY_ON ;
+
+  if ( c_cflag & PARODD )
+    smr |= SCI_ODD_PARITY ;
+  else
+    smr &= ~SCI_ODD_PARITY;
+    
+  write8( smr, sci_dev->addr + SCI_SMR );
+  write8( brr, sci_dev->addr + SCI_BRR );
+  
+  return 0 ;
+}
+
+static void _sci_init( 
+  rtems_device_minor_number minor )
+{
+#if NOT_SUPPORTED_BY_GDB
+  unsigned16	temp16 ;
+
+  /* Pin function controller initialisation for asynchronous mode */  
+  if( minor == 0)
+    {
+      temp16 = read16( PFC_PBCR1);
+      temp16 &= ~( PB8MD | PB9MD );
+      temp16 |= (PB_TXD0 | PB_RXD0);
+      write16( temp16, PFC_PBCR1);
+    } 
+  else
+    {
+      temp16 = read16( PFC_PBCR1);
+      temp16 &= ~( PB10MD | PB11MD);
+      temp16 |= (PB_TXD1 | PB_RXD1);
+      write16( temp16, PFC_PBCR1);
+    }
+
+  /* disable sck-pin */
+  if( minor == 0)
+  {
+	  temp16 = read16( PFC_PBCR1);
+	  temp16 &= ~(PB12MD);
+	  write16( temp16, PFC_PBCR1);
+  }
+  else
+  {
+	  temp16 = read16( PFC_PBCR1);
+	  temp16 &= ~(PB13MD);
+	  write16( temp16, PFC_PBCR1);
+  }
+#endif
+}
+
+static void _sci_tx_polled(
+  int minor,
+  const char buf )
+{
+  struct scidev_t *scidev = &sci_device[minor] ;
+#if NOT_SUPPORTED_BY_GDB                
+  signed8         ssr ;
+
+  while ( !inb((scidev->addr + SCI_SSR) & SCI_TDRE ))
+      ;
+#endif
+  write8(buf,scidev->addr+SCI_TDR);
+
+#if NOT_SUPPORTED_BY_GDB                
+  ssr = inb(scidev->addr+SCI_SSR);
+  ssr &= ~SCI_TDRE ;
+  write8(ssr,scidev->addr+SCI_SSR);
+#endif
+} 
+
+static int _sci_rx_polled (
+  int minor)
+{
+  struct scidev_t *scidev = &sci_device[minor] ;
+	
+  unsigned char c;
+#if NOT_SUPPORTED_BY_GDB
+  char ssr ;
+  ssr = read8(scidev->addr + SCI_SSR) ;
+
+  if (ssr & (SCI_PER | SCI_FER | SCI_ORER))
+    write8(ssr & ~(SCI_PER | SCI_FER | SCI_ORER), scidev->addr+SCI_SSR);
+
+  if ( !(ssr & SCI_RDRF) )
+    return -1;
+#endif		
+  c = read8(scidev->addr + SCI_RDR) ;
+#if NOT_SUPPORTED_BY_GDB  
+  write8(ssr & ~SCI_RDRF,scidev->addr + SCI_SSR);
+#endif
+  return c;
+}
+
+/*
+ * sci_initialize
+ */
+
+rtems_device_driver sh_gdbsci_initialize(
+  rtems_device_major_number  major,
+  rtems_device_minor_number  minor,
+  void                      *arg )
+{
+  rtems_device_driver status ;
+  rtems_device_minor_number     i;
+  
+  /*
+   * register all possible devices.
+   * the initialization of the hardware is done by sci_open
+   */
+
+  for ( i = 0 ; i < SH_GDBSCI_MINOR_DEVICES ; i++ )
+  {
+    status = rtems_io_register_name(
+      sci_device[i].name,
+      major,
+      sci_device[i].minor );
+    if (status != RTEMS_SUCCESSFUL)
+      rtems_fatal_error_occurred(status);
+  }
+
+  /* default hardware setup */
+  
+  return RTEMS_SUCCESSFUL;
+}
+
+
+/*
+ *  Open entry point
+ */
+
+rtems_device_driver sh_gdbsci_open(
+  rtems_device_major_number major,
+  rtems_device_minor_number minor,
+  void                    * arg )
+{
+#if NOT_SUPPORTED_BY_GDB
+  unsigned8 temp8;
+#endif
+ /* check for valid minor number */
+   if(( minor > ( SH_GDBSCI_MINOR_DEVICES -1 )) || ( minor < 0 ))
+   {
+     return RTEMS_INVALID_NUMBER;
+   }
+ 
+ /* device already opened */
+  if ( sci_device[minor].opened > 0 )
+  {
+    sci_device[minor].opened++ ;
+    return RTEMS_SUCCESSFUL ;
+  }
+  
+  _sci_init( minor );
+
+#if NOT_SUPPORTED_BY_GDB
+  if (minor == 0) {
+    temp8 = read8(sci_device[minor].addr + SCI_SCR);
+    temp8 &= ~(SCI_TE | SCI_RE) ;
+    write8(temp8, sci_device[minor].addr + SCI_SCR);	/* Clear SCR */
+    _sci_set_cflags( &sci_device[minor], sci_device[minor].cflags );
+
+/* FIXME: Should be one bit delay */
+    CPU_delay(50000); /* microseconds */
+
+    temp8 |= SCI_RE | SCI_TE;
+    write8(temp8, sci_device[minor].addr + SCI_SCR);	/* Enable clock output */
+  } else {
+    temp8 = read8(sci_device[minor].addr + SCI_SCR);
+    temp8 &= ~(SCI_TE | SCI_RE) ;
+    write8(temp8, sci_device[minor].addr + SCI_SCR);	/* Clear SCR */
+    _sci_set_cflags( &sci_device[minor], sci_device[minor].cflags );
+
+/* FIXME: Should be one bit delay */
+    CPU_delay(50000); /* microseconds */
+    
+    temp8 |= SCI_RE | SCI_TE;
+    write8(temp8, sci_device[minor].addr + SCI_SCR);	/* Enable clock output */
+  }  
+#endif
+
+  sci_device[minor].opened++ ;
+
+  return RTEMS_SUCCESSFUL ;
+}
+ 
+/*
+ *  Close entry point
+ */
+
+rtems_device_driver sh_gdbsci_close(
+  rtems_device_major_number major,
+  rtems_device_minor_number minor,
+  void                    * arg
+)
+{
+  if( sci_device[minor].opened == 0 )
+    {
+      return RTEMS_INVALID_NUMBER;
+    }
+
+  sci_device[minor].opened-- ;
+    
+  return RTEMS_SUCCESSFUL ;
+}
+
+/*
+ * read bytes from the serial port.
+ */
+
+rtems_device_driver sh_gdbsci_read(
+  rtems_device_major_number major,
+  rtems_device_minor_number minor,
+  void                    * arg
+)
+{
+  int count = 0;
+ 
+  rtems_libio_rw_args_t *rw_args = (rtems_libio_rw_args_t *) arg;
+  char * buffer = rw_args->buffer;
+  int maximum = rw_args->count;
+
+  for (count = 0; count < maximum; count++) {
+    buffer[ count ] = _sci_rx_polled(minor);
+    if (buffer[ count ] == '\n' || buffer[ count ] == '\r') {
+      buffer[ count++ ]  = '\n';
+      break;
+    }
+  }
+
+  rw_args->bytes_moved = count;
+  return (count >= 0) ? RTEMS_SUCCESSFUL : RTEMS_UNSATISFIED;
+}
+
+/*
+ * write bytes to the serial port.
+ */
+
+rtems_device_driver sh_gdbsci_write(
+  rtems_device_major_number major,
+  rtems_device_minor_number minor,
+  void                    * arg
+)
+{
+  int count;
+
+  rtems_libio_rw_args_t *rw_args = (rtems_libio_rw_args_t *) arg;
+  char *buffer = rw_args->buffer;
+  int maximum = rw_args->count;
+
+  for (count = 0; count < maximum; count++) {
+    _sci_tx_polled( minor, buffer[ count ] );
+  }
+
+  rw_args->bytes_moved = maximum;
+  return 0;
+}
+
+/*
+ *  IO Control entry point
+ */
+
+rtems_device_driver sh_gdbsci_control(
+  rtems_device_major_number major,
+  rtems_device_minor_number minor,
+  void                    * arg
+)
+{
+  /* Not yet supported */
+  return RTEMS_SUCCESSFUL ;
+}

c/src/lib/libbsp/sh/shsim/include/Makefile.am

@@ -4,7 +4,7 @@
 
 AUTOMAKE_OPTIONS = foreign 1.4
 
-H_FILES = bsp.h ../../../shared/include/coverhd.h
+H_FILES = bsp.h gdbsci.h ../../../shared/include/coverhd.h
 
 $(PROJECT_INCLUDE):
 	$(mkinstalldirs) $@
@@ -12,11 +12,18 @@ $(PROJECT_INCLUDE):
 $(PROJECT_INCLUDE)/bsp.h: bsp.h
 	$(INSTALL_DATA) $< $@
 
+$(PROJECT_INCLUDE)/bspopts.h: bspopts.h
+	$(INSTALL_DATA) $< $@
+
+$(PROJECT_INCLUDE)/sh/gdbsci.h: gdbsci.h
+	$(INSTALL_DATA) $< $@ 
+
 $(PROJECT_INCLUDE)/coverhd.h: ../../../shared/include/coverhd.h
 	$(INSTALL_DATA) $< $@
 
 TMPINSTALL_FILES += $(PROJECT_INCLUDE) $(PROJECT_INCLUDE)/bsp.h \
-    $(PROJECT_INCLUDE)/coverhd.h
+    $(PROJECT_INCLUDE)/coverhd.h $(PROJECT_INCLUDE)/sh/gdbsci.h \
+    $(PROJECT_INCLUDE)/bspopts.h
 
 all-local: $(TMPINSTALL_FILES)
 

c/src/lib/libbsp/sh/shsim/scitab/Makefile.am

@@ -0,0 +1,36 @@
+##
+## $Id$
+##
+
+AUTOMAKE_OPTIONS = foreign 1.4
+
+PGM = $(ARCH)/scitab.rel
+
+C_FILES = scitab.c
+C_O_FILES = $(C_FILES:%.c=$(ARCH)/%.o)
+
+OBJS = $(C_O_FILES)
+
+include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg
+include $(top_srcdir)/../../../../../../automake/compile.am
+include $(top_srcdir)/../../../../../../automake/lib.am
+
+SHGEN = $(PROJECT_TOPdir)/tools/cpu/sh/shgen
+
+#
+# (OPTIONAL) Add local stuff here using +=
+#
+
+CLEANFILES = scitab.c
+
+$(PGM): $(OBJS)
+	$(make-rel)
+
+scitab.c: $(SHGEN)
+	$(SHGEN) -H $(CPU_CLOCK_RATE_HZ) sci > $@
+
+all-local: $(ARCH) $(OBJS) $(PGM)
+
+.PRECIOUS: $(PGM)
+
+include $(top_srcdir)/../../../../../../automake/local.am

c/src/lib/libbsp/sh/shsim/trap34/.cvsignore

@@ -0,0 +1,2 @@
+Makefile
+Makefile.in

c/src/lib/libbsp/sh/shsim/trap34/Makefile.am

@@ -0,0 +1,38 @@
+##
+## $Id$
+##
+
+AUTOMAKE_OPTIONS = foreign 1.4
+
+VPATH = @srcdir@:@srcdir@/../../../shared
+
+PGM = $(ARCH)/console.rel
+
+C_FILES = console-io.c
+C_O_FILES = $(C_FILES:%.c=$(ARCH)/%.o)
+
+S_FILES = console-support.S
+S_O_FILES = $(S_FILES:%.S=$(ARCH)/%.o)
+
+OBJS = $(C_O_FILES) $(S_O_FILES)
+
+include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg
+include $(top_srcdir)/../../../../../../automake/compile.am
+include $(top_srcdir)/../../../../../../automake/lib.am
+
+#
+# (OPTIONAL) Add local stuff here using +=
+#
+
+$(PGM): $(OBJS)
+	$(make-rel)
+
+# the .rel file built here will be put into libbsp.a by ../wrapup/Makefile
+
+all-local: $(ARCH) $(OBJS) $(PGM)
+
+.PRECIOUS: $(PGM)
+
+EXTRA_DIST = console.c
+
+include $(top_srcdir)/../../../../../../automake/local.am

c/src/lib/libbsp/sh/shsim/trap34/console-io.c

@@ -0,0 +1,78 @@
+/*
+ *  This file contains the hardware specific portions of the TTY driver
+ *  for the simulators stdin/out.
+ *
+ *  Logic based on newlib-1.8.2/newlib/libc/sys/sh/syscalls.c 
+ *
+ *  COPYRIGHT (c) 1989-2000.
+ *  On-Line Applications Research Corporation (OAR).
+ *
+ *  The license and distribution terms for this file may be
+ *  found in the file LICENSE in this distribution or at
+ *  http://www.OARcorp.com/rtems/license.html.
+ *
+ *  $Id$
+ */
+
+#include <bsp.h>
+#include <rtems/libio.h>
+#include <stdlib.h>
+#include <assert.h>
+
+
+#define SYS_exit        1
+#define SYS_read        3
+#define SYS_write       4
+
+int errno ;
+
+extern int __trap34(int, int, void*, int );
+
+/*
+ *  console_initialize_hardware
+ *
+ *  This routine initializes the console hardware.
+ *
+ */
+
+void console_initialize_hardware(void)
+{
+  return;
+}
+
+/*
+ *  console_outbyte_polled
+ *
+ *  This routine transmits a character using polling.
+ */
+
+void console_outbyte_polled(
+  int  port,
+  char ch
+)
+{
+  __trap34 (SYS_write, 1, &ch, 1);
+  return;
+}
+
+/*
+ *  console_inbyte_nonblocking 
+ *
+ *  This routine polls for a character.
+ */
+
+int console_inbyte_nonblocking(
+  int port
+)
+{
+  unsigned char c;
+
+  return __trap34 (SYS_read, 0, &c, 1);
+}
+
+/* XXX wrong place for this */
+_sys_exit (n)
+{
+  return __trap34 (SYS_exit, n, 0, 0);
+}
+

c/src/lib/libbsp/sh/shsim/trap34/console-support.S

@@ -0,0 +1,21 @@
+/*
+ *  newlib-1.8.2/newlib/libc/sys/sh/trap.S
+ *
+ *  $Id$
+ */
+        .text
+        .global ___trap34
+___trap34:
+        trapa   #34
+        tst     r1,r1   ! r1 is errno
+        bt      ret
+        mov.l   perrno,r2
+        mov.l   r1,@r2
+ret:
+        rts
+        nop
+         
+        .align  2
+perrno:
+        .long   _errno
+