FreeCalypso > hg > freecalypso-sw
annotate target-utils/c139explore/main.c @ 1030:194967e11b2b
fc-shell: tch record and tch play reworked for libgsm-compatible file format
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Tue, 31 May 2016 18:39:06 +0000 |
parents | d92e4aadeeb3 |
children |
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 |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
3 main() |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
4 { |
948
c73516dd50bb
c139explore: delay before greeting printf to work around defect in fc-compalram
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
946
diff
changeset
|
5 /* 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
|
6 osmo_delay_ms(30); |
946
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
7 printf("C139 hardware exploration utility running\n"); |
949
df1dccc0ef9c
c139explore: GPIO init and backlight on/off control implemented
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
948
diff
changeset
|
8 /* GPIO init */ |
df1dccc0ef9c
c139explore: GPIO init and backlight on/off control implemented
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
948
diff
changeset
|
9 *(volatile u16 *)0xfffe4802 = 0x0002; |
df1dccc0ef9c
c139explore: GPIO init and backlight on/off control implemented
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
948
diff
changeset
|
10 *(volatile u16 *)0xfffe4804 = 0xFFF5; |
951
eb27543ce18e
c139explore: elementary operation commands lcdcmd and lcdpix added
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
950
diff
changeset
|
11 /* take peripherals out of reset */ |
eb27543ce18e
c139explore: elementary operation commands lcdcmd and lcdpix added
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
950
diff
changeset
|
12 *(volatile u16 *)0xfffffd04 = 0xFFF3; |
949
df1dccc0ef9c
c139explore: GPIO init and backlight on/off control implemented
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
948
diff
changeset
|
13 abb_init(); |
950
cd34e0d534b9
c139explore: LCD output implemented, does not work
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
949
diff
changeset
|
14 uwire_init(); |
946
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
15 for (;;) { |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
16 putchar('='); |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
17 if (command_entry()) |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
18 command_dispatch(); |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
19 } |
845c2e420069
target-utils/c139explore utility started
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents:
diff
changeset
|
20 } |