106 lines
1.7 KiB
Go
106 lines
1.7 KiB
Go
package hcl
|
|
|
|
/*
|
|
#cgo CFLAGS: -I/home/hyung-hwan/xxx/include -g -Wall
|
|
#cgo LDFLAGS: -L/home/hyung-hwan/xxx/lib -lhcl -ldl -lquadmath
|
|
|
|
#include <hcl.h>
|
|
#include <hcl-utl.h>
|
|
*/
|
|
import "C"
|
|
|
|
import (
|
|
"fmt"
|
|
"runtime"
|
|
// "unsafe"
|
|
)
|
|
|
|
type HCL struct {
|
|
inst *C.hcl_t
|
|
no int
|
|
|
|
io struct {
|
|
r IOHandle
|
|
w IOHandle
|
|
}
|
|
}
|
|
|
|
var inst_table InstanceTable
|
|
|
|
func deregister_instance(hcl *HCL) {
|
|
if (hcl.no >= 0) {
|
|
inst_table.delete_instance(hcl.no)
|
|
hcl.no = -1
|
|
}
|
|
}
|
|
|
|
func New() (*HCL, error) {
|
|
var inst *C.hcl_t
|
|
var hcl* HCL
|
|
inst = C.hcl_open(nil, 0, nil, nil) // TODO: prim in, errnum out
|
|
hcl = &HCL{inst: inst, no : -1}
|
|
|
|
runtime.SetFinalizer(hcl, deregister_instance)
|
|
hcl.no = inst_table.add_instance(inst, hcl)
|
|
|
|
return hcl, nil
|
|
}
|
|
|
|
func (hcl *HCL) Close() {
|
|
C.hcl_close (hcl.inst)
|
|
deregister_instance (hcl)
|
|
}
|
|
|
|
func (hcl *HCL) Ignite(memsize uintptr) error {
|
|
if C.hcl_ignite(hcl.inst, C.hcl_oow_t(memsize)) <= -1 {
|
|
// TODO: need to convert string...
|
|
return fmt.Errorf ("unable to ignite: %s", ucstr_to_rune_slice(C.hcl_geterrstr(hcl.inst)))
|
|
}
|
|
|
|
return nil
|
|
}
|
|
|
|
func (hcl *HCL) AddBuiltinPrims() error {
|
|
if C.hcl_addbuiltinprims(hcl.inst) <= -1 {
|
|
}
|
|
return nil
|
|
}
|
|
|
|
func (hcl *HCL) AttachIO() error {
|
|
return nil
|
|
}
|
|
|
|
func (hcl *HCL) FeedString(str []rune) error {
|
|
return nil
|
|
}
|
|
|
|
func (hcl *HCL) BeginFeed() {
|
|
}
|
|
|
|
func (hcl *HCL) EndFeed() {
|
|
}
|
|
|
|
func (hcl *HCL) Execute() {
|
|
}
|
|
|
|
func ucstr_to_rune_slice(str *C.hcl_uch_t) []rune {
|
|
return uchars_to_rune_slice(str, uintptr(C.hcl_count_ucstr(str)))
|
|
}
|
|
|
|
func uchars_to_rune_slice(str *C.hcl_uch_t, len uintptr) []rune {
|
|
var res []rune
|
|
var i uintptr
|
|
|
|
// TODO: proper encoding...
|
|
res = make([]rune, len)
|
|
for i = 0; i < len; i++ {
|
|
//TODO res[i] := str[i]
|
|
}
|
|
return res
|
|
}
|
|
|
|
|
|
func c_to_go (inst *C.hcl_t) *HCL {
|
|
return nil
|
|
}
|