FreeCalypso > hg > freecalypso-sw
annotate target-utils/c139explore/main.c @ 948:c73516dd50bb
c139explore: delay before greeting printf to work around defect in fc-compalram
author | Mychaela Falconia <falcon@ivan.Harhan.ORG> |
---|---|
date | Mon, 02 Nov 2015 22:11:06 +0000 |
parents | 845c2e420069 |
children | df1dccc0ef9c |
rev | line source |
---|---|
946
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
1 #include "types.h" |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
2 #include "ns16550.h" |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
3 |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
4 struct ns16550_regs *uart_base; |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
5 |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
6 main() |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
7 { |
948
c73516dd50bb
c139explore: delay before greeting printf to work around defect in fc-compalram
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
946
diff
changeset
|
8 /* delay kludge workaround for defect in fc-compalram */ |
c73516dd50bb
c139explore: delay before greeting printf to work around defect in fc-compalram
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
946
diff
changeset
|
9 osmo_delay_ms(30); |
946
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
10 uart_base = (struct ns16550_regs *) 0xFFFF5800; |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
11 printf("C139 hardware exploration utility running\n"); |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
12 for (;;) { |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
13 putchar('='); |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
14 if (command_entry()) |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
15 command_dispatch(); |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
16 } |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
17 } |