FreeCalypso > hg > freecalypso-tools

annotate uptools/libcoding/ucs2_bigend.c @ 855:ea458ee48691

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
rvinterf/l1filter: new program written, compiles
author Mychaela Falconia <falcon@freecalypso.org>
date Tue, 09 Nov 2021 23:14:22 +0000
parents f7228c18463a
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
377
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
1 /*
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
2 * This library module implements the function for converting a UCS-2
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
3 * string from native 16-bit words into a byte buffer for SMS.
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
4 */
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
5
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
6 #include <sys/types.h>
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
7
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
8 ucs2_out_bigend(inbuf, outbuf, nuni)
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
9 u_short *inbuf;
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
10 u_char *outbuf;
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
11 unsigned nuni;
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
12 {
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
13 u_short *ip = inbuf;
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
14 u_char *op = outbuf;
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
15 unsigned n, uni;
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
16
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
17 for (n = 0; n < nuni; n++) {
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
18 uni = *ip++;
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
19 *op++ = uni >> 8;
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
20 *op++ = uni;
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
21 }
f7228c18463a uptools/libcoding: added function for UCS-2 BE output
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
22 }