OpenCores
URL https://opencores.org/ocsvn/tv80/tv80/trunk

Subversion Repositories tv80

[/] [tv80/] [trunk/] [tests/] [bintr.c] - Blame information for rev 99

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 32 ghutchis
#include "tv80_env.h"
2
 
3
/*
4
 * This test covers interrupt handling routines.  The actual interrupt code
5
 * is in assembly, in bintr_crt0.asm.
6
 *
7
 * The test generates five interrupts, and clears the interrupt after
8
 * each one.
9
 *
10
 * The isr routine uses the two writes to intr_cntdwn to first clear
11
 * assertion of the current interrupt and then disable the countdown
12
 * timer.
13
 */
14
 
15
unsigned char foo;
16
volatile unsigned char test_pass;
17
static unsigned char triggers;
18 89 ghutchis
int phase;
19 99 ghutchis
int loop;
20 89 ghutchis
char done;
21
char nmi_trig;
22 32 ghutchis
 
23 89 ghutchis
void nmi_isr (void)
24
{
25
  nmi_trig++;
26
 
27
  switch (phase) {
28
    // nmi test
29
  case 1 :
30
    if (nmi_trig > 5) {
31
      phase += 1;
32
      nmi_trig = 0;
33
      //intr_cntdwn = 255;
34
      //intr_cntdwn = 0;
35 99 ghutchis
      print ("Final interrupt\n");
36 89 ghutchis
      intr_cntdwn = 32;
37
      nmi_cntdwn = 0;
38
    } else
39
      nmi_cntdwn = 32;
40
    break;
41
  }
42
}
43
 
44 32 ghutchis
void isr (void)
45
{
46
  triggers++;
47
 
48 89 ghutchis
  switch (phase) {
49
    // int test
50
  case 0 :
51
    if (triggers > 5) {
52
      phase += 1;
53
      triggers = 0;
54
      intr_cntdwn = 0;
55 99 ghutchis
      print ("Starting NMIs\n");
56 89 ghutchis
      nmi_cntdwn = 64;
57
    } else {
58
      intr_cntdwn = 32;
59
 
60
    }
61
    break;
62
 
63
 
64
  case 2 :
65 32 ghutchis
    intr_cntdwn = 0;
66 99 ghutchis
    test_pass = 1;
67 89 ghutchis
    break;
68
  }
69 32 ghutchis
}
70
 
71
int main ()
72
{
73 99 ghutchis
  //int i;
74 32 ghutchis
  unsigned char check;
75
 
76
  test_pass = 0;
77
  triggers = 0;
78 89 ghutchis
  nmi_trig = 0;
79 32 ghutchis
 
80 89 ghutchis
  phase = 0;
81
 
82 32 ghutchis
  // start interrupt countdown
83 99 ghutchis
  print ("Starting interrupts\n");
84 32 ghutchis
  intr_cntdwn = 64;
85 89 ghutchis
  set_timeout (50000);
86 32 ghutchis
 
87 99 ghutchis
  for (loop=0; loop<1024; loop++) {
88 89 ghutchis
    if (test_pass)
89
      break;
90 32 ghutchis
    check = sim_ctl_port;
91 89 ghutchis
  }
92 32 ghutchis
 
93
  if (test_pass)
94
    sim_ctl (SC_TEST_PASSED);
95
  else
96
    sim_ctl (SC_TEST_FAILED);
97
 
98
  return 0;
99
}
100
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.