Retro68/gcc/libgo/go/runtime/env_posix.go
2015-08-28 17:33:40 +02:00

59 lines
1.3 KiB
Go

// Copyright 2012 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.
// +build darwin dragonfly freebsd linux nacl netbsd openbsd solaris windows
package runtime
import "unsafe"
func environ() []string
func getenv(s *byte) *byte {
val := gogetenv(gostringnocopy(s))
if val == "" {
return nil
}
// Strings found in environment are NUL-terminated.
return &bytes(val)[0]
}
func gogetenv(key string) string {
env := environ()
if env == nil {
gothrow("getenv before env init")
}
for _, s := range environ() {
if len(s) > len(key) && s[len(key)] == '=' && s[:len(key)] == key {
return s[len(key)+1:]
}
}
return ""
}
//extern setenv
func _cgo_setenv(unsafe.Pointer, unsafe.Pointer, int32)
//extern unsetenv
func _cgo_unsetenv(unsafe.Pointer)
// Update the C environment if cgo is loaded.
// Called from syscall.Setenv.
func syscall_setenv_c(k string, v string) {
_cgo_setenv(cstring(k), cstring(v), 1)
}
// Update the C environment if cgo is loaded.
// Called from syscall.unsetenv.
func syscall_unsetenv_c(k string) {
_cgo_unsetenv(cstring(k))
}
func cstring(s string) unsafe.Pointer {
p := make([]byte, len(s)+1)
sp := (*_string)(unsafe.Pointer(&s))
memmove(unsafe.Pointer(&p[0]), unsafe.Pointer(sp.str), uintptr(len(s)))
return unsafe.Pointer(&p[0])
}