mirror of
https://github.com/autc04/Retro68.git
synced 2024-12-02 18:53:22 +00:00
59 lines
1.3 KiB
Go
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])
|
|
}
|