argon-v2/import.go

package main

import (
	"fmt"
	"os"
	"path/filepath"
)

func FileExists(filename string) bool {
	info, err := os.Stat(filename)
	if os.IsNotExist(err) {
		return false
	}
	return !info.IsDir()
}

var modules = map[string](map[string]variableValue){}

func importMod(realpath string, origin string) (map[string]variableValue, any) {
	extention := filepath.Ext(realpath)
	path := realpath
	if extention == "" {
		path += ".ar"
	}
	ex, err := os.Getwd()
	if err != nil {
		return map[string]variableValue{}, err
	}
	executable, err := os.Executable()
	if err != nil {
		return map[string]variableValue{}, err
	}
	executable = filepath.Dir(executable)
	pathsToTest := []string{filepath.Join(origin, realpath, "init.ar"), filepath.Join(origin, path), filepath.Join(origin, "modules", path), filepath.Join(origin, "modules", realpath, "init.ar"), filepath.Join(ex, path), filepath.Join(ex, "modules", realpath, "init.ar"), filepath.Join(ex, "modules", path), filepath.Join(executable, "modules", realpath, "init.ar"), filepath.Join(executable, "modules", path)}
	var p string
	for _, p = range pathsToTest {
		if FileExists(p) {
			break
		}
	}
	if modules[p] == nil {
		modules[p] = map[string]variableValue{}
		data, err := os.ReadFile(p)
		if err != nil {
			return map[string]variableValue{}, err
		}
		stringdata := string(data)
		moduledata := modules[p]
		_, e := runStr(stringdata, p, moduledata)
		if e != nil {
			return map[string]variableValue{}, e
		}
	}
	return modules[p], nil
}

func runStr(str string, origin string, variables map[string]variableValue) ([][]any, any) {
	translated, err := translate(str)
	if err != nil {
		return nil, err
	}
	ty, _, resp := run(translated, origin, []map[string]variableValue{vars, variables})
	if ty != nil {
		if ty == "error" {
			return nil, resp[len(resp)-1][0]
		}
		return nil, fmt.Sprint(ty) + " at top level"
	}
	return resp, nil
}