Retro68/gcc/libgo/runtime/string.goc
2014-09-21 19:33:12 +02:00

132 lines
2.0 KiB
Plaintext

// Copyright 2009, 2010 The Go Authors. All rights reserved.
// Use of this source code is governed by a BSD-style
// license that can be found in the LICENSE file.
package runtime
#include "runtime.h"
#include "arch.h"
#include "malloc.h"
#include "go-string.h"
#include "race.h"
#define charntorune(pv, str, len) __go_get_rune(str, len, pv)
const String runtime_emptystring;
intgo
runtime_findnull(const byte *s)
{
if(s == nil)
return 0;
return __builtin_strlen((const char*) s);
}
intgo
runtime_findnullw(const uint16 *s)
{
intgo l;
if(s == nil)
return 0;
for(l=0; s[l]!=0; l++)
;
return l;
}
static String
gostringsize(intgo l, byte** pmem)
{
String s;
byte *mem;
if(l == 0) {
*pmem = nil;
return runtime_emptystring;
}
// leave room for NUL for C runtime (e.g., callers of getenv)
mem = runtime_mallocgc(l+1, 0, FlagNoScan|FlagNoZero);
s.str = mem;
s.len = l;
mem[l] = 0;
*pmem = mem;
return s;
}
String
runtime_gostring(const byte *str)
{
intgo l;
String s;
byte *mem;
l = runtime_findnull(str);
s = gostringsize(l, &mem);
runtime_memmove(mem, str, l);
return s;
}
String
runtime_gostringnocopy(const byte *str)
{
String s;
s.str = str;
s.len = runtime_findnull(str);
return s;
}
String runtime_cstringToGo(byte*)
__asm__ (GOSYM_PREFIX "runtime.cstringToGo");
String
runtime_cstringToGo(byte *str)
{
return runtime_gostringnocopy(str);
}
enum
{
Runeself = 0x80,
};
func stringiter(s String, k int) (retk int) {
int32 l;
if(k >= s.len) {
// retk=0 is end of iteration
retk = 0;
goto out;
}
l = s.str[k];
if(l < Runeself) {
retk = k+1;
goto out;
}
// multi-char rune
retk = k + charntorune(&l, s.str+k, s.len-k);
out:
}
func stringiter2(s String, k int) (retk int, retv int32) {
if(k >= s.len) {
// retk=0 is end of iteration
retk = 0;
retv = 0;
goto out;
}
retv = s.str[k];
if(retv < Runeself) {
retk = k+1;
goto out;
}
// multi-char rune
retk = k + charntorune(&retv, s.str+k, s.len-k);
out:
}