* const-uniq-1.c: Expand regex to match AIX XCOFF labels.
[official-gcc.git] / libgo / runtime / go-int-array-to-string.c
blob6cae2fd8ccbe335f19f7c44ca0cfddbf3362ad03
1 /* go-int-array-to-string.c -- convert an array of ints to a string in Go.
3 Copyright 2009 The Go Authors. All rights reserved.
4 Use of this source code is governed by a BSD-style
5 license that can be found in the LICENSE file. */
7 #include "go-assert.h"
8 #include "runtime.h"
9 #include "arch.h"
10 #include "malloc.h"
12 String
13 __go_int_array_to_string (const void* p, intgo len)
15 const int32 *ints;
16 intgo slen;
17 intgo i;
18 unsigned char *retdata;
19 String ret;
20 unsigned char *s;
22 ints = (const int32 *) p;
24 slen = 0;
25 for (i = 0; i < len; ++i)
27 int32 v;
29 v = ints[i];
31 if (v < 0 || v > 0x10ffff)
32 v = 0xfffd;
34 if (v <= 0x7f)
35 slen += 1;
36 else if (v <= 0x7ff)
37 slen += 2;
38 else if (v <= 0xffff)
39 slen += 3;
40 else
41 slen += 4;
44 retdata = runtime_mallocgc ((uintptr) slen, FlagNoPointers, 1, 0);
45 ret.str = retdata;
46 ret.len = slen;
48 s = retdata;
49 for (i = 0; i < len; ++i)
51 int32 v;
53 v = ints[i];
55 /* If V is out of range for UTF-8, substitute the replacement
56 character. */
57 if (v < 0 || v > 0x10ffff)
58 v = 0xfffd;
60 if (v <= 0x7f)
61 *s++ = v;
62 else if (v <= 0x7ff)
64 *s++ = 0xc0 | ((v >> 6) & 0x1f);
65 *s++ = 0x80 | (v & 0x3f);
67 else if (v <= 0xffff)
69 *s++ = 0xe0 | ((v >> 12) & 0xf);
70 *s++ = 0x80 | ((v >> 6) & 0x3f);
71 *s++ = 0x80 | (v & 0x3f);
73 else
75 *s++ = 0xf0 | ((v >> 18) & 0x7);
76 *s++ = 0x80 | ((v >> 12) & 0x3f);
77 *s++ = 0x80 | ((v >> 6) & 0x3f);
78 *s++ = 0x80 | (v & 0x3f);
82 __go_assert (s - retdata == slen);
84 return ret;