sim/mips/dv-tx3904cpu.c

   1 /*  This file is part of the program GDB, the GU debugger.
   2
   3     Copyright (C) 1998 Free Software Foundation, Inc.
   4     Contributed by Cygnus Solutions.
   5
   6     This program is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any later version.
  10
  11     This program is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with this program; if not, write to the Free Software
  18     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  19
  20     */
  21
  22
  23 #include "sim-main.h"
  24 #include "hw-base.h"
  25
  26 /* DEVICE
  27
  28
  29    tx3904cpu - tx3904 cpu virtual device
  30
  31
  32    DESCRIPTION
  33
  34
  35    Implements the external tx3904 functionality.  This includes the
  36    delivery of of interrupts generated from other devices and the
  37    handling of device specific registers.
  38
  39
  40    PROPERTIES
  41
  42    none
  43
  44
  45    PORTS
  46
  47
  48    reset (input)
  49
  50    Currently ignored.
  51
  52
  53    nmi (input)
  54
  55    Deliver a non-maskable interrupt to the processor.
  56
  57
  58    level (input)
  59
  60    Deliver a maskable interrupt of given level, corresponding to
  61    IP[5:0], to processor.
  62
  63
  64
  65    BUGS
  66
  67
  68    When delivering an interrupt, this code assumes that there is only
  69    one processor (number 0).
  70
  71    This code does not attempt to be efficient at handling pending
  72    interrupts.  It simply schedules the interrupt delivery handler
  73    every instruction cycle until all pending interrupts go away.  An
  74    alternative implementation might modify instructions that change
  75    the PSW and have them check to see if the change makes an interrupt
  76    delivery possible.
  77
  78    */
  79
  80
  81
  82 struct tx3904cpu {
  83   /* Pending interrupts for delivery by event handler */
  84   int pending_reset, pending_nmi, pending_level;
  85 };
  86
  87
  88
  89 /* input port ID's */
  90
  91 enum {
  92   RESET_PORT,
  93   NMI_PORT,
  94   LEVEL_PORT,
  95 };
  96
  97
  98 static const struct hw_port_descriptor tx3904cpu_ports[] = {
  99
 100   /* interrupt inputs */
 101   { "reset", RESET_PORT, 0, input_port, },
 102   { "nmi", NMI_PORT, 0, input_port, },
 103   { "level", LEVEL_PORT, 0, input_port, },
 104
 105   { NULL, },
 106 };
 107
 108
 109 /* Finish off the partially created hw device.  Attach our local
 110    callbacks.  Wire up our port names etc */
 111
 112 static hw_port_event_callback tx3904cpu_port_event;
 113
 114
 115
 116 static void
 117 tx3904cpu_finish (struct hw *me)
 118 {
 119   struct tx3904cpu *controller;
 120
 121   controller = HW_ZALLOC (me, struct tx3904cpu);
 122   set_hw_data (me, controller);
 123   set_hw_ports (me, tx3904cpu_ports);
 124   set_hw_port_event (me, tx3904cpu_port_event);
 125
 126   /* Initialize the pending interrupt flags */
 127   controller->pending_level = 0;
 128   controller->pending_reset = 0;
 129   controller->pending_nmi = 0;
 130 }
 131
 132
 133
 134 /* An event arrives on an interrupt port */
 135
 136 static void
 137 deliver_tx3904cpu_interrupt (struct hw *me,
 138                             void *data)
 139 {
 140   struct tx3904cpu *controller = hw_data (me);
 141   SIM_DESC simulator = hw_system (me);
 142   sim_cpu *cpu = STATE_CPU (simulator, 0); /* NB: fix CPU 0. */
 143   address_word cia = CIA_GET (cpu);
 144
 145 #define CPU cpu
 146 #define SD current_state
 147
 148   if (controller->pending_reset)
 149     {
 150       controller->pending_reset = 0;
 151       HW_TRACE ((me, "reset pc=0x%08lx", (long) CIA_GET (cpu)));
 152       SignalExceptionNMIReset();
 153     }
 154   else if (controller->pending_nmi)
 155     {
 156       controller->pending_nmi = 0;
 157       HW_TRACE ((me, "nmi pc=0x%08lx", (long) CIA_GET (cpu)));
 158       SignalExceptionNMIReset();
 159     }
 160   else if (controller->pending_level)
 161     {
 162       HW_TRACE ((me, "interrupt level=%d pc=0x%08lx sr=0x%08lx",
 163                  controller->pending_level,
 164                  (long) CIA_GET (cpu), (long) SR));
 165
 166       /* Don't overwrite the CAUSE field since we have no good place to clear
 167          it again.  The specs allow it to be zero by the time the interrupt
 168          handler is invoked. */
 169       /* CAUSE &= ~ (cause_IP_mask << cause_IP_shift);
 170          CAUSE |= (controller->pending_level & cause_IP_mask) << cause_IP_shift; */
 171
 172       /* check for enabled / unmasked interrupts */
 173       if((SR & status_IEc) &&
 174          (controller->pending_level & ((SR >> status_IM_shift) & status_IM_mask)))
 175         {
 176           controller->pending_level = 0;
 177           SignalExceptionInterrupt();
 178         }
 179       else
 180         {
 181           /* reschedule soon */
 182           hw_event_queue_schedule (me, 1, deliver_tx3904cpu_interrupt, NULL);
 183         }
 184     }
 185 #undef CPU cpu
 186 #undef SD current_state
 187 }
 188
 189
 190 static void
 191 tx3904cpu_port_event (struct hw *me,
 192                      int my_port,
 193                      struct hw *source,
 194                      int source_port,
 195                      int level)
 196 {
 197   struct tx3904cpu *controller = hw_data (me);
 198
 199   switch (my_port)
 200     {
 201     case RESET_PORT:
 202       controller->pending_reset = 1;
 203       HW_TRACE ((me, "port-in reset"));
 204       break;
 205
 206     case NMI_PORT:
 207       controller->pending_nmi = 1;
 208       HW_TRACE ((me, "port-in nmi"));
 209       break;
 210
 211     case LEVEL_PORT:
 212       controller->pending_level |= level; /* accumulate bits until they are cleared */
 213       HW_TRACE ((me, "port-in level=%d", level));
 214       break;
 215
 216     default:
 217       hw_abort (me, "bad switch");
 218       break;
 219     }
 220
 221   /* Schedule an event to be delivered immediately after current
 222      instruction. */
 223   hw_event_queue_schedule (me, 0, deliver_tx3904cpu_interrupt, NULL);
 224 }
 225
 226
 227 const struct hw_device_descriptor dv_tx3904cpu_descriptor[] = {
 228   { "tx3904cpu", tx3904cpu_finish, },
 229   { NULL },
 230 };