2000-09-13 Emmanuel Raguet <raguet@crf.canon.fr>

	* vegaplus BSP submitted by Emmanuel Raguet <raguet@crf.canon.fr> and
	Eric Valette <valette@crf.canon.fr>.
	* vegaplus/bsp_specs, configure.in, console/Makefile.am,
	include/Makefile.am, include/bsp.h, include/registers.h,
	irq/Makefile.am, irq/bsp_irq_asm.S, irq/bsp_irq_init.c, irq/irq.c,
	irq/irq.h, start/Makefile.am, start/start.S, startup/Makefile.am,
	startup/bspstart.c, startup/exit.c, startup/linkcmds,
	wrapup/Makefile.am: New files.

1 files changed, 137 insertions, 0 deletions

diff --git a/c/src/lib/libbsp/arm/vegaplus/irq/irq.c b/c/src/lib/libbsp/arm/vegaplus/irq/irq.c
new file mode 100644
index 0000000000..0f90bb1d47
--- /dev/null
+++ b/c/src/lib/libbsp/arm/vegaplus/irq/irq.c
@@ -0,0 +1,137 @@
+/* irq.c
+ *
+ *  This file contains the implementation of the function described in irq.h
+ *
+ *  CopyRight (C) 2000 Canon Research France SA.
+ *  Emmanuel Raguet,  mailto:raguet@crf.canon.fr
+ *
+ *  The license and distribution terms for this file may be
+ *  found in found in the file LICENSE in this distribution or at
+ *  http://www.OARcorp.com/rtems/license.html.
+ *
+ *  $Id$
+ */
+
+
+#include <bsp.h>
+#include <irq.h>
+#include <registers.h>
+#include <rtems/score/thread.h>
+#include <rtems/score/apiext.h>
+
+
+/*
+ * This function check that the value given for the irq line
+ * is valid.
+ */
+
+static int isValidInterrupt(int irq)
+{
+  if ( (irq < 0) || (irq > BSP_MAX_INT))
+    return 0;
+  return 1;
+}
+
+/*
+ * ------------------------ RTEMS Single Irq Handler Mngt Routines ----------------
+ */
+
+int BSP_install_rtems_irq_handler  (const rtems_irq_connect_data* irq)
+{
+    rtems_irq_hdl *HdlTable;
+    
+    if (!isValidInterrupt(irq->name)) {
+      return 0;
+    }
+    /*
+     * Check if default handler is actually connected. If not issue an error.
+     */
+    HdlTable = VECTOR_TABLE;
+    if (*(HdlTable + irq->name) != default_int_handler) {
+      return 0;
+    }
+    
+    _CPU_ISR_Disable(level);
+
+    /*
+     * store the new handler
+     */
+    *(HdlTable + irq->name) = irq->hdl;
+
+    /*
+     * initialize the control register for the concerned interrupt 
+     */
+    Regs[(INTCNTL0 + irq->name)] = (long)(irq->irqTrigger) | (long)(irq->irqLevel) ;
+
+    /*
+     * ack pending interrupt
+     */
+    Regs[INTACK] |= (long)(1 << irq->name);
+    
+    /*
+     * unmask at INT controler level level
+     */
+    Regs[INTMASK] &= ~(long)(1 << irq->name);
+    
+    /*
+     * Enable interrupt on device
+     */
+    irq->on(irq);
+    
+    _CPU_ISR_Enable(level);
+
+    return 1;
+}
+
+int BSP_remove_rtems_irq_handler  (const rtems_irq_connect_data* irq)
+{
+    rtems_irq_hdl *HdlTable;
+  
+    if (!isValidInterrupt(irq->name)) {
+      return 0;
+    }
+    /*
+     * Check if the handler is actually connected. If not issue an error.
+     */
+    HdlTable = VECTOR_TABLE;
+    if (*(HdlTable + irq->name) != irq->hdl) {
+      return 0;
+    }
+    _CPU_ISR_Disable(level);
+
+    /*
+     * mask at INT controller level
+     */
+    Regs[INTMASK] |= (long)(1 << irq->name);
+
+    /*
+     * Disable interrupt on device
+     */
+    irq->off(irq);
+
+    /*
+     * restore the default irq value
+     */
+    *(HdlTable + irq->name) = default_int_handler;
+          
+    _CPU_ISR_Enable(level);
+
+    return 1;
+}
+
+
+
+void _ThreadProcessSignalsFromIrq (CPU_Exception_frame* ctx)
+{
+  /*
+   * Process pending signals that have not already been
+   * processed by _Thread_Displatch. This happens quite
+   * unfrequently : the ISR must have posted an action
+   * to the current running thread.
+   */
+  if ( _Thread_Do_post_task_switch_extension ||
+       _Thread_Executing->do_post_task_switch_extension ) {
+    _Thread_Executing->do_post_task_switch_extension = FALSE;
+    _API_extensions_Run_postswitch();
+  }
+}