FreeCalypso > hg > gsm-net-reveng

annotate trau-decode/parse-fr-common.c @ 76:d4ee42801cdc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
trau-decode: factor out parse-fr-common.c
author Mychaela Falconia <falcon@freecalypso.org>
date Sat, 08 Feb 2025 04:57:15 +0000
parents trau-decode/parse-main.c@f77a48a01ff0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
1 /*
76
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
2 * This module contains a bit of code that has been factored out of
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
3 * trau-parse and tfo-parse-fr16 programs; it handles FR and EFR codecs.
0
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
4 */
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
5
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
6 #include <stdio.h>
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
7 #include <stdint.h>
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
8 #include <stdlib.h>
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
9 #include <string.h>
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
10 #include <strings.h>
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
11
131e0f1972bb beginning of trau-parse program
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
12 static void
76
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
13 collect_d_bits(frame_bits, d_bits)
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
14 uint8_t *frame_bits, *d_bits;
2
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
15 {
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
16 bcopy(frame_bits + 33, d_bits, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
17 bcopy(frame_bits + 49, d_bits + 15, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
18 bcopy(frame_bits + 65, d_bits + 30, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
19 bcopy(frame_bits + 81, d_bits + 45, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
20 bcopy(frame_bits + 97, d_bits + 60, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
21 bcopy(frame_bits + 113, d_bits + 75, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
22 bcopy(frame_bits + 129, d_bits + 90, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
23 bcopy(frame_bits + 145, d_bits + 105, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
24 bcopy(frame_bits + 161, d_bits + 120, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
25 bcopy(frame_bits + 177, d_bits + 135, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
26 bcopy(frame_bits + 193, d_bits + 150, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
27 bcopy(frame_bits + 209, d_bits + 165, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
28 bcopy(frame_bits + 225, d_bits + 180, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
29 bcopy(frame_bits + 241, d_bits + 195, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
30 bcopy(frame_bits + 257, d_bits + 210, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
31 bcopy(frame_bits + 273, d_bits + 225, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
32 bcopy(frame_bits + 289, d_bits + 240, 15);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
33 bcopy(frame_bits + 305, d_bits + 255, 5);
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
34 }
b2ef2c80fef1 trau-parse: add FR decoding
Mychaela Falconia <falcon@freecalypso.org>
parents: 1
diff changeset
35
76
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
36 void
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
37 print_fr_efr_frame(frame_bits, c1_5)
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
38 uint8_t *frame_bits;
47
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
39 unsigned c1_5;
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
40 {
76
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
41 uint8_t d_bits[260];
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
42
47
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
43 switch (c1_5) {
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
44 case 0x02:
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
45 case 0x1C:
76
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
46 collect_d_bits(frame_bits, d_bits);
47
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
47 print_fr_frame(d_bits);
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
48 break;
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
49 case 0x1A:
76
d4ee42801cdc trau-decode: factor out parse-fr-common.c
Mychaela Falconia <falcon@freecalypso.org>
parents: 50
diff changeset
50 collect_d_bits(frame_bits, d_bits);
47
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
51 check_efr_crc(d_bits);
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
52 print_efr_frame(d_bits);
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
53 break;
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
54 }
7119884f6afe trau-parse: rudimentary AMR decoding (C-bits)
Mychaela Falconia <falcon@freecalypso.org>
parents: 46
diff changeset
55 }