WIP correct entry point in persisted runner

engine/engine.go

@@ -43,7 +43,8 @@ func NewEngine(cfg Config, st *state.State, rs resource.Resource, ca cache.Memor
 		ca: ca,
 		vm: vm.NewVm(st, rs, ca, szr),
 	}
-	if cfg.Root != "" {
+	//if cfg.Root != "" {
+	if st.Moves == 0 {
 		engine.Init(cfg.Root, ctx)
 	}
 	return engine
@@ -65,10 +66,12 @@ func(en *Engine) Init(sym string, ctx context.Context) error {
 		return err
 	}
 	b := vm.NewLine(nil, vm.MOVE, []string{sym}, nil, nil)
+	log.Printf("start new init VM run with code %x", b)
 	b, err = en.vm.Run(b, ctx)
 	if err != nil {
 		return err
 	}
+	log.Printf("ended init VM run with code %x", b)
 	en.st.SetCode(b)
 	en.initd = true
 	return nil
@@ -102,10 +105,12 @@ func (en *Engine) Exec(input []byte, ctx context.Context) (bool, error) {
 	if len(code) == 0 {
 		return false, fmt.Errorf("no code to execute")
 	}
+	log.Printf("start new VM run with code %x", code)
 	code, err = en.vm.Run(code, ctx)
 	if err != nil {
 		return false, err
 	}
+	log.Printf("ended VM run with code %x", code)
 
 	v, err := en.st.MatchFlag(state.FLAG_TERMINATE, false)
 	if err != nil {
@@ -133,11 +138,10 @@ func (en *Engine) Exec(input []byte, ctx context.Context) (bool, error) {
 // - required data inputs to the template are not available.
 // - the template for the given node point is note available for retrieval using the resource.Resource implementer.
 // - the supplied writer fails to process the writes.
-func(en *Engine) WriteResult(w io.Writer, ctx context.Context) error {
+func(en *Engine) WriteResult(w io.Writer, ctx context.Context) (int, error) {
 	r, err := en.vm.Render(ctx)
 	if err != nil {
-		return err
+		return 0, err
 	}
-	_, err = io.WriteString(w, r)
-	return err
+	return io.WriteString(w, r)
 }

engine/engine_test.go

@@ -26,10 +26,14 @@ type FsWrapper struct {
 
 func NewFsWrapper(path string, st *state.State) FsWrapper {
 	rs := resource.NewFsResource(path)
-	return FsWrapper {
+	wr := FsWrapper {
 		&rs, 
 		st,
 	}
+	wr.AddLocalFunc("one", wr.one)
+	wr.AddLocalFunc("inky", wr.inky)
+	wr.AddLocalFunc("pinky", wr.pinky)
+	return wr
 }
 
 func(fs FsWrapper) one(sym string, input []byte, ctx context.Context) (resource.Result, error) {
@@ -51,18 +55,6 @@ func(fs FsWrapper) pinky(sym string, input []byte, ctx context.Context) (resourc
 	}, nil
 }
 
-func(fs FsWrapper) FuncFor(sym string) (resource.EntryFunc, error) {
-	switch sym {
-	case "one":
-		return fs.one, nil
-	case "inky":
-		return fs.inky, nil
-	case "pinky":
-		return fs.pinky, nil
-	}
-	return nil, fmt.Errorf("function for %v not found", sym)
-}
-
 func(fs FsWrapper) GetCode(sym string) ([]byte, error) {
 	sym += ".bin"
 	fp := path.Join(fs.Path, sym)
@@ -82,20 +74,19 @@ func generateTestData(t *testing.T) {
 }
 
 func TestEngineInit(t *testing.T) {
+	var err error
 	generateTestData(t)
 	ctx := context.TODO()
 	st := state.NewState(17)
 	rs := NewFsWrapper(dataDir, &st)
 	ca := cache.NewCache().WithCacheSize(1024)
 	
-	en := NewEngine(Config{}, &st, &rs, ca, ctx)
-	err := en.Init("root", ctx)
-	if err != nil {
-		t.Fatal(err)
-	}
-
+	en := NewEngine(Config{
+		Root: "root",
+	}, &st, &rs, ca, ctx)
+//
 	w := bytes.NewBuffer(nil)
-	err = en.WriteResult(w, ctx)
+	_, err = en.WriteResult(w, ctx)
 	if err != nil {
 		t.Fatal(err)
 	}
@@ -118,7 +109,7 @@ func TestEngineInit(t *testing.T) {
 		t.Fatalf("expected where-string 'foo', got %s", r)
 	}
 	w = bytes.NewBuffer(nil)
-	err = en.WriteResult(w, ctx)
+	_, err = en.WriteResult(w, ctx)
 	if err != nil {
 		t.Fatal(err)
 	}

engine/loop.go

@@ -19,7 +19,8 @@ import (
 //
 // Rendered output is written to the provided writer.
 func Loop(en *Engine, reader io.Reader, writer io.Writer, ctx context.Context) error {
-	err := en.WriteResult(writer, ctx)
+	var err error
+	_, err = en.WriteResult(writer, ctx)
 	if err != nil {
 		return err
 	}
@@ -41,7 +42,7 @@ func Loop(en *Engine, reader io.Reader, writer io.Writer, ctx context.Context) e
 		if err != nil {
 			return fmt.Errorf("unexpected termination: %v\n", err)
 		}
-		err = en.WriteResult(writer, ctx)
+		_, err = en.WriteResult(writer, ctx)
 		if err != nil {
 			return err
 		}

engine/persist.go

@@ -25,14 +25,43 @@ func RunPersisted(cfg Config, rs resource.Resource, pr persist.Persister, input
 		return err
 	}
 	st := pr.GetState()
-	log.Printf("st %v", st)
+	location, idx := st.Where()
+	if location != "" {
+		cfg.Root = location
+	}
+
+	log.Printf("run persisted with state %v %x input %s", st, st.Code, input)
 	en := NewEngine(cfg, pr.GetState(), rs, pr.GetMemory(), ctx)
 
-	if len(input) > 0 {
-		_, err = en.Exec(input, ctx)
-		if err != nil {
-			return err
-		}
+	log.Printf("location %s", location)
+
+//	if len(input) == 0 {
+//		log.Printf("init")
+//		err = en.Init(location, ctx)
+//		if err != nil {
+//			return err
+//		}
+	c, err := en.WriteResult(w, ctx)
+	if err != nil {
+		return err
 	}
-	return en.WriteResult(w, ctx)
+	err = pr.Save(cfg.SessionId)
+	if err != nil {
+		return err
+	}
+	log.Printf("engine init write %v flags %v", c, st.Flags)
+	if c > 0 {
+		return err
+	}
+	_ = idx
+
+	_, err = en.Exec(input, ctx)
+	if err != nil {
+		return err
+	}
+	_, err = en.WriteResult(w, ctx)
+	if err != nil {
+		return err
+	}
+	return pr.Save(cfg.SessionId)
 }

engine/persist_test.go

@@ -1,9 +1,9 @@
 package engine
 
 import (
-	"bytes"
+//	"bytes"
 	"context"
-	"errors"
+//	"errors"
 	"io/ioutil"
 	"os"
 	"testing"
@@ -16,7 +16,7 @@ import (
 func TestPersist(t *testing.T) {
 	generateTestData(t)
 	cfg := Config{
-		OutputSize: 128,
+		OutputSize: 83,
 		SessionId: "xyzzy",
 		Root: "root",
 	}
@@ -31,27 +31,19 @@ func TestPersist(t *testing.T) {
 	ca := cache.NewCache().WithCacheSize(1024)
 	pr := persist.NewFsPersister(persistDir).WithContent(&st, ca)
 
-	w := bytes.NewBuffer(nil)
+	//w := bytes.NewBuffer(nil)
+	w := os.Stdout
 	ctx := context.TODO()
 
-	
-	err = RunPersisted(cfg, rs, pr, []byte{}, w, ctx)
+	st = state.NewState(cfg.FlagCount)
+	ca = cache.NewCache()
+	ca = ca.WithCacheSize(cfg.CacheSize)
+	pr = persist.NewFsPersister(persistDir).WithContent(&st, ca)
+	err = pr.Save(cfg.SessionId)
 	if err != nil {
-		if !errors.Is(err, os.ErrNotExist) {
-			t.Fatal(err)
-		}
-		st := state.NewState(cfg.FlagCount)
-		ca := cache.NewCache()
-		if cfg.CacheSize > 0 {
-			ca = ca.WithCacheSize(cfg.CacheSize)
-		}
-		pr = persist.NewFsPersister(persistDir).WithContent(&st, ca)
-		err = pr.Save(cfg.SessionId)
-		if err != nil {
-			t.Fatal(err)
-		}
+		t.Fatal(err)
 	}
-
+	
 	pr = persist.NewFsPersister(persistDir)
 	inputs := []string{
 		"",
@@ -65,4 +57,20 @@ func TestPersist(t *testing.T) {
 			t.Fatal(err)
 		}
 	}
+
+	pr = persist.NewFsPersister(persistDir)
+	err = pr.Load(cfg.SessionId)
+	if err != nil {
+		t.Fatal(err)
+	}
+
+	stAfter := pr.GetState()
+	location, idx := stAfter.Where()
+	if location != "long" {
+		t.Fatalf("expected 'long', got %s", location)
+	}
+	if idx != 1 {
+		t.Fatalf("expected '1', got %v", idx)
+	}
+
 }