FreeCalypso > hg > freecalypso-tools
annotate uptools/libcoding/gsm7_pack.c @ 497:74610c4f10f7
target-utils: added 10 ms delay at the end of abb_power_off()
The deosmification of the ABB access code (replacement of osmo_delay_ms()
bogus delays with correctly-timed ones, which are significantly shorter)
had one annoying side effect: when executing the poweroff command from
any of the programs, one last '=' prompt character was being sent (and
received by the x86 host) as the Calypso board powers off. With delays
being shorter now, the abb_power_off() function was returning and the
standalone program's main loop was printing its prompt before the Iota chip
fully executed the switch-off sequence!
I thought about inserting an endless tight loop at the end of the
abb_power_off() function, but the implemented solution of a 10 ms delay
is a little nicer IMO because if the DEVOFF operation doesn't happen for
some reason in a manual hacking scenario, there won't be an artificial
blocker in the form of a tight loop keeping us from further poking around.
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 25 May 2019 20:44:05 +0000 |
parents | 15120d15cab5 |
children |
rev | line source |
---|---|
357
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
1 /* |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
2 * This library module implements the function for packing septets into octets. |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
3 */ |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
4 |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
5 #include <sys/types.h> |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
6 |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
7 gsm7_pack(inbuf, outbuf, noctets) |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
8 u_char *inbuf, *outbuf; |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
9 unsigned noctets; |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
10 { |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
11 u_char *ip = inbuf, *op = outbuf; |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
12 unsigned n, c; |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
13 |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
14 for (n = 0; n < noctets; n++) { |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
15 c = n % 7; |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
16 *op++ = ((ip[1] << 7) | ip[0]) >> c; |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
17 if (c == 6) |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
18 ip += 2; |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
19 else |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
20 ip += 1; |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
21 } |
15120d15cab5
uptools/libcoding: septet to octet packing function implemented
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
22 } |