package pkger

import (
	"encoding/json"
	"fmt"
	"os"
	"path/filepath"
	"strings"
	"sync"
	"time"

	"github.com/gobuffalo/here"
)

type index struct {
	Files   *filesMap
	Infos   map[string]here.Info
	current here.Info
	once    sync.Once
}

func (i *index) Info(p string) (here.Info, error) {
	if info, ok := i.Infos[p]; ok {
		return info, nil
	}

	info, err := here.Cache(p, here.Package)
	if err != nil {
		return info, err
	}
	i.Infos[p] = info
	return info, nil
}

func (i *index) Current() (here.Info, error) {
	if !i.current.IsZero() {
		return i.current, nil
	}
	var err error
	i.once.Do(func() {
		i.current, err = here.Cache("", func(string) (here.Info, error) {
			return here.Current()
		})
	})

	return i.current, err
}

func (i *index) Create(pt Path) (*File, error) {
	her, err := Info(pt.Pkg)
	if err != nil {
		return nil, err
	}
	f := &File{
		path: pt,
		her:  her,
		info: &FileInfo{
			name:    strings.TrimPrefix(pt.Name, "/"),
			mode:    0666,
			modTime: time.Now(),
		},
	}

	i.Files.Store(pt, f)
	return f, nil
}

func (i *index) MarshalJSON() ([]byte, error) {
	m := map[string]interface{}{}

	fm := map[string]json.RawMessage{}

	var err error
	i.Files.Range(func(key Path, value *File) bool {
		b, err := value.MarshalJSON()
		if err != nil {
			return false
		}
		fm[key.String()] = b
		return true
	})
	if err != nil {
		return nil, err
	}

	m["files"] = fm
	m["infos"] = i.Infos
	m["current"] = i.current

	return json.Marshal(m)
}

func (i *index) UnmarshalJSON(b []byte) error {
	// fmt.Println(string(b))
	return nil
}

func (i index) Walk(pt Path, wf WalkFunc) error {
	var err error
	i.Files.Range(func(k Path, v *File) bool {
		if k.Pkg != pt.Pkg {
			return true
		}
		if err = wf(k, v.info); err != nil {
			return false
		}
		return true
	})

	if err != nil {
		return err
	}

	var info here.Info
	if pt.Pkg == "." {
		info, err = Current()
		if err != nil {
			return err
		}
		pt.Pkg = info.ImportPath
	}

	if info.IsZero() {
		info, err = Info(pt.Pkg)
		if err != nil {
			return fmt.Errorf("%s: %s", pt, err)
		}
	}
	fp := filepath.Join(info.Dir, pt.Name)
	err = filepath.Walk(fp, func(path string, fi os.FileInfo, err error) error {
		if err != nil {
			return err
		}

		path = strings.TrimPrefix(path, info.Dir)
		pt, err := Parse(fmt.Sprintf("%s:%s", pt.Pkg, path))
		if err != nil {
			return err
		}
		return wf(pt, NewFileInfo(fi))
	})

	return err
}

func (i *index) Open(pt Path) (*File, error) {
	f, ok := i.Files.Load(pt)
	if !ok {
		return i.openDisk(pt)
	}
	nf := &File{
		info: f.info,
		path: f.path,
		data: f.data,
		her:  f.her,
	}

	return nf, nil
}

func (i index) openDisk(pt Path) (*File, error) {
	info, err := Info(pt.Pkg)
	if err != nil {
		return nil, err
	}
	fp := info.Dir
	if len(pt.Name) > 0 {
		fp = filepath.Join(fp, pt.Name)
	}

	fi, err := os.Stat(fp)
	if err != nil {
		return nil, err
	}
	f := &File{
		info: WithName(strings.TrimPrefix(pt.Name, "/"), NewFileInfo(fi)),
		her:  info,
		path: pt,
	}
	return f, nil
}

func newIndex() *index {
	return &index{
		Files: &filesMap{},
		Infos: map[string]here.Info{},
	}
}

var rootIndex = func() *index {
	i := newIndex()
	return i
}()