FreeCalypso > hg > freecalypso-tools
annotate uptools/libcoding/ucs2_bigend.c @ 928:65953c172f24
rvinterf/lowlevel: new hex dump format
| author | Mychaela Falconia <falcon@freecalypso.org> |
|---|---|
| date | Tue, 23 May 2023 05:23:19 +0000 |
| parents | f7228c18463a |
| children |
| 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 } |
