aboutsummaryrefslogtreecommitdiff
path: root/sim/h8300/perifs.c
blob: 73804643a9bc25b111e6d55393f781b7eb689058 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78

/* Fake peripherals for the H8/330 */
#include "state.h"
perifs( )
/* This routine is called every few instructions to see if some sort
  of hardware event is needed */
{
  int interrupt = 0;
  int lval;
  int tmp;
  /* What to do about the 16 bit timer */


  /* Free running counter same as reg a */
  if (saved_state.reg[OCRA] == saved_state.reg[FRC])
  {
    /* Set the counter A overflow bit */
    saved_state.reg[TCSR] |= OCFA;

    if (saved_state.reg[TCSR] & CCLRA) 
    {
      saved_state.reg[FRC] = 0;
    }

    if (saved_state.reg[TIER] & OCIEA) 
    {
      interrupt = 16;
    }
  }

  /* Free running counter same as reg b */
  if (saved_state.reg[OCRB] == saved_state.reg[FRC])
  {
    saved_state.reg[TCSR] |= OCFB;
    if (saved_state.reg[TIER] & OCIEB) 
    {
      interrupt = 17;
    }
  }

  /* inc free runnning counter */
  saved_state.reg[FRC]++;
  
  if (saved_state.reg[FRC] == 0) 
  {
    /* Must have overflowed */
    saved_state.reg[TCSR] |=  OVF;
    if (BYTE_MEM(TIER) & OVIE)
     interrupt = 18;
  }

  /* If we've had an interrupt and the bit is on */
  if (interrupt && saved_state.ienable) 
  {

    int  ccr;

    saved_state.ienable = 0;    
    ccr = saved_state.reg[CCR];
    lval = WORD_MEM((interrupt)<<1);
    lval = WORD_MEM(lval);
   {
     /* Push PC */
     saved_state.reg[7] -= 2;
     tmp = saved_state.reg[7];
     SET_WORD_MEM (tmp, saved_state.reg[PC]);
     /* Push CCR twice */
     saved_state.reg[7] -=2 ;
     tmp =  saved_state.reg[7];
     SET_BYTE_MEM(tmp,ccr);
     SET_BYTE_MEM(tmp+1,ccr);

     /* Set pc to point to first instruction of i vector */
     saved_state.reg[PC] = lval;
   }
  }

}