FreeCalypso > hg > freecalypso-tools
annotate uptools/libcoding/ucs2_bigend.c @ 548:2e4ab60919b9
fc-dspromdump front end program implemented
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Mon, 28 Oct 2019 22:08:38 +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 } |