Mercurial > hg > audiostuff
comparison intercom/gsm/gsm_expl.c @ 2:13be24d74cd2
import intercom-0.4.1
| author | Peter Meerwald <pmeerw@cosy.sbg.ac.at> |
|---|---|
| date | Fri, 25 Jun 2010 09:57:52 +0200 |
| parents | |
| children |
comparison
equal
deleted
inserted
replaced
| 1:9cadc470e3da | 2:13be24d74cd2 |
|---|---|
| 1 /* | |
| 2 * Copyright 1992 by Jutta Degener and Carsten Bormann, Technische | |
| 3 * Universitaet Berlin. See the accompanying file "COPYRIGHT" for | |
| 4 * details. THERE IS ABSOLUTELY NO WARRANTY FOR THIS SOFTWARE. | |
| 5 */ | |
| 6 | |
| 7 /* $Header: /home/kbs/jutta/src/gsm/gsm-1.0/src/RCS/gsm_explode.c,v 1.1 1992/10/28 00:15:50 jutta Exp $ */ | |
| 8 | |
| 9 #include "private.h" | |
| 10 #include "gsm.h" | |
| 11 #include "proto.h" | |
| 12 | |
| 13 int gsm_explode P3((s, c, target), gsm s, gsm_byte * c, | |
| 14 gsm_signal * target) | |
| 15 { | |
| 16 /* GSM_MAGIC = (*c >> 4) & 0xF; */ | |
| 17 | |
| 18 if (((*c >> 4) & 0x0F) != GSM_MAGIC) | |
| 19 return -1; | |
| 20 | |
| 21 #define LARc target | |
| 22 | |
| 23 LARc[0] = (*c++ & 0xF) << 2; /* 1 */ | |
| 24 LARc[0] |= (*c >> 6) & 0x3; | |
| 25 LARc[1] = *c++ & 0x3F; | |
| 26 LARc[2] = (*c >> 3) & 0x1F; | |
| 27 LARc[3] = (*c++ & 0x7) << 2; | |
| 28 LARc[3] |= (*c >> 6) & 0x3; | |
| 29 LARc[4] = (*c >> 2) & 0xF; | |
| 30 LARc[5] = (*c++ & 0x3) << 2; | |
| 31 LARc[5] |= (*c >> 6) & 0x3; | |
| 32 LARc[6] = (*c >> 3) & 0x7; | |
| 33 LARc[7] = *c++ & 0x7; | |
| 34 | |
| 35 #define Nc (target + 8) | |
| 36 | |
| 37 Nc[0] = (*c >> 1) & 0x7F; | |
| 38 | |
| 39 #define bc (target + 9) | |
| 40 | |
| 41 bc[0] = (*c++ & 0x1) << 1; | |
| 42 bc[0] |= (*c >> 7) & 0x1; | |
| 43 | |
| 44 #define Mc (target + 10) | |
| 45 | |
| 46 Mc[0] = (*c >> 5) & 0x3; | |
| 47 | |
| 48 #define xmaxc (target + 11) | |
| 49 | |
| 50 xmaxc[0] = (*c++ & 0x1F) << 1; | |
| 51 xmaxc[0] |= (*c >> 7) & 0x1; | |
| 52 | |
| 53 #define xmc (target + 12) | |
| 54 | |
| 55 xmc[0] = (*c >> 4) & 0x7; | |
| 56 xmc[1] = (*c >> 1) & 0x7; | |
| 57 xmc[2] = (*c++ & 0x1) << 2; | |
| 58 xmc[2] |= (*c >> 6) & 0x3; | |
| 59 xmc[3] = (*c >> 3) & 0x7; | |
| 60 xmc[4] = *c++ & 0x7; | |
| 61 xmc[5] = (*c >> 5) & 0x7; | |
| 62 xmc[6] = (*c >> 2) & 0x7; | |
| 63 xmc[7] = (*c++ & 0x3) << 1; /* 10 */ | |
| 64 xmc[7] |= (*c >> 7) & 0x1; | |
| 65 xmc[8] = (*c >> 4) & 0x7; | |
| 66 xmc[9] = (*c >> 1) & 0x7; | |
| 67 xmc[10] = (*c++ & 0x1) << 2; | |
| 68 xmc[10] |= (*c >> 6) & 0x3; | |
| 69 xmc[11] = (*c >> 3) & 0x7; | |
| 70 xmc[12] = *c++ & 0x7; | |
| 71 | |
| 72 #undef Nc | |
| 73 #define Nc (target + 25 - 1) | |
| 74 | |
| 75 Nc[1] = (*c >> 1) & 0x7F; | |
| 76 | |
| 77 #undef bc | |
| 78 #define bc (target + 26 - 1) | |
| 79 | |
| 80 bc[1] = (*c++ & 0x1) << 1; | |
| 81 bc[1] |= (*c >> 7) & 0x1; | |
| 82 | |
| 83 #undef Mc | |
| 84 #define Mc (target + 27 - 1) | |
| 85 | |
| 86 Mc[1] = (*c >> 5) & 0x3; | |
| 87 | |
| 88 #undef xmaxc | |
| 89 #define xmaxc (target + 28 - 1) | |
| 90 | |
| 91 xmaxc[1] = (*c++ & 0x1F) << 1; | |
| 92 xmaxc[1] |= (*c >> 7) & 0x1; | |
| 93 | |
| 94 #undef xmc | |
| 95 #define xmc (target + 29 - 13) | |
| 96 | |
| 97 xmc[13] = (*c >> 4) & 0x7; | |
| 98 xmc[14] = (*c >> 1) & 0x7; | |
| 99 xmc[15] = (*c++ & 0x1) << 2; | |
| 100 xmc[15] |= (*c >> 6) & 0x3; | |
| 101 xmc[16] = (*c >> 3) & 0x7; | |
| 102 xmc[17] = *c++ & 0x7; | |
| 103 xmc[18] = (*c >> 5) & 0x7; | |
| 104 xmc[19] = (*c >> 2) & 0x7; | |
| 105 xmc[20] = (*c++ & 0x3) << 1; | |
| 106 xmc[20] |= (*c >> 7) & 0x1; | |
| 107 xmc[21] = (*c >> 4) & 0x7; | |
| 108 xmc[22] = (*c >> 1) & 0x7; | |
| 109 xmc[23] = (*c++ & 0x1) << 2; | |
| 110 xmc[23] |= (*c >> 6) & 0x3; | |
| 111 xmc[24] = (*c >> 3) & 0x7; | |
| 112 xmc[25] = *c++ & 0x7; | |
| 113 | |
| 114 #undef Nc | |
| 115 #define Nc (target + 42 - 2) | |
| 116 | |
| 117 Nc[2] = (*c >> 1) & 0x7F; | |
| 118 | |
| 119 #undef bc | |
| 120 #define bc (target + 43 - 2) | |
| 121 | |
| 122 bc[2] = (*c++ & 0x1) << 1; /* 20 */ | |
| 123 bc[2] |= (*c >> 7) & 0x1; | |
| 124 | |
| 125 #undef Mc | |
| 126 #define Mc (target + 44 - 2) | |
| 127 | |
| 128 Mc[2] = (*c >> 5) & 0x3; | |
| 129 | |
| 130 #undef xmaxc | |
| 131 #define xmaxc (target + 45 - 2) | |
| 132 | |
| 133 xmaxc[2] = (*c++ & 0x1F) << 1; | |
| 134 xmaxc[2] |= (*c >> 7) & 0x1; | |
| 135 | |
| 136 #undef xmc | |
| 137 #define xmc (target + 46 - 26) | |
| 138 | |
| 139 xmc[26] = (*c >> 4) & 0x7; | |
| 140 xmc[27] = (*c >> 1) & 0x7; | |
| 141 xmc[28] = (*c++ & 0x1) << 2; | |
| 142 xmc[28] |= (*c >> 6) & 0x3; | |
| 143 xmc[29] = (*c >> 3) & 0x7; | |
| 144 xmc[30] = *c++ & 0x7; | |
| 145 xmc[31] = (*c >> 5) & 0x7; | |
| 146 xmc[32] = (*c >> 2) & 0x7; | |
| 147 xmc[33] = (*c++ & 0x3) << 1; | |
| 148 xmc[33] |= (*c >> 7) & 0x1; | |
| 149 xmc[34] = (*c >> 4) & 0x7; | |
| 150 xmc[35] = (*c >> 1) & 0x7; | |
| 151 xmc[36] = (*c++ & 0x1) << 2; | |
| 152 xmc[36] |= (*c >> 6) & 0x3; | |
| 153 xmc[37] = (*c >> 3) & 0x7; | |
| 154 xmc[38] = *c++ & 0x7; | |
| 155 | |
| 156 #undef Nc | |
| 157 #define Nc (target + 59 - 3) | |
| 158 | |
| 159 Nc[3] = (*c >> 1) & 0x7F; | |
| 160 | |
| 161 #undef bc | |
| 162 #define bc (target + 60 - 3) | |
| 163 | |
| 164 bc[3] = (*c++ & 0x1) << 1; | |
| 165 bc[3] |= (*c >> 7) & 0x1; | |
| 166 | |
| 167 #undef Mc | |
| 168 #define Mc (target + 61 - 3) | |
| 169 | |
| 170 Mc[3] = (*c >> 5) & 0x3; | |
| 171 | |
| 172 #undef xmaxc | |
| 173 #define xmaxc (target + 62 - 3) | |
| 174 | |
| 175 xmaxc[3] = (*c++ & 0x1F) << 1; | |
| 176 xmaxc[3] |= (*c >> 7) & 0x1; | |
| 177 | |
| 178 #undef xmc | |
| 179 #define xmc (target + 63 - 39) | |
| 180 | |
| 181 xmc[39] = (*c >> 4) & 0x7; | |
| 182 xmc[40] = (*c >> 1) & 0x7; | |
| 183 xmc[41] = (*c++ & 0x1) << 2; | |
| 184 xmc[41] |= (*c >> 6) & 0x3; | |
| 185 xmc[42] = (*c >> 3) & 0x7; | |
| 186 xmc[43] = *c++ & 0x7; /* 30 */ | |
| 187 xmc[44] = (*c >> 5) & 0x7; | |
| 188 xmc[45] = (*c >> 2) & 0x7; | |
| 189 xmc[46] = (*c++ & 0x3) << 1; | |
| 190 xmc[46] |= (*c >> 7) & 0x1; | |
| 191 xmc[47] = (*c >> 4) & 0x7; | |
| 192 xmc[48] = (*c >> 1) & 0x7; | |
| 193 xmc[49] = (*c++ & 0x1) << 2; | |
| 194 xmc[49] |= (*c >> 6) & 0x3; | |
| 195 xmc[50] = (*c >> 3) & 0x7; | |
| 196 xmc[51] = *c & 0x7; /* 33 */ | |
| 197 | |
| 198 return 0; | |
| 199 } |
