FreeCalypso > hg > freecalypso-tools

annotate target-utils/c139explore/main.c @ 752:c79aaed75bd8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
compile-fc-batt: allow possible third field in source lines Battery tables maintained in the fc-battery-conf repository will now have a third field added, defining thresholds for the battery bars icon, and there will be a new utility to compile them into the new /etc/batterytab2 file read by the FC Tourmaline version of our FCHG driver. For backward compatibility with the original Magnetite version of FCHG, compile-fc-batt remains the tool for compiling the original /etc/batterytab file format, and it needs to ignore the newly added third field in battery table sources.
author Mychaela Falconia <falcon@freecalypso.org>
date Thu, 05 Nov 2020 20:37:55 +0000
parents fc3592a27317
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
1 #include "types.h"
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
2
526
fc3592a27317 c139explore boot delay adjusted for running at 26 MHz
Mychaela Falconia <falcon@freecalypso.org>
parents: 503
diff changeset
3 #define DELAY_1MS 6500 /* ARM7 core runs at 26 MHz here, not 52 MHz */
503
da53ea0a38ba c139explore: osmo_delay_ms-ectomy and GPIO init fix
Mychaela Falconia <falcon@freecalypso.org>
parents: 37
diff changeset
4
0
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
5 main()
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
6 {
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
7 /* delay kludge workaround for defect in fc-compalram */
503
da53ea0a38ba c139explore: osmo_delay_ms-ectomy and GPIO init fix
Mychaela Falconia <falcon@freecalypso.org>
parents: 37
diff changeset
8 wait_ARM_cycles(DELAY_1MS * 30);
0
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
9 printf("C139 hardware exploration utility running\n");
503
da53ea0a38ba c139explore: osmo_delay_ms-ectomy and GPIO init fix
Mychaela Falconia <falcon@freecalypso.org>
parents: 37
diff changeset
10 /* GPIO init, compatible with both C139 and SE J100 */
0
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
11 *(volatile u16 *)0xfffe4802 = 0x0002;
503
da53ea0a38ba c139explore: osmo_delay_ms-ectomy and GPIO init fix
Mychaela Falconia <falcon@freecalypso.org>
parents: 37
diff changeset
12 *(volatile u16 *)0xfffe4804 = 0x2A59;
37
f24b31082605 c139explore: turn on ARMIO module clock, needed to exercise the buzzer
Mychaela Falconia <falcon@freecalypso.org>
parents: 0
diff changeset
13 *(volatile u16 *)0xfffe4806 = 0xFFF3; /* enable ARMIO clock */
0
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
14 /* take peripherals out of reset */
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
15 *(volatile u16 *)0xfffffd04 = 0xFFF3;
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
16 abb_init();
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
17 uwire_init();
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
18 for (;;) {
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
19 putchar('=');
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
20 if (command_entry())
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
21 command_dispatch();
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
22 }
e7502631a0f9 initial import from freecalypso-sw rev 1033:5ab737ac3ad7
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
23 }