annotate uptools/libcoding/gsm7_pack.c @ 1014:961efadd530a default tip

fc-shell TCH DL handler: add support for CSD modes TCH DL capture mechanism in FC Tourmaline firmware has been extended to support CSD modes in addition to speech - add the necessary support on the host tools side. It needs to be noted that this mechanism in its present state does NOT provide the debug utility value that was sought: as we learned only after the code was implemented, TI's DSP has a misfeature in that the buffer we are reading (a_dd_0[]) is zeroed out when the IDS block is enabled, i.e., we are reading all zeros and not the real DL bits we were after. But since the code has already been written, we are keeping it - perhaps we can do some tests with IDS disabled.
author Mychaela Falconia <falcon@freecalypso.org>
date Tue, 26 Nov 2024 06:27:43 +0000
parents 15120d15cab5
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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 }