FreeCalypso > hg > freecalypso-tools
view uptools/libcoding/gsm7_pack.c @ 661:fd7b447b99e3
libserial rename
The version that was previously named libserial-newlnx is now libserial-linux,
and the version that was previosly named libserial-orig is now libserial-posix.
This new naming is more in line with the objective reality of the difference,
moving away from naming based on our project history.
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Thu, 05 Mar 2020 19:54:31 +0000 |
parents | 15120d15cab5 |
children |
line wrap: on
line source
/* * This library module implements the function for packing septets into octets. */ #include <sys/types.h> gsm7_pack(inbuf, outbuf, noctets) u_char *inbuf, *outbuf; unsigned noctets; { u_char *ip = inbuf, *op = outbuf; unsigned n, c; for (n = 0; n < noctets; n++) { c = n % 7; *op++ = ((ip[1] << 7) | ip[0]) >> c; if (c == 6) ip += 2; else ip += 1; } }